Some more tests for \N

[p5sagit/p5-mst-13.2.git] / t / op / runlevel.t

diff --git a/t/op/runlevel.t b/t/op/runlevel.t
old mode 100755 (executable)
new mode 100644 (file)
index c103812..44aedc0
--- a/t/op/runlevel.t
+++ b/t/op/runlevel.t
@@ -44,7 +44,7 @@ for (@prgs){
     my $status = $?;
     $results =~ s/\n+$//;
     # allow expected output to be written as if $prog is on STDIN
-    $results =~ s/$::tempfile_regexp/-/g;
+    $results =~ s/$::tempfile_regexp/-/ig;
     $results =~ s/\n%[A-Z]+-[SIWEF]-.*$// if $Is_VMS;  # clip off DCL status msg
     $expected =~ s/\n+$//;
     if ($results ne $expected) {