--- trunk/lib/Frey/Server.pm 2008/06/29 18:08:50 26 +++ trunk/lib/Frey/Server.pm 2008/06/29 20:13:46 28 @@ -106,6 +106,8 @@ if ( ! defined( $templates->{$module} ) ) { $req->conn->send_status_line( 404, "$module" ); $req->print("Package $module not found"); + } elsif ( ! $method ) { + $req->print( Frey::HTML->page( 'package-methods', $req, $module ) ); } elsif ( grep(/^\Q$method\E$/, @{ $templates->{$module} }) ) { $req->print( Frey::HTML->page( $method, $req ) ); } else { @@ -115,7 +117,7 @@ } else { my $html = Frey::HTML->page( 'status' ); $req->print( $html ); - warn ">> ",length( $html ), " bytes | ", substr($html, 0, 80),$/; + warn ">> ",length( $html ), " bytes\n"; } $req->next; }