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