eliminate Argument "" isn't numeric in numeric le (<=) warning

diff --git a/FS/FS/part_event/Condition/pkg_dundate.pm b/FS/FS/part_event/Condition/pkg_dundate.pm
index f25db2a..fefee20 100644 (file)
--- a/FS/FS/part_event/Condition/pkg_dundate.pm
+++ b/FS/FS/part_event/Condition/pkg_dundate.pm
@@ -19,7 +19,7 @@ sub condition {
 
   #my $cust_main = $self->cust_main($cust_pkg);
 
-  $cust_pkg->dundate <= $opt{time};
+  ( $cust_pkg->dundate || 0 ) <= $opt{time};
 
 }