From c76e7aae3cc27d5ecc881c1d4a11a510e9c6b9af Mon Sep 17 00:00:00 2001 From: einhverfr Date: Fri, 3 Nov 2006 04:52:53 +0000 Subject: Cli wrapper small fix. git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@477 4979c152-3d1c-0410-bac9-87ea11338e46 --- utils/cli/ledgersmb_cli.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'utils/cli/ledgersmb_cli.pl') 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}; -- cgit v1.2.3