Fix for
H.Merijn Brand [Thu, 9 Nov 2000 11:05:52 +0000 (12:05 +0100)]
Subject: [ID 20001109.003] Not OK: perl v5.7.0 +DEVEL7620 on PA-RISC2.0 11.00 (UNINSTALLED)
Message-Id: <20001109110452.66CF.H.M.BRAND@hccnet.nl>

p4raw-id: //depot/perl@7624

pod/perldiag.pod
t/pragma/warn/pp_sys

index 875e09d..2fe63ba 100644 (file)
@@ -3249,7 +3249,7 @@ will deny it.
 The function indicated isn't implemented on this architecture, according
 to the probings of Configure.
 
-=item The stat preceding C<-l _> wasn't an lstat
+=item The stat preceding %s wasn't an lstat
 
 (F) It makes no sense to test the current stat buffer for symbolic
 linkhood if the last stat that wrote to the stat buffer already went
index c09acf3..66f3e75 100644 (file)
@@ -74,7 +74,7 @@
     flock STDIN, 8;
     flock $a, 8;
 
-  lstat() on filehandle %s                     [pp_stat]
+  The stat preceding lstat() wasn't an lstat %s        [pp_stat]
     lstat(STDIN);
 
   warn(warn_nl, "stat");                       [pp_stat]
@@ -354,7 +354,7 @@ lstat(STDIN) ;
 no warnings 'io' ;
 lstat(STDIN) ;
 EXPECT
-lstat() on filehandle STDIN at - line 13.
+The stat preceding lstat() wasn't an lstat at - line 13.
 ########
 # pp_sys.c [pp_fttext]
 use warnings qw(unopened closed) ;