diff options
| author | Jörg Mayer <jmayer@loplof.de> | 2004-05-22 14:05:33 +0000 |
|---|---|---|
| committer | Jörg Mayer <jmayer@loplof.de> | 2004-05-22 14:05:33 +0000 |
| commit | 6a6f1cc23bd2b1359c0df8b9ae480c930c23aee5 (patch) | |
| tree | e57bb051c1833bc0a24e28aa81610963443399be /make-authors-short.pl | |
| parent | 94b84ca199ade85cf221e5ffad82d1977827382c (diff) | |
Next attempt to match an empty line on Windows
svn path=/trunk/; revision=10960
Diffstat (limited to 'make-authors-short.pl')
| -rwxr-xr-x | make-authors-short.pl | 4 |
1 files changed, 2 insertions, 2 deletions
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) { |