Change 11963 by jhi@alpha on 2001/09/09 13:54:07
Use the tried method.
Affected files ...
... //depot/perl/pod/perlport.pod#71 edit
Differences ...
==== //depot/perl/pod/perlport.pod#71 (text) ====
Index: perl/pod/perlport.pod
--- perl/pod/perlport.pod.~1~ Sun Sep 9 08:00:05 2001
+++ perl/pod/perlport.pod Sun Sep 9 08:00:05 2001
@@ -366,7 +366,7 @@
platforms remove just the most recent version, too). The portable
idiom to remove all the versions of a file is
- 1 while unlink "file" or die $!;
+ 1 while unlink "file";
This will terminate if the file is undeleteable for some reason
(protected, not there, and so on).
End of Patch.
