X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fbrowse%2Fnas.cgi;h=9ccbfe6325761cd75c0fff37e73c95d3d62d36a7;hp=6df40e04933fb74893fdbbe6a73023f34861a807;hb=3ef62a0570055da710328937e7f65dbb2c027c62;hpb=c14a267229fc0d6f2d2afdebab3bd34d825df2ef

diff --git a/httemplate/browse/nas.cgi b/httemplate/browse/nas.cgi
index 6df40e049..9ccbfe632 100755
--- a/httemplate/browse/nas.cgi
+++ b/httemplate/browse/nas.cgi
@@ -1,22 +1,6 @@
+<!-- mason kludge -->
 <%
 
-use strict;
-use vars qw( $cgi $p );
-use CGI;
-use CGI::Carp qw(fatalsToBrowser);
-use Date::Format;
-use FS::UID qw(cgisuidsetup);
-use FS::Record qw(qsearch); # qsearchs);
-use FS::CGI qw(header menubar table popurl);
-use FS::nas;
-use FS::port;
-use FS::session;
-
-$cgi = new CGI;
-&cgisuidsetup($cgi);
-
-$p=popurl(2);
-
 print header('NAS ports', menubar(
   'Main Menu' => $p,
 ));
@@ -61,6 +45,7 @@ foreach my $nas ( sort { $a->nasnum <=> $b->nasnum } qsearch( 'nas', {} ) ) {
   print "</TABLE><BR>";
 }
 
+#Time::Duration??
 sub pretty_interval {
   my $interval = shift;
   my %howlong = (