[freeside-commits] freeside/FS/FS payby.pm,1.13,1.14

[Ivan,,,]

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

Modified Files:
	payby.pm 
Log Message:
add back ability to post a check/cash refund.  be more explicit about it instead of just being a checkbox when posting a credit.  RT#3812

Index: payby.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/payby.pm,v
retrieving revision 1.13
retrieving revision 1.14
diff -u -d -r1.13 -r1.14
--- payby.pm	19 May 2008 04:07:02 -0000	1.13
+++ payby.pm	3 Sep 2008 01:46:12 -0000	1.14
@@ -74,6 +74,7 @@
   'BILL' => {
     tinyname  => 'billing',
     shortname => 'Billing',
+    payname   => 'Check',
     longname  => 'Billing',
   },
   'PREP' => {
@@ -140,6 +141,14 @@
   $hash{$payby}->{shortname};
 }
 
+sub payname {
+  my( $self, $payby ) = @_;
+  #$hash{$payby}->{payname} || $hash{$payby}->{shortname};
+  exists($hash{$payby}->{payname})
+    ? $hash{$payby}->{payname}
+    : $hash{$payby}->{shortname};
+}
+
 sub longname {
   my( $self, $payby ) = @_;
   $hash{$payby}->{longname};