#!/usr/bin/perl
+# $Id$
+
#script to display reports
#written 8/11/99
print startmenu('issue');
my @data;
if ($type eq 'search'){
- @data=statsreport('search','something');
+ @data=statsreport('search','something');
}
if ($type eq 'issue'){
@data=statsreport('issue','today');