[freeside-commits] freeside/FS/FS pay_batch.pm,1.6,1.7

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail:/tmp/cvs-serv13367

Modified Files:
	pay_batch.pm 
Log Message:
fix param passing

Index: pay_batch.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/pay_batch.pm,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -d -r1.6 -r1.7
--- pay_batch.pm	5 Feb 2007 15:02:22 -0000	1.6
+++ pay_batch.pm	5 Feb 2007 16:01:21 -0000	1.7
@@ -152,7 +152,7 @@
 sub import_results {
   my $self = shift;
 
-  my $param = @_;
+  my $param = ref($_[0]) ? shift : { @_ };
   my $fh = $param->{'filehandle'};
   my $format = $param->{'format'};