Bug #54368 MTR does not recognize carriage return in --defaults-file

Remove any leftover trailing ^M from lines read in
This commit is contained in:
Bjorn Munch 2010-06-14 15:34:43 +02:00
parent d5f2972628
commit 145b1fe1f9

View File

@ -188,6 +188,8 @@ sub new {
while ( my $line= <$F> ) {
chomp($line);
# Remove any trailing CR from Windows edited files
$line=~ s/\cM$//;
# [group]
if ( $line =~ /^\[(.*)\]/ ) {