mk1mf.pl: replace chop for windows.
Backport old patch to make it work in mixture of perls for Windows. Reviewed-by: Richard Levitte <levitte@openssl.org> Cherry-picked from 7bb98eee3c9e4694dfc2217001d5075ce8d2906e (cherry picked from commit 051b41df4105355a5a9c7f1c0bd00cc70b2d324c)
This commit is contained in:
parent
76b49a8ad7
commit
2df0ba9b4f
@ -326,7 +326,7 @@ open(IN,"<$infile") || die "unable to open $infile:$!\n";
|
|||||||
$_=<IN>;
|
$_=<IN>;
|
||||||
for (;;)
|
for (;;)
|
||||||
{
|
{
|
||||||
chop;
|
s/\s*$//; # was chop, didn't work in mixture of perls for Windows...
|
||||||
|
|
||||||
($key,$val)=/^([^=]+)=(.*)/;
|
($key,$val)=/^([^=]+)=(.*)/;
|
||||||
if ($key eq "RELATIVE_DIRECTORY")
|
if ($key eq "RELATIVE_DIRECTORY")
|
||||||
|
Loading…
x
Reference in New Issue
Block a user