From b6a6731a9b28956748afe6fee2512da84a30e052 Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Fri, 20 Jul 2001 10:02:06 +0000 Subject: [PATCH] (entry_match_p, header_match_p): Fix handling of null or empty argument to prevent duplicate headers. --- lib-src/grep-changelog | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/lib-src/grep-changelog b/lib-src/grep-changelog index b264bdc23d6..15a3d3c99d5 100755 --- a/lib-src/grep-changelog +++ b/lib-src/grep-changelog @@ -1,5 +1,5 @@ #! /usr/bin/perl -# $Id: grep-changelog,v 1.3 2000/06/14 07:09:42 meyering Exp $ +# $Id: grep-changelog,v 1.4 2001/07/20 09:59:19 gerd Exp $ # Copyright (C) 1999, 2000, 2001 Free Software Foundation, Inc. # @@ -89,6 +89,8 @@ if ($version) { sub header_match_p ($) { my $header = shift; + return 0 unless $header; + # No match if AUTHOR-regexp specified and doesn't match. return 0 if $author && $header !~ /$author/; @@ -117,6 +119,8 @@ sub header_match_p ($) { sub entry_match_p ($) { my $entry = shift; + return 0 unless $entry; + if ($regexp) { return 1 if ($entry =~ /$regexp/ && (!$exclude || $entry !~ $exclude)); -- 2.39.5