dh_installxfonts: Fix precidence problem that exposes a new warning message in perl...

diff --git a/debian/changelog b/debian/changelog
index 054f4ddbcbf24db928e4b7cea34d8100243fe658..e16b8a30f1c065879a6d4e3c1256c7ca6b9e296d 100644 (file)
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,3 +1,10 @@
+debhelper (7.0.7) unstable; urgency=low
+
+  * dh_installxfonts: Fix precidence problem that exposes a new warning
+    message in perl 5.10.
+
+ -- Joey Hess <joeyh@debian.org>  Sun, 04 May 2008 13:43:41 -0400
+
 debhelper (7.0.6) unstable; urgency=low
 
   * dh_auto_test: Correct Module::Build tests.

diff --git a/dh_installxfonts b/dh_installxfonts
index b7921a2b5bd6b558d5d54d07dc56dec0182d5cb6..276f903c0240b4b17273f3687b9cd384c1270b69 100755 (executable)
--- a/dh_installxfonts
+++ b/dh_installxfonts
@@ -52,7 +52,7 @@ foreach my $package (@{$dh{DOPACKAGES}}) {
        # Find all font directories in the package build directory.
        my @fontdirs;
        foreach my $parentdir ("$tmp/usr/X11R6/lib/X11/fonts/", "$tmp/usr/share/fonts/X11/") {
-               opendir DIR, $parentdir || next;
+               opendir(DIR, $parentdir) || next;
                @fontdirs = grep { -d "$parentdir/$_" && !/^\./ } (readdir DIR);
                closedir DIR;
        }