Imported Upstream version 7.59.0

[platform/upstream/curl.git] / tests / extern-scan.pl

diff --git a/tests/extern-scan.pl b/tests/extern-scan.pl
index 7a5c291..88594ed 100755 (executable)
--- a/tests/extern-scan.pl
+++ b/tests/extern-scan.pl
@@ -49,7 +49,9 @@ sub scanheader {
     open H, "<$f" || die;
     while(<H>) {
         if (/^(CURL_EXTERN.*)/) {
-            print "$1\n";
+            my $decl = $1;
+            $decl =~ s/\r$//;
+            print "$decl\n";
         }
     }
     close H;