File::Spec is much better suited for finding /dev/null
Christian Walde [Sun, 15 Jul 2012 14:02:22 +0000 (16:02 +0200)]
lib/Distar.pm

index 26a41c8..c12a96c 100644 (file)
@@ -4,6 +4,7 @@ use strictures 1;
 use base qw(Exporter);
 
 use Config;
+use File::Spec;
 
 our @EXPORT = qw(
   author manifest_include run_preflight
@@ -59,7 +60,7 @@ sub run_preflight {
   system("git fetch");
 
   my $make = $Config{make};
-  my $null = $^O ne 'MSWin32' ? "/dev/null" : "NUL";
+  my $null = File::Spec->devnull;
 
   for (scalar `"$make" manifest 2>&1 >$null`) {
     $_ && die "$make manifest changed:\n$_ Go check it and retry";