diff options
author | ivan <ivan> | 2010-10-20 02:07:02 +0000 |
---|---|---|
committer | ivan <ivan> | 2010-10-20 02:07:02 +0000 |
commit | a8e4b1744a6bbd2e1509b58e73b1d52751563880 (patch) | |
tree | 77ffb2638f193f748c36423d1dabd65ee81d6d8a /FS/FS/cust_refund.pm | |
parent | 633510de5405b966d160ab95ad396bc601764603 (diff) |
customer merging, RT#10247
Diffstat (limited to 'FS/FS/cust_refund.pm')
-rw-r--r-- | FS/FS/cust_refund.pm | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/FS/FS/cust_refund.pm b/FS/FS/cust_refund.pm index 4086f0f..7df7a55 100644 --- a/FS/FS/cust_refund.pm +++ b/FS/FS/cust_refund.pm @@ -238,12 +238,17 @@ sub delete { =item replace OLD_RECORD -Modifying a refund? Well, don't say I didn't warn you. +You can, but probably shouldn't modify refunds... + +Replaces the OLD_RECORD with this one in the database, or, if OLD_RECORD is not +supplied, replaces this record. If there is an error, returns the error, +otherwise returns false. =cut sub replace { my $self = shift; + return "Can't modify closed refund" if $self->closed =~ /^Y/i; $self->SUPER::replace(@_); } |