selftest: eliminate a perl warning
authorMichael Adam <obnox@samba.org>
Mon, 4 Jul 2011 08:24:19 +0000 (10:24 +0200)
committerMichael Adam <obnox@samba.org>
Mon, 4 Jul 2011 18:02:07 +0000 (20:02 +0200)
In perl, %binary_mapping should be initialized as a hash, not a hash reference.

selftest/selftest.pl

index af45c718de1b32f528cf48426837448b1fcc6de1..12c4b334453efab7a888be533e5a4f4628146446 100755 (executable)
@@ -463,7 +463,7 @@ if ($opt_socket_wrapper) {
 my $target;
 my $testenv_default = "none";
 
-my %binary_mapping = {};
+my %binary_mapping = ();
 if ($opt_binary_mapping) {
     my @binmapping_list = split(/,/, $opt_binary_mapping);
     foreach my $mapping (@binmapping_list) {