diff options
| author | Michael Adam <obnox@samba.org> | 2011-07-04 10:24:19 +0200 |
|---|---|---|
| committer | Michael Adam <obnox@samba.org> | 2011-07-04 20:02:07 +0200 |
| commit | 65f4d33d9b5ee80ef768c0479a6782807b18e518 (patch) | |
| tree | 12cbbcd4f87a98095536ebe25c5058c32cd1f469 /selftest | |
| parent | ad4a10dd059c8b33cf7d606af292dd6f6653f3ef (diff) | |
| download | samba-65f4d33d9b5ee80ef768c0479a6782807b18e518.tar.gz samba-65f4d33d9b5ee80ef768c0479a6782807b18e518.tar.bz2 samba-65f4d33d9b5ee80ef768c0479a6782807b18e518.zip | |
selftest: eliminate a perl warning
In perl, %binary_mapping should be initialized as a hash, not a hash reference.
Diffstat (limited to 'selftest')
| -rwxr-xr-x | selftest/selftest.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/selftest/selftest.pl b/selftest/selftest.pl index af45c718de..12c4b33445 100755 --- a/selftest/selftest.pl +++ b/selftest/selftest.pl @@ -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) { |