From 44e61085d3dd77e2a0455df89ff362a3cfa4242e Mon Sep 17 00:00:00 2001
From: jkratoch <>
Date: Thu, 8 Oct 2009 13:10:05 +0000
Subject: [PATCH] Change -n to -q. New option -n to omit mangling `ChangeLog's.
---
bin/changelogget | 11 ++++++++---
1 file changed, 8 insertions(+), 3 deletions(-)
diff --git a/bin/changelogget b/bin/changelogget
index e71f02b..e9b5180 100755
--- 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/&/\&/g' -e 's#^\1$#\1#p')
+ changelogget -q $changelog $(wget -q -O - "$arg" | sed -n -e 's/&/\&/g' -e 's#^\1$#\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
--
1.8.3.1