Merge tag 'sound-5.1-rc6' of git://git.kernel.org/pub/scm/linux/kernel/git/tiwai...

[sfrench/cifs-2.6.git] / scripts / leaking_addresses.pl

diff --git a/scripts/leaking_addresses.pl b/scripts/leaking_addresses.pl
index 6a897788f5a7ecd3eb699ebd6aec21ee1125aecd..ef9e5b2a161491079388e90a27015ed8af567c0b 100755 (executable)
--- a/scripts/leaking_addresses.pl
+++ b/scripts/leaking_addresses.pl
@@ -97,7 +97,7 @@ Options:
        --32-bit                        Scan 32-bit kernel.
        --page-offset-32-bit=o          Page offset (for 32-bit kernel 0xABCD1234).
        -d, --debug                     Display debugging output.
-       -h, --help, --version           Display this help and exit.
+       -h, --help                      Display this help and exit.
 
 Scans the running kernel for potential leaking addresses.
 
@@ -108,7 +108,6 @@ EOM
 GetOptions(
        'd|debug'               => \$debug,
        'h|help'                => \$help,
-       'version'               => \$help,
        'o|output-raw=s'        => \$output_raw,
        'i|input-raw=s'         => \$input_raw,
        'suppress-dmesg'        => \$suppress_dmesg,
@@ -231,7 +230,7 @@ sub get_kernel_config_option
                my $tmp_file = "/tmp/tmpkconf";
 
                if (system("gunzip < /proc/config.gz > $tmp_file")) {
-                       dprint "$0: system(gunzip < /proc/config.gz) failed\n";
+                       dprint("system(gunzip < /proc/config.gz) failed\n");
                        return "";
                } else {
                        @config_files = ($tmp_file);
@@ -243,7 +242,7 @@ sub get_kernel_config_option
        }
 
        foreach my $file (@config_files) {
-               dprint("parsing config file: %s\n", $file);
+               dprint("parsing config file: $file\n");
                $value = option_from_file($option, $file);
                if ($value ne "") {
                        last;
@@ -502,7 +501,7 @@ sub walk
                                next;
                        }
 
-                       dprint "parsing: $path\n";
+                       dprint("parsing: $path\n");
                        timed_parse_file($path);
                }
        }