From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Tue, 22 Aug 2000 19:44:47 +0000 (+0000)
Subject: Forgot portability nit.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f42118b2d7ea8241d5c01974c43e5ff1ad7105b2;p=p5sagit%2Fp5-mst-13.2.git

Forgot portability nit.

p4raw-id: //depot/perl@6779
---

diff --git a/t/lib/st-forgive.t b/t/lib/st-forgive.t
index e5272f0..822013b 100644
--- a/t/lib/st-forgive.t
+++ b/t/lib/st-forgive.t
@@ -46,7 +46,7 @@ $Storable::forgive_me=1;
 my $devnull = File::Spec->devnull;
 
 open(SAVEERR, ">&STDERR");
-open(STDERR, ">/dev/null") or 
+open(STDERR, ">$devnull") or 
   ( print SAVEERR "Unable to redirect STDERR: $!\n" and exit(1) );
 
 eval {$result = store ($bad , 'store')};