[freeside-commits] freeside/httemplate/misc/process cancel_pkg.html, 1.1, 1.2

Jeff Finucane,420,, jeff at wavetail.420.am
Sun Oct 22 21:21:06 PDT 2006


Update of /home/cvs/cvsroot/freeside/httemplate/misc/process
In directory wavetail:/tmp/cvs-serv31107/httemplate/misc/process

Modified Files:
	cancel_pkg.html 
Log Message:
events should attach reasons

Index: cancel_pkg.html
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/misc/process/cancel_pkg.html,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- cancel_pkg.html	19 Oct 2006 14:27:33 -0000	1.1
+++ cancel_pkg.html	23 Oct 2006 04:21:04 -0000	1.2
@@ -55,22 +55,13 @@
 %}
 %
 %unless ($error) {
-%  my $cust_pkg_reason = new FS::cust_pkg_reason({ 'pkgnum'      => $pkgnum,
-%                                                  'reasonnum'   => $reasonnum,
-%  						   'otaker'      => $otaker,
-%						   'date'        => $date,
-%						  });
-%  $error = $cust_pkg_reason->insert;
-%}
-%
-%unless ($error) {
 %  if ($method eq 'expire'){
 %    my %hash = $cust_pkg->hash;
 %    $hash{'expire'}=$date;
 %    my $new = new FS::cust_pkg (\%hash);
-%    $error = $new->replace($cust_pkg);
+%    $error = $new->replace($cust_pkg, 'reason' => $reasonnum);
 %  }else{
-%    $error = $cust_pkg->$method
+%    $error = $cust_pkg->$method( 'reason' => $reasonnum );
 %  }
 %}
 %



More information about the freeside-commits mailing list