[freeside-commits] freeside/FS/FS/part_event/Condition pkg_dundate.pm, 1.1, 1.2

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS/part_event/Condition
In directory wavetail.420.am:/tmp/cvs-serv31626/FS/FS/part_event/Condition

Modified Files:
	pkg_dundate.pm 
Log Message:
rework suspension delays, RT#6956

Index: pkg_dundate.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/part_event/Condition/pkg_dundate.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -w -d -r1.1 -r1.2
--- pkg_dundate.pm	16 Jun 2011 23:06:20 -0000	1.1
+++ pkg_dundate.pm	21 Jun 2011 22:14:20 -0000	1.2
@@ -23,10 +23,10 @@
 
 }
 
-#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;