From: Ken Hornstein Date: Fri, 13 Apr 2012 15:23:20 +0000 (-0400) Subject: Sigh. More changes for newer versions of perl. X-Git-Url: https://diplodocus.org/git/nmh/commitdiff_plain/acf0c6e13383bef83c288fd44dcf885b0ac69ebe?ds=inline;hp=3bebe0e894828d80183926d4fc19fc01cd3c274e Sigh. More changes for newer versions of perl. --- diff --git a/docs/contrib/replyfilter b/docs/contrib/replyfilter index a080710d..2e987946 100755 --- a/docs/contrib/replyfilter +++ b/docs/contrib/replyfilter @@ -321,7 +321,7 @@ sub process_text (*$$;$) # Send our input to the filter program # - if (defined %filterreplace) { + if (%filterreplace) { foreach my $match (keys %filterreplace) { $text =~ s/$match/$filterreplace{$match}/g; }