- Fix check of fork's success in dpkg-shlibdeps (for dpkg --search).

- Make dpkg-gensymbols.pl executable.

diff --git a/scripts/dpkg-gensymbols.pl b/scripts/dpkg-gensymbols.pl
old mode 100644 (file)
new mode 100755 (executable)

diff --git a/scripts/dpkg-shlibdeps.pl b/scripts/dpkg-shlibdeps.pl
index 10a1bf22d5805bb84518646a843f381b36cec499..52a7b09795cb1d6f1deb7b6feb9d65b37bed6f4c 100755 (executable)
--- a/scripts/dpkg-shlibdeps.pl
+++ b/scripts/dpkg-shlibdeps.pl
@@ -403,7 +403,8 @@ sub my_find_library {
 sub find_packages {
     my @files = (@_);
     my $pkgmatch = {};
-    my $pid = open(DPKG, "-|") || syserr(_g("cannot fork for dpkg --search"));;
+    my $pid = open(DPKG, "-|");
+    syserr(_g("cannot fork for dpkg --search")) unless defined($pid);
     if (!$pid) {
        # Child process running dpkg --search and discarding errors
        close STDERR;