On indexe maintenant les references afin de permettre des liens vers la

descendance de l'article affiche.

darcs-hash:20050722190321-061a7-e2e7a623f7ce77a9c8b7ef5aa3840001f4d4dc4a.gz
This commit is contained in:
rozel 2005-07-22 21:03:21 +02:00
parent 9b58e6ba5b
commit 5f16cfd603

View file

@ -28,7 +28,9 @@ for forum in $(find $Rep_News -type d -mindepth 1 -printf '%P \n') ; do
if test -f $fichier ; then if test -f $fichier ; then
for article in $(find $Rep_News$forum -type f -maxdepth 1 -newer $fichier -printf '%P \n') ; do for article in $(find $Rep_News$forum -type f -maxdepth 1 -newer $fichier -printf '%P \n') ; do
mid=$(grep "Message-ID: " $Rep_News$forum/$article | awk '{print $2}') mid=$(grep "Message-ID: " $Rep_News$forum/$article | awk '{print $2}')
$(echo $article $mid >> $id ) ref=$(grep -m 1 -A 9 "References: " $Rep_News$forum/$article | \
awk 'BEGIN { RS = "" ; FS = ":" } {print $2}' | grep "^ <" | tr -d '\n')
$(echo $article $mid $ref >> $id )
done done
else # si le dernier message avant le dernier id-xage est annule ou modere else # si le dernier message avant le dernier id-xage est annule ou modere
# ou si le fichier des mid n'existe pas : # ou si le fichier des mid n'existe pas :
@ -36,7 +38,9 @@ for forum in $(find $Rep_News -type d -mindepth 1 -printf '%P \n') ; do
$(echo -n > $id) $(echo -n > $id)
for article in $(find $Rep_News$forum -type f -maxdepth 1 -printf '%P \n') ; do for article in $(find $Rep_News$forum -type f -maxdepth 1 -printf '%P \n') ; do
mid=$(grep "Message-ID: " $Rep_News$forum/$article | awk '{print $2}') mid=$(grep "Message-ID: " $Rep_News$forum/$article | awk '{print $2}')
$(echo $article $mid >> $id ) ref=$(grep -m 1 -A 9 "References: " $Rep_News$forum/$article | \
awk 'BEGIN { RS = "" ; FS = ":" } {print $2}' | grep "^ <" | tr -d '\n')
$(echo $article $mid $ref >> $id )
done done
fi fi
fi fi