develooper Front page | perl.perl5.porters | Postings from January 2001

[PATCH 5.6.1-TRIAL? and 5.7.?] perldoc uses unescaped backslashes in filenames

From:
Jan Dubois
Date:
January 31, 2001 21:15
Subject:
[PATCH 5.6.1-TRIAL? and 5.7.?] perldoc uses unescaped backslashes in filenames
Message ID:
8qrh7t069jt32m98sap53l9dfoge0vjrle@4ax.com
The following patch is needed for both Perl 5.6.1-TRIAL[12] and Perl 5.7.?

-Jan


diff -u utils/perldoc.PL.orig utils/perldoc.PL
--- utils/perldoc.PL.orig	Wed Jan 31 18:59:16 2001
+++ utils/perldoc.PL	Wed Jan 31 21:05:13 2001
@@ -38,7 +38,7 @@
 
 my \@pagers = ();
 push \@pagers, "$Config{'pager'}" if -x "$Config{'pager'}";
-my \$bindir = "$Config{installscript}";
+my \$bindir = "${\quotemeta($Config{installscript})}";
 
 !GROK!THIS!
 




nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About