diff options
author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-11-03 04:52:53 +0000 |
---|---|---|
committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-11-03 04:52:53 +0000 |
commit | c76e7aae3cc27d5ecc881c1d4a11a510e9c6b9af (patch) | |
tree | 7fea7b0873b2ee1dc45899669f9f423955a4550d /utils | |
parent | 474adf4d82a6535123d5b80abb0ed9c352a2a9e5 (diff) |
Cli wrapper small fix.
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@477 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'utils')
-rw-r--r-- | utils/cli/ledgersmb_cli.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/utils/cli/ledgersmb_cli.pl b/utils/cli/ledgersmb_cli.pl index d6fdac7c..a8fbaa98 100644 --- a/utils/cli/ledgersmb_cli.pl +++ b/utils/cli/ledgersmb_cli.pl @@ -128,7 +128,7 @@ sub push_loop { my $is_hash = 0; if (ref($stackref->{$key}) =~ /HASH/){ $is_hash = 1; - elsif (ref ($stackref->{$key}) !~ /ARRAY/){ + } elsif (ref ($stackref->{$key}) !~ /ARRAY/){ print STDERR "Warning: Must loop through array or hash."; } push @loopstack, \$stackref->{$key}; |