epics/pcas
0
0
Fork 0
Code Issues Pull Requests Projects Wiki Activity

Fixed chomp.

Browse Source
This commit is contained in:
Janet B. Anderson
2002-12-16 20:25:53 +00:00
parent 789d7fe5d0
commit 8e807bf6b4
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
configure/tools/munch.pl
View File

@@ -18,7 +18,7 @@ eval 'exec perl -S $0 ${1+"$@"}' # -*- Mode: perl -*-
while ($line = <STDIN>)
{
chomp $line;
chomp;
next if ($line =~ /__?GLOBAL_.F.+/);
next if ($line =~ /__?GLOBAL_.I._GLOBAL_.D.+/);
if ($line =~ /__?GLOBAL_.D.+/) {