Support getting posted mails (as Raw Text).

[nethome.git] / bin / changelogget

diff --git a/bin/changelogget b/bin/changelogget
index e9b5180..cde7598 100755 (executable)
--- a/bin/changelogget
+++ b/bin/changelogget
@@ -19,8 +19,15 @@ for arg in "$@";do
        if [ "$arg" != "${arg#http://sourceware.org/ml/}" -a "$arg" != "${arg%.html}" ];then
                echo >&2 -n '*'
                echo "$arg"
-               echo
-               changelogget -q $changelog $(wget -q -O - "$arg" | sed -n -e 's/&amp;/\&/g' -e 's#^<a \+href="\(.*\)">\1</a>$#\1#p')
+               raw="$(wget -q -O - "$arg" | sed -n 's#^.*<a href="\(/cgi-bin/get-raw-msg[?][^"]*\)">Raw text</a>.*$#\1#p')"
+               if [ -z "$raw" ];then
+                       echo >&2 -n '+'
+                       echo
+                       changelogget -q $changelog $(wget -q -O - "$arg" | sed -n -e 's/&amp;/\&/g' -e 's#^<a \+href="\(.*\)">\1</a>$#\1#p')
+               else
+                       echo >&2 -n '#'
+                       wget -q -O - "http://sourceware.org$raw" | sed -n -e '/^Subject:/p' -e '/^$/,$p'
+               fi
        elif [ "$arg" != "${arg#http://sourceware.org/cgi-bin/cvsweb.cgi/src/}" ];then
                echo >&2 -n '.'
                # --- src/gdb/ChangeLog   2008/04/24 08:46:17     1.9308