Remove possible newline character from author's name in gen-card.pl

This commit is contained in:
LoneFox 2015-07-12 12:43:39 +03:00
parent 977cbe538b
commit ee19ae4096

View file

@ -35,6 +35,7 @@ my $author;
if (-e $authorFile) { if (-e $authorFile) {
open (DATA, $authorFile); open (DATA, $authorFile);
$author = <DATA>; $author = <DATA>;
chomp $author;
close(DATA); close(DATA);
} else { } else {
$author = 'anonymous'; $author = 'anonymous';