LICENSE: adjust script to properly read man pages

This commit is contained in:
Franco Fichtner
2018-05-19 17:33:08 +02:00
parent e38d58ae88
commit 8ff6b2ba31
+1 -1
View File
@@ -84,7 +84,7 @@ sub process_file
for my $line ( @lines ) {
my $copy = $line;
next if $line !~ s/copyright\s+\(c\)\s+//i;
$line =~ s/^[\*\\#\s]+//g;
$line =~ s/^[."\*\\#\s]+//g;
$line =~ s/[\.\s]+$//g;
$line =~ s/Inc$/Inc./;
$line =~ s/B\.V$/B.V./;