From aef35f955a866d2bd0bc822c3481c01b26e0229b Mon Sep 17 00:00:00 2001
From: jkratoch <>
Date: Fri, 25 Sep 2009 17:13:59 +0000
Subject: [PATCH] init

---
 bin/changelogget | 27 +++++++++++++++++++++++++++
 1 file changed, 27 insertions(+)
 create mode 100755 bin/changelogget

diff --git a/bin/changelogget b/bin/changelogget
new file mode 100755
index 0000000..a80ad7e
--- /dev/null
+++ b/bin/changelogget
@@ -0,0 +1,27 @@
+#! /bin/sh
+# $Id$
+
+v=true
+if [ "$1" = "-n" ];then
+	v=false
+	shift
+fi
+for arg in "$@";do
+	# http://sourceware.org/ml/gdb-cvs/2099-99/msg99999.html
+	if [ "$arg" != "${arg#http://sourceware.org/ml/}" -a "$arg" != "${arg%.html}" ];then
+		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')
+	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)}{###}'
+	else
+		echo >&2 "Invalid URL: $arg"
+		exit 1
+	fi
+done
+if $v;then
+	echo >&2 OK
+fi
-- 
1.8.3.1