[freeside-commits] freeside/FS/FS queue.pm,1.23,1.24

Ivan,,, ivan at wavetail.420.am
Tue Mar 3 15:41:05 PST 2009


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

Modified Files:
	queue.pm 
Log Message:
eliminate harmless "Odd number of elements in hash assignment" warning

Index: queue.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/queue.pm,v
retrieving revision 1.23
retrieving revision 1.24
diff -u -d -r1.23 -r1.24
--- queue.pm	21 Dec 2008 18:09:55 -0000	1.23
+++ queue.pm	3 Mar 2009 23:41:03 -0000	1.24
@@ -127,7 +127,12 @@
   local $FS::UID::AutoCommit = 0;
   my $dbh = dbh;
 
-  my %args = @args;
+  my %args = ();
+  { 
+    no warnings "misc";
+    %args = @args;
+  }
+
   $self->custnum( $args{'custnum'} ) if $args{'custnum'};
 
   my $error = $self->SUPER::insert;



More information about the freeside-commits mailing list