diff --git a/make-authors-short.pl b/make-authors-short.pl index 39cc77796f..9601e2910a 100755 --- a/make-authors-short.pl +++ b/make-authors-short.pl @@ -1,6 +1,6 @@ #!/usr/bin/perl -w -# $Id: make-authors-short.pl,v 1.2 2004/05/21 21:08:41 jmayer Exp $ +# $Id: make-authors-short.pl,v 1.3 2004/05/22 14:05:33 jmayer Exp $ # Remove tasks from individual author entries from AUTHORS file # for use in the about dialog. @@ -16,7 +16,7 @@ while (<>) { print "$1\n"; } elsif (/}/) { $subinfo = 0; - if (($nextline = <>) !~ /^$/) { + if (($nextline = <>) !~ /^[\s\r]*$/) { print $nextline; } } elsif ($subinfo == 1) {