# $id:$
package Reporter;
use strict;
#use vars qw(%SYSTEM);
sub HTMLHeader {
# $_[0] = title
# $_[1] = javascript
return "\n\n$_[0]\n".
"\n\n".
"\n";
}
sub HTMLHeaderPlain {
# $_[0] = title
# $_[1] = javascript
return "\n\n$_[0]\n".
"\n\n".
"\n";
}
sub HTMLFooter {
return "\n\n";
}
1;