diff options
Diffstat (limited to 'functions')
-rw-r--r-- | functions | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -1336,6 +1336,7 @@ while (<STDIN>) { for $d (split /\s*,\s*/, $1) { $d =~ s/\s*[|].*$//; $d =~ s/\s*[(].*[)]\s*//; + $d =~ s/:.*//; push @d, $d; } } |