Change -n to -q.

New option -n to omit mangling `ChangeLog's.

diff --git a/bin/changelogget b/bin/changelogget
index e71f02b..e9b5180 100755 (executable)
--- a/bin/changelogget
+++ b/bin/changelogget
@@ -2,10 +2,15 @@
 # $Id$
 
 v=true
-if [ "$1" = "-n" ];then
+if [ "$1" = "-q" ];then
        v=false
        shift
 fi
+changelog=""
+if [ "$1" = "-n" ];then
+       changelog="$1"
+       shift
+fi
 for arg in "$@";do
        # http://sourceware.org/ml/gdb-cvs/2099-99/msg99999.html
        if [ "$arg" != "${arg#http://sources.redhat.com/}" ];then
@@ -15,11 +20,11 @@ for arg in "$@";do
                echo >&2 -n '*'
                echo "$arg"
                echo
-               changelogget -n $(wget -q -O - "$arg" | sed -n -e 's/&amp;/\&/g' -e 's#^<a \+href="\(.*\)">\1</a>$#\1#p')
+               changelogget -q $changelog $(wget -q -O - "$arg" | sed -n -e 's/&amp;/\&/g' -e 's#^<a \+href="\(.*\)">\1</a>$#\1#p')
        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 '$c=1 if s{^(?:---|\Q+++\E)(?= \S+/ChangeLog\t)}{###};s{^@@}{##} if $c;'
+               wget -q -O - "$arg" | diffdecvs | if [ -z "$changelog" ];then perl -p -e '$c=1 if s{^(?:---|\Q+++\E)(?= \S+/ChangeLog\t)}{###};s{^@@}{##} if $c;'; else cat; fi
        else
                echo >&2 "Invalid URL: $arg"
                exit 1