Fix support for `mock --uniqueext'.
[nethome.git] / bin / changelogget
index a80ad7e..e71f02b 100755 (executable)
@@ -8,6 +8,9 @@ if [ "$1" = "-n" ];then
 fi
 for arg in "$@";do
        # http://sourceware.org/ml/gdb-cvs/2099-99/msg99999.html
+       if [ "$arg" != "${arg#http://sources.redhat.com/}" ];then
+               arg="http://sourceware.org/${arg#http://sources.redhat.com/}"
+       fi
        if [ "$arg" != "${arg#http://sourceware.org/ml/}" -a "$arg" != "${arg%.html}" ];then
                echo >&2 -n '*'
                echo "$arg"
@@ -16,7 +19,7 @@ for arg in "$@";do
        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
-               wget -q -O - "$arg" | diffdecvs | perl -p -e 's{^(?:---|\Q+++\E)(?= \S+/ChangeLog\t)}{###}'
+               wget -q -O - "$arg" | diffdecvs | perl -p -e '$c=1 if s{^(?:---|\Q+++\E)(?= \S+/ChangeLog\t)}{###};s{^@@}{##} if $c;'
        else
                echo >&2 "Invalid URL: $arg"
                exit 1