--- trunk/lib/Frey/Server.pm	2008/11/05 08:20:50	277
+++ trunk/lib/Frey/Server.pm	2008/11/05 08:20:53	280
@@ -80,13 +80,11 @@
 		} elsif ( $path =~ m!/Frey[:-]+ObjectDesigner! ) {
 			$f = Frey::ObjectDesigner->new( fey_class => $params{class} );
 			$f->request( $req );
-		} elsif ( $path =~ m!/Frey[:-]+Introspect! ) {
-			$f = Frey::Introspect->new( class => $params{class} );
-			$req->print( $f->markup );
-			undef $f;
 		} elsif ( $path =~ m!/([^/]+)/($run_regexp)! ) {
-			warn "# run $1 $2\n";
-			$f = Frey::Run->new( class => $1, params => \%params );
+			my $class = $1;
+			$class =~ s/-/::/; # sigh!
+			warn "# run $class $2\n";
+			$f = Frey::Run->new( class => $class, params => \%params );
 		} else {
 			$f = Frey::Run->new( class => 'Frey::ClassBrowser' );
 		}