Commit 145b1fe1 authored by Bjorn Munch's avatar Bjorn Munch

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

Remove any leftover trailing ^M from lines read in
parent d5f29726
...@@ -188,6 +188,8 @@ sub new { ...@@ -188,6 +188,8 @@ sub new {
while ( my $line= <$F> ) { while ( my $line= <$F> ) {
chomp($line); chomp($line);
# Remove any trailing CR from Windows edited files
$line=~ s/\cM$//;
# [group] # [group]
if ( $line =~ /^\[(.*)\]/ ) { if ( $line =~ /^\[(.*)\]/ ) {
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment