Mercurial > emacs
changeset 38504:1d53627a58ae
(parse_changelog): Add another test for defined value to
quiet warnings from Perl 5.005 and above.
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Fri, 20 Jul 2001 10:04:17 +0000 |
| parents | c079349b18ab |
| children | 866b5d168a0d |
| files | lib-src/grep-changelog |
| diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lib-src/grep-changelog Fri Jul 20 10:02:19 2001 +0000 +++ b/lib-src/grep-changelog Fri Jul 20 10:04:17 2001 +0000 @@ -1,5 +1,5 @@ #! /usr/bin/perl -# $Id: grep-changelog,v 1.4 2001/07/20 09:59:19 gerd Exp $ +# $Id: grep-changelog,v 1.5 2001/07/20 10:02:06 gerd Exp $ # Copyright (C) 1999, 2000, 2001 Free Software Foundation, Inc. # @@ -183,6 +183,8 @@ } } + last unless defined $line; + if ($line =~ /^\s*\*/) { # LINE is the first line of a ChangeLog entry. Print # previous entry if it matches.