From 29cdf21de726d36edcd767171e722b6dc0bba670 Mon Sep 17 00:00:00 2001 From: doogie <> Date: Sun, 18 Mar 2001 05:06:00 -0800 Subject: [PATCH] [project @ 2001-03-18 05:06:00 by doogie] s/%_/$_/ --- scripts/process.in | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/scripts/process.in b/scripts/process.in index 1967009b..f3fb4b83 100755 --- a/scripts/process.in +++ b/scripts/process.in @@ -1,5 +1,5 @@ #!/usr/bin/perl -# $Id: process.in,v 1.24 2001/03/18 05:00:01 doogie Exp $ +# $Id: process.in,v 1.25 2001/03/18 05:06:00 doogie Exp $ # # Usage: process nn # Temps: incoming/Pnn @@ -438,7 +438,7 @@ END } if (length($s_keywords)) { my @kws; - my %gkws = map { (%_, 1) } @gTags; + my %gkws = map { ($_, 1) } @gTags; foreach my $kw (sort split(/[,\s]+/, lc($s_keywords))) { push @kws, $kw if (defined $gkws{$kw}); } -- 2.39.5