In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/e80af1fd276d83858d27742ea887415e3263960b?hp=9604fbf0722bd97ca6031a263c50ad52b6633db7>
- Log ----------------------------------------------------------------- commit e80af1fd276d83858d27742ea887415e3263960b Author: Tony Cook <[email protected]> Date: Wed Oct 12 10:42:47 2016 +1100 (perl 129183) don't treat \ as an escape in PATH for -S ----------------------------------------------------------------------- Summary of changes: util.c | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/util.c b/util.c index 5bb0dfcffc..6bc2fe5dd2 100644 --- a/util.c +++ b/util.c @@ -3352,9 +3352,8 @@ Perl_find_script(pTHX_ const char *scriptname, bool dosearch, if (len < sizeof tmpbuf) tmpbuf[len] = '\0'; # else - s = delimcpy(tmpbuf, tmpbuf + sizeof tmpbuf, s, bufend, - ':', - &len); + s = delimcpy_no_escape(tmpbuf, tmpbuf + sizeof tmpbuf, s, bufend, + ':', &len); # endif if (s < bufend) s++; -- Perl5 Master Repository
