diff options
Diffstat (limited to 'FS')
| -rw-r--r-- | FS/FS/part_event/Condition/pkg_dundate.pm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/FS/FS/part_event/Condition/pkg_dundate.pm b/FS/FS/part_event/Condition/pkg_dundate.pm index 08b4e0abc..f25db2ae8 100644 --- a/FS/FS/part_event/Condition/pkg_dundate.pm +++ b/FS/FS/part_event/Condition/pkg_dundate.pm @@ -23,10 +23,10 @@ sub condition { } -#sub condition_sql { -# my( $self, $table ) = @_; -# -# 'true'; -#} +sub condition_sql { + my( $class, $table, %opt ) = @_; + return 'true' unless $table eq 'cust_pkg'; + "COALESCE($table.dundate,0) <= ". $opt{'time'}; +} 1; |