diff options
author | ivan <ivan> | 1999-02-07 09:59:44 +0000 |
---|---|---|
committer | ivan <ivan> | 1999-02-07 09:59:44 +0000 |
commit | e0da34d97b1463b55a334e8dae10cd55796e2312 (patch) | |
tree | 5a329798830cd2e894abbf6e4ad28bad106dc4d5 /site_perl | |
parent | 899b323ee2feeaf78afdb40526eb75995fe72cad (diff) |
more mod_perl fixes, and bugfixes Peter Wemm sent via email
Diffstat (limited to 'site_perl')
-rw-r--r-- | site_perl/CGI.pm | 7 | ||||
-rw-r--r-- | site_perl/part_svc.pm | 9 |
2 files changed, 11 insertions, 5 deletions
diff --git a/site_perl/CGI.pm b/site_perl/CGI.pm index 142438e4c..723d7f4ec 100644 --- a/site_perl/CGI.pm +++ b/site_perl/CGI.pm @@ -171,7 +171,7 @@ sub itable { if ( $col ) { qq!<TABLE BGCOLOR="$col" BORDER=0 CELLSPACING=$cellspacing WIDTH="100%">!; } else { - qq!<TABLE BORDER=0 $cellspacing=$cellspacing WIDTH="100%">!; + qq!<TABLE BORDER=0 CELLSPACING=$cellspacing WIDTH="100%">!; } } @@ -216,7 +216,10 @@ lose the background, eidiot ivan@sisd.com 98-sep-2 pod ivan@sisd.com 98-sep-12 $Log: CGI.pm,v $ -Revision 1.16 1999-01-25 12:26:05 ivan +Revision 1.17 1999-02-07 09:59:43 ivan +more mod_perl fixes, and bugfixes Peter Wemm sent via email + +Revision 1.16 1999/01/25 12:26:05 ivan yet more mod_perl stuff Revision 1.15 1999/01/18 09:41:48 ivan diff --git a/site_perl/part_svc.pm b/site_perl/part_svc.pm index fa3462350..6b3ba3d9f 100644 --- a/site_perl/part_svc.pm +++ b/site_perl/part_svc.pm @@ -82,7 +82,7 @@ returns the error, otherwise returns false. =cut sub replace { - my ( $new, $old ) = shift, shift; + my ( $new, $old ) = ( shift, shift ); return "Can't change svcdb!" unless $old->svcdb eq $new->svcdb; @@ -144,7 +144,7 @@ sub check { =head1 VERSION -$Id: part_svc.pm,v 1.2 1998-12-29 11:59:50 ivan Exp $ +$Id: part_svc.pm,v 1.3 1999-02-07 09:59:44 ivan Exp $ =head1 BUGS @@ -169,7 +169,10 @@ ivan@sisd.com 97-dec-6 pod ivan@sisd.com 98-sep-21 $Log: part_svc.pm,v $ -Revision 1.2 1998-12-29 11:59:50 ivan +Revision 1.3 1999-02-07 09:59:44 ivan +more mod_perl fixes, and bugfixes Peter Wemm sent via email + +Revision 1.2 1998/12/29 11:59:50 ivan mostly properly OO, some work still to be done with svc_ stuff |