SF.net SVN: ledger-smb: [1185] trunk/LedgerSMB.pm

[..hidden..]

Revision: 1185
          http://svn.sourceforge.net/ledger-smb/?rev=1185&view=rev
Author:   einhverfr
Date:     2007-05-14 09:25:52 -0700 (Mon, 14 May 2007)

Log Message:
-----------
Fixing Merge so that @keys is truly optional

Modified Paths:
--------------
    trunk/LedgerSMB.pm

Modified: trunk/LedgerSMB.pm
===================================================================
--- trunk/LedgerSMB.pm	2007-05-14 06:36:57 UTC (rev 1184)
+++ trunk/LedgerSMB.pm	2007-05-14 16:25:52 UTC (rev 1185)
@@ -571,7 +571,10 @@
         shift;
     }
     my %args  = @_;
-    my @keys  = @{ $args{keys} };
+    my @keys;
+    if (defined $args{keys}){
+         @keys  = @{ $args{keys} };
+    }
     my $index = $args{index};
     if ( !scalar @keys ) {
         @keys = keys %{$src};


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.