From 6fc2b0b6d35e8d35611f8309cab221da45c951bf Mon Sep 17 00:00:00 2001
From: rozel <none>
Date: Fri, 22 Jul 2005 23:37:20 +0200
Subject: [PATCH] Plus propre que le grep -A 9 ou l'on n'etait pas sur d'avoir

toutes les references.

darcs-hash:20050722213720-061a7-969003a71916aa21fce55cff3da739870c279284.gz
---
 index_news.sh | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/index_news.sh b/index_news.sh
index f7e4492d..e697e9b1 100755
--- a/index_news.sh
+++ b/index_news.sh
@@ -28,8 +28,7 @@ for forum in $(find $Rep_News -type d -mindepth 1 -printf '%P \n') ; do
     if test -f $fichier ; then
       for article in $(find $Rep_News$forum -type f -maxdepth 1 -newer $fichier -printf '%P \n') ; do
         mid=$(awk '/^Message-ID: / {print $2}' $Rep_News$forum/$article)
-        ref=$(grep -m 1 -A 9 "References: " $Rep_News$forum/$article | \
-          awk 'BEGIN { RS = "" ; FS = ":" }  {print $2}' | grep "^ <" | tr -d '\n')
+        ref=$(awk 'BEGIN{RS="";FS=":"} /References: / {i=1;while($i !~ /References$/) i++;print $(i+1)}' $Rep_News$forum/$article | grep "^ <" | tr -d '\n')
         $(echo $article $mid $ref >> $id )
       done
     else # si le dernier message avant le dernier id-xage est annule ou modere
@@ -38,8 +37,7 @@ for forum in $(find $Rep_News -type d -mindepth 1 -printf '%P \n') ; do
       $(echo -n > $id)
       for article in $(find $Rep_News$forum -type f -maxdepth 1 -printf '%P \n') ; do
         mid=$(awk '/^Message-ID: / {print $2}' $Rep_News$forum/$article)
-        ref=$(grep -m 1 -A 9 "References: " $Rep_News$forum/$article | \
-	  awk 'BEGIN { RS = "" ; FS = ":" }  {print $2}' | grep "^ <" | tr -d '\n')
+        ref=$(awk 'BEGIN{RS="";FS=":"} /References: / {i=1;while($i !~ /References$/) i++;print $(i+1)}' $Rep_News$forum/$article | grep "^ <" | tr -d '\n')
         $(echo $article $mid $ref >> $id )
       done
     fi