Fix disabling of the ChangeLog changes.

[nethome.git] / bin / changelogget

diff --git a/bin/changelogget b/bin/changelogget
index a80ad7e..e75591a 100755 (executable)
--- a/bin/changelogget
+++ b/bin/changelogget
@@ -16,7 +16,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