1 files changed, 0 insertions, 30 deletions
diff --git a/pre_enqueue.pl b/pre_enqueue.pl
deleted file mode 100755
index fea581e..0000000
--- a/pre_enqueue.pl
+++ /dev/null
@@ -1,30 +0,0 @@
-#!/usr/bin/perl
-use strict;
-use CGI qw(:standard);
-use CGI::Carp 'fatalsToBrowser';
-use local::db;
-use local::menu;
-
-my @cat = local::db::category->retrieve_all();
-die "Ungültige category" if not @cat;
-
-print header;
-my $menu = new local::menu(%ENV);
-print $menu->start_html('nzbget pre_enqueue');
-print CGI::start_form(-action=>'/cgi-bin/nzbget/enqueue.pl');
-print table({class=>'nohigh'},
-	Tr(td(param('title'))),
-	Tr(td(param('description'))),
-),
-table({class=>'nohigh'},
-        Tr(td(['name',textfield('name').hidden('description',param('description')).hidden('url',param('url')).hidden('title',param('title'))])),
-        Tr(td(['category',
-                       CGI::popup_menu(
-                               -name=>'cat',
-                               -values=>[0,map {$_->name()} @cat],
-                               -labels => {0=>'---', map { ($_->category_id() => $_->name() ) } @cat}
-		       )])),
-        Tr(td(['&nbsp;',submit("Download starten")])),
-);
-print CGI::end_form;
-print $menu->end_html();