From: cristy <urban-warrior@git.imagemagick.org>
Date: Fri, 8 Oct 2010 17:39:19 +0000 (+0000)
Subject: (no commit message)
X-Git-Tag: 7.0.1-0~8720
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=409306f0a9892a54b06c31b8cf72451630c70173;p=imagemagick

---

diff --git a/PerlMagick/Makefile.PL b/PerlMagick/Makefile.PL
index af6c00192..a03c87c8d 100644
--- a/PerlMagick/Makefile.PL
+++ b/PerlMagick/Makefile.PL
@@ -123,6 +123,7 @@ EOF
 
 sub AutodetectDelegates {
   #try to get configuration info via identify or convert utilities
+  my $devnull = devnull();
   my $conf = `identify -list format 2>$devnull` || `convert -list format 2>$devnull`;
   foreach my $line (split '\n', $conf) {
     next unless $line =~ /^DELEGATES\s+/;
diff --git a/PerlMagick/Makefile.PL.in b/PerlMagick/Makefile.PL.in
index f17956473..aed305240 100644
--- a/PerlMagick/Makefile.PL.in
+++ b/PerlMagick/Makefile.PL.in
@@ -123,6 +123,7 @@ EOF
 
 sub AutodetectDelegates {
   #try to get configuration info via identify or convert utilities
+  my $devnull = devnull();
   my $conf = `identify -list format 2>$devnull` || `convert -list format 2>$devnull`;
   foreach my $line (split '\n', $conf) {
     next unless $line =~ /^DELEGATES\s+/;