From 8e807bf6b452066e32cbf6a75115fd81ac2f5f02 Mon Sep 17 00:00:00 2001 From: "Janet B. Anderson" Date: Mon, 16 Dec 2002 20:25:53 +0000 Subject: [PATCH] Fixed chomp. --- configure/tools/munch.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/configure/tools/munch.pl b/configure/tools/munch.pl index cd3010607..35e53f4be 100755 --- a/configure/tools/munch.pl +++ b/configure/tools/munch.pl @@ -18,7 +18,7 @@ eval 'exec perl -S $0 ${1+"$@"}' # -*- Mode: perl -*- while ($line = ) { - chomp $line; + chomp; next if ($line =~ /__?GLOBAL_.F.+/); next if ($line =~ /__?GLOBAL_.I._GLOBAL_.D.+/); if ($line =~ /__?GLOBAL_.D.+/) {