grr

diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm
index 3064be3..d1ea863 100644 (file)
--- a/FS/FS/cust_main.pm
+++ b/FS/FS/cust_main.pm
@@ -1369,8 +1369,8 @@ sub collect {
 
       my $error;
       {
-        $FS::cust_bill::realtime_bop_decline_quiet; #supress "used only once"
-                                                    # warning
+        #supress "used only once" warning
+        $FS::cust_bill::realtime_bop_decline_quiet += 0;
         local $FS::cust_bill::realtime_bop_decline_quiet = 1
           if $options{'quiet'};
         $error = eval $part_bill_event->eventcode;