This commit was manufactured by cvs2svn to create tag 'TRIXBOX_2_6'.TRIXBOX_2_6

1 files changed, 0 insertions, 40 deletions

diff --git a/httemplate/search/reg_code.html b/httemplate/search/reg_code.html
deleted file mode 100644
index f65b00d05..000000000
--- a/httemplate/search/reg_code.html
+++ /dev/null
@@ -1,40 +0,0 @@
-<% include( 'elements/search.html',
-                 'title'       => 'Unused Registration Codes for '.
-                                  $agent->agent,
-                 'name'        => 'registration codes',
-                 'query'       => {  'table'   => 'reg_code',
-                                     'hashref' => { 'agentnum' => $agentnum, },
-                                  },
-                 'count_query' => $count_query,
-                 #'redirect'    => $link,
-                 'header'      => [ qw(Code Packages) ],
-                 'fields'      => [
-                   'code',
-                   sub {
-                     map { 
-                       qq!<A HREF="${p}edit/part_pkg.cgi?!. $_->pkgpart. '">'.
-                       $_->pkg. ' - '. $_->comment.
-                       '</A><BR>'
-                     } $_[0]->part_pkg
-                   },
-                 ],
-                 'links' => [
-                   '',
-                   #$plink,
-                   '',
-                 ],
-      )
-%>
-<%init>
-
-die "access denied"
-  unless $FS::CurrentUser::CurrentUser->access_right('Configuration');
-
-my $agentnum = $cgi->param('agentnum');
-$agentnum =~ /^(\d+)$/ or errorpage("illegal agentnum $agentnum");
-$agentnum = $1;
-my $agent = qsearchs('agent', { 'agentnum' => $agentnum } );
-
-my $count_query = "SELECT COUNT(*) FROM reg_code WHERE agentnum = $agentnum";
-
-</%init>