projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
more mod_perl fixes, and bugfixes Peter Wemm sent via email
[freeside.git]
/
site_perl
/
part_svc.pm
diff --git
a/site_perl/part_svc.pm
b/site_perl/part_svc.pm
index
fa34623
..
6b3ba3d
100644
(file)
--- 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 {
=cut
sub replace {
- my ( $new, $old ) =
shift, shift
;
+ my ( $new, $old ) =
( shift, shift )
;
return "Can't change svcdb!"
unless $old->svcdb eq $new->svcdb;
return "Can't change svcdb!"
unless $old->svcdb eq $new->svcdb;
@@
-144,7
+144,7
@@
sub check {
=head1 VERSION
=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
=head1 BUGS
@@
-169,7
+169,10
@@
ivan@sisd.com 97-dec-6
pod ivan@sisd.com 98-sep-21
$Log: part_svc.pm,v $
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
mostly properly OO, some work still to be done with svc_ stuff