projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
4f16a19
)
added table command
author
ivan
<ivan>
Thu, 12 Nov 1998 01:53:47 +0000
(
01:53
+0000)
committer
ivan
<ivan>
Thu, 12 Nov 1998 01:53:47 +0000
(
01:53
+0000)
site_perl/CGI.pm
patch
|
blob
|
history
diff --git
a/site_perl/CGI.pm
b/site_perl/CGI.pm
index
780f541
..
a51066e
100644
(file)
--- a/
site_perl/CGI.pm
+++ b/
site_perl/CGI.pm
@@
-9,7
+9,7
@@
use CGI::Carp qw(fatalsToBrowser);
use FS::UID;
@ISA = qw(Exporter);
use FS::UID;
@ISA = qw(Exporter);
-@EXPORT_OK = qw(header menubar idiot eidiot popurl);
+@EXPORT_OK = qw(header menubar idiot eidiot popurl
table
);
=head1 NAME
=head1 NAME
@@
-137,6
+137,16
@@
sub popurl {
$url->as_string;
}
$url->as_string;
}
+=item table
+
+Returns HTML tag for beginning a table.
+
+=cut
+
+sub table {
+ "<TABLE BORDER>";
+}
+
=back
=head1 BUGS
=back
=head1 BUGS
@@
-161,7
+171,10
@@
lose the background, eidiot ivan@sisd.com 98-sep-2
pod ivan@sisd.com 98-sep-12
$Log: CGI.pm,v $
pod ivan@sisd.com 98-sep-12
$Log: CGI.pm,v $
-Revision 1.9 1998-11-09 08:51:49 ivan
+Revision 1.10 1998-11-12 01:53:47 ivan
+added table command
+
+Revision 1.9 1998/11/09 08:51:49 ivan
bug squash
Revision 1.7 1998/11/09 06:10:59 ivan
bug squash
Revision 1.7 1998/11/09 06:10:59 ivan