diff options
| author | ivan <ivan> | 2001-10-15 14:58:03 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2001-10-15 14:58:03 +0000 |
| commit | 9410e9f656b950a9d4b383a3992fa50bb7a270db (patch) | |
| tree | 9cdaced18cfa970edc1d353afa7ff2b648fc257c /FS | |
| parent | a984fa561b6493ae41215c3d26013767f9ce79cb (diff) | |
date editing
Diffstat (limited to 'FS')
| -rw-r--r-- | FS/FS/cust_pkg.pm | 11 |
1 files changed, 7 insertions, 4 deletions
diff --git a/FS/FS/cust_pkg.pm b/FS/FS/cust_pkg.pm index cbf4ae50d..069ac8cf7 100644 --- a/FS/FS/cust_pkg.pm +++ b/FS/FS/cust_pkg.pm @@ -157,9 +157,12 @@ sub replace { #return "Can't (yet?) change pkgpart!" if $old->pkgpart != $new->pkgpart; return "Can't change otaker!" if $old->otaker ne $new->otaker; - return "Can't change setup once it exists!" - if $old->getfield('setup') && - $old->getfield('setup') != $new->getfield('setup'); + + #allow this *sigh* + #return "Can't change setup once it exists!" + # if $old->getfield('setup') && + # $old->getfield('setup') != $new->getfield('setup'); + #some logic for bill, susp, cancel? $new->SUPER::replace($old); @@ -585,7 +588,7 @@ sub order { =head1 VERSION -$Id: cust_pkg.pm,v 1.10 2001-10-15 12:16:42 ivan Exp $ +$Id: cust_pkg.pm,v 1.11 2001-10-15 14:58:03 ivan Exp $ =head1 BUGS |