dpkg-shlibdeps: Fix two option regexps

regexps -x and -v were missing the starting ^ which could
make them match random other stuff, e.g. filenames.

diff --git a/scripts/dpkg-shlibdeps.pl b/scripts/dpkg-shlibdeps.pl
index 239e00a90efea0d1a482f603946c6c08370d8383..5f4358662a52166719865d4223f92211c581063d 100755 (executable)
--- a/scripts/dpkg-shlibdeps.pl
+++ b/scripts/dpkg-shlibdeps.pl
@@ -69,9 +69,9 @@ foreach (@ARGV) {
        $ignore_missing_info = 1;
     } elsif (m/^-t(.*)$/) {
        $packagetype = $1;
-    } elsif (m/-v$/) {
+    } elsif (m/^-v$/) {
        $debug = 1;
-    } elsif (m/-x(.*)$/) {
+    } elsif (m/^-x(.*)$/) {
        push @exclude, $1;
     } elsif (m/^-/) {
        usageerr(sprintf(_g("unknown option \`%s'"), $_));