[freeside-commits] freeside/FS/FS cust_pkg.pm, 1.204.2.3, 1.204.2.4 part_pkg.pm, 1.123.2.1, 1.123.2.2

[Ivan,,,]

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

Modified Files:
      Tag: FREESIDE_2_3_BRANCH
	cust_pkg.pm part_pkg.pm 
Log Message:
hide start date on package order for specific package definitions, RT#13783

Index: part_pkg.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/part_pkg.pm,v
retrieving revision 1.123.2.1
retrieving revision 1.123.2.2
diff -u -w -d -r1.123.2.1 -r1.123.2.2
--- part_pkg.pm	5 Aug 2011 19:26:57 -0000	1.123.2.1
+++ part_pkg.pm	11 Aug 2011 00:38:14 -0000	1.123.2.2
@@ -867,6 +867,8 @@
 
 sub can_discount { 0; }
 
+sub can_start_date { 1; }
+
 sub freqs_href {
   # moved to FS::Misc to make this accessible to other packages
   # at initialization

Index: cust_pkg.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/cust_pkg.pm,v
retrieving revision 1.204.2.3
retrieving revision 1.204.2.4
diff -u -w -d -r1.204.2.3 -r1.204.2.4
--- cust_pkg.pm	10 Aug 2011 23:43:46 -0000	1.204.2.3
+++ cust_pkg.pm	11 Aug 2011 00:38:13 -0000	1.204.2.4
@@ -284,7 +284,7 @@
   }
 
   my $free_days = $part_pkg->option('free_days');
-  if ( $free_days && $part_pkg->option('delay_setup') ) { #&& !$self->start_date
+  if ( $free_days && $part_pkg->option('delay_setup',1) ) { #&& !$self->start_date
     my ($mday,$mon,$year) = (localtime(time) )[3,4,5];
     #my $start_date = ($self->start_date || timelocal(0,0,0,$mday,$mon,$year)) + 86400 * $free_days;
     my $start_date = timelocal(0,0,0,$mday,$mon,$year) + 86400 * $free_days;