diff options
Diffstat (limited to 'search.pl')
-rwxr-xr-x | search.pl | 15 |
1 files changed, 5 insertions, 10 deletions
@@ -5,21 +5,16 @@ use CGI::Carp 'fatalsToBrowser'; use URI::Escape; use local::params; use local::nzbindex; +use local::menu; print header; -print start_html('nzbget status'); +my $menu= new local::menu(%ENV); +print $menu->start_html('nzbget status'); print CGI::start_table(); print CGI::start_form(-action=>'/cgi-bin/nzbget/search.pl'); -print table( - Tr(th([ - a({href=>'/cgi-bin/nzbget/mydl.pl?only_me=1'},'My Downloads'), - a({href=>'/cgi-bin/nzbget/mydl.pl'},'All Downloads'), - a({href=>'/cgi-bin/nzbget/log.pl'},'Log'), - - ])), -), +print table( Tr(td(['Search',textfield('q'),])), Tr(td(['min Size',textfield('minsize')])), @@ -51,5 +46,5 @@ if ($param_obj->has_params()) print hr().'nothing found'; } } -print end_html; +print $menu->end_html; |