--- trunk/lib/Frey/Server.pm 2008/07/14 21:22:43 121 +++ trunk/lib/Frey/Server.pm 2008/08/31 18:02:50 180 @@ -26,7 +26,7 @@ cookie_session => 'sid', callback => \&main, debug_level => 1, - staticp => sub { $_[0]->url =~ m/\.(jpg|jpeg|gif|png|css|ico|js|html?)$/ }, + staticp => sub { $_[0]->url =~ m/\.(jpg|jpeg|gif|png|css|ico|js|html?|xml|json|ya?ml)(\?.*)?$/ }, ); $Module::Reload::Debug = 1; Frey::ClassLoader->new->load_all_classes(); @@ -40,14 +40,22 @@ my ($req) = @_; my $path = $req->request->url->path; - warn "REQUEST: $path\n"; + warn "REQUEST: $path ",dump( $req->params ),"\n"; - Module::Reload->check if $path =~ m!reload!; + Module::Reload->check if $path =~ m!reload! || $req->param('reload'); - warn $req->request->header('User_Agent'); -#warn dump( $req ); +# warn $req->request->header('User_Agent'); - eval { + sub run_markup { + my ( $req, $class ) = @_; + + my %params = $req->params; + + } + + +# eval { + { my $f; @@ -57,6 +65,8 @@ $f = Frey::ObjectBrowser->new( fey_class => $1 ); } elsif ( $path =~ m!/od/([^/]+)(.*)! ) { $f = Frey::ObjectDesigner->new( fey_class => $1 ); + } elsif ( $path =~ m!/markup/([^/]+)(.*)! ) { + $f = Frey::Run->new( class => $1 ); } else { $f = Frey::ClassBrowser->new; }