diff --git a/bin/pandoc_fixer.pl b/bin/pandoc_fixer.pl index 61af3ffbef9250e6a5afce858b34fabda7ccd780..bdc1c27ef92436959f070b5b72ade1edcc747574 100755 --- a/bin/pandoc_fixer.pl +++ b/bin/pandoc_fixer.pl @@ -43,16 +43,22 @@ open OUTPUT, "> ".$output or die; while(defined(my $line=)) { + if($line =~ /

AUTHOR:/) { next; } + if($line =~ /

|Les sources de ce document sont disponibles sur gitlab.|g; + $line .= "
Version du $gitdate.

\n" } else { $line =~ s||The source of this this document is available on gitlab.|g; + $line .= "
Last version: $gitdate

\n" } + $line =~ s|TOC||g; + $line =~ s|---

|
|g; - $line =~ s|Date:.*Date: $gitdateTITLE:\(.*\)TITLE:$1)) { # if($line =~ /img src="([^%][^"]*)"/) { # $line = "\t".$line; # } - if($line =~ /

AUTHOR:/) { next; } print OUTPUT $line; }