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

1 files changed, 0 insertions, 33 deletions

diff --git a/httemplate/misc/whois.cgi b/httemplate/misc/whois.cgi
deleted file mode 100644
index 533b2d7a8..000000000
--- a/httemplate/misc/whois.cgi
+++ /dev/null
@@ -1,33 +0,0 @@
-<% include("/elements/header.html","Whois $domain", menubar(
-  ( $custnum
-    ? ( "View this customer (#$display_custnum)" => "${p}view/cust_main.cgi?$custnum",
-      )
-    : ()
-  ),
-  "View this domain (#$svcnum)" => "${p}view/svc_domain.cgi?$svcnum",
-)) %>
-
-<PRE><% $whois %></PRE>
-
-<% include('/elements/footer.html') %>
-
-<%init>
-
-my $svcnum = $cgi->param('svcnum');
-my $custnum = $cgi->param('custnum');
-my $domain = $cgi->param('domain');
-
-my $display_custnum;
-if ( $custnum ) {
-  my $cust_main = qsearchs('cust_main', { 'custnum' => $custnum } );
-  $display_custnum = $cust_main->display_custnum;
-}
-
-my $whois = eval { whois($domain) };
-  if ( $@ ) {
-    ( $whois = $@ ) =~ s/ at \/.*Net\/Whois\/Raw\.pm line \d+.*$//s;
-  } else {
-    $whois =~ s/^\n+//;
-  }
-
-</%init>