Tri correct sur les accents, espace correct lors d'un saut de page

This commit is contained in:
Thomas Schwery 2011-02-07 20:36:17 +01:00
parent c5ce831132
commit 9e7ec6c59a
2 changed files with 4 additions and 2 deletions

View file

@ -13,7 +13,7 @@
\newsavebox\recipebox
\newlength\recipebreaklength
\setlength\recipebreaklength{1.1\textheight}
\setlength\recipebreaklength{1.2\textheight}
\NewEnviron{recipe}[3]{%
\savebox{\recipebox}{\parbox{\linewidth}{%
\begin{recipe2}{#1}{#2}{#3}
@ -26,6 +26,7 @@
\begin{recipe2}{#1}{#2}{#3}
\BODY
\end{recipe2}%
\clearpage
\else
\par\noindent\usebox\recipebox
\fi

3
tri.pl
View file

@ -1,6 +1,7 @@
#!/usr/bin/perl
use strict;
use locale;
our ($directory, $destination_file) = @ARGV;
@ -21,7 +22,7 @@ foreach my $file (@files) {
open (DEST, ">".$destination_file);
foreach my $recette (sort {uc($a) cmp uc($b)} keys %recettes) {
foreach my $recette (sort {lc($a) cmp lc($b)} keys %recettes) {
open(FILE, $recettes{$recette});
print DEST <FILE>;
}