diff options
Diffstat (limited to 'make-authors-short.pl')
-rwxr-xr-x | make-authors-short.pl | 31 |
1 files changed, 0 insertions, 31 deletions
diff --git a/make-authors-short.pl b/make-authors-short.pl deleted file mode 100755 index ac96b0c264..0000000000 --- a/make-authors-short.pl +++ /dev/null @@ -1,31 +0,0 @@ -# $Id$ - -# Remove tasks from individual author entries from AUTHORS file -# for use in the about dialog. -# -# Must be called via perlnoutf. - -use strict; - -my $subinfo=0; -my $nextline; - -$_ = <>; -s/\xef\xbb\xbf//; # Skip UTF-8 byte order mark -print unless /^\n/; - -while (<>) { - if (/(.*){/) { - $subinfo = 1; - print "$1\n"; - } elsif (/}/) { - $subinfo = 0; - if (($nextline = <>) !~ /^[\s]*$/) { - print $nextline; - } - } elsif ($subinfo == 1) { - next; - } else { - print; - } -} |