From 051b41df4105355a5a9c7f1c0bd00cc70b2d324c Mon Sep 17 00:00:00 2001 From: Andy Polyakov Date: Sun, 15 Jul 2012 13:40:04 +0000 Subject: [PATCH] mk1mf.pl: replace chop for windows. Backport old patch to make it work in mixture of perls for Windows. Reviewed-by: Richard Levitte Cherry-picked from 7bb98eee3c9e4694dfc2217001d5075ce8d2906e --- util/mk1mf.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/util/mk1mf.pl b/util/mk1mf.pl index 7d4491faeb..9b8abc0cf1 100755 --- a/util/mk1mf.pl +++ b/util/mk1mf.pl @@ -340,7 +340,7 @@ open(IN,"<$infile") || die "unable to open $infile:$!\n"; $_=; for (;;) { - chop; + s/\s*$//; # was chop, didn't work in mixture of perls for Windows... ($key,$val)=/^([^=]+)=(.*)/; if ($key eq "RELATIVE_DIRECTORY") -- 2.25.1