5 if [ "$1" = "-n" ];then
10 # http://sourceware.org/ml/gdb-cvs/2099-99/msg99999.html
11 if [ "$arg" != "${arg#http://sources.redhat.com/}" ];then
12 arg="http://sourceware.org/${arg#http://sources.redhat.com/}"
14 if [ "$arg" != "${arg#http://sourceware.org/ml/}" -a "$arg" != "${arg%.html}" ];then
18 changelogget -n $(wget -q -O - "$arg" | sed -n -e 's/&/\&/g' -e 's#^<a \+href="\(.*\)">\1</a>$#\1#p')
19 elif [ "$arg" != "${arg#http://sourceware.org/cgi-bin/cvsweb.cgi/src/}" ];then
21 # --- src/gdb/ChangeLog 2008/04/24 08:46:17 1.9308
22 wget -q -O - "$arg" | diffdecvs | perl -p -e '$c=1 if s{^(?:---|\Q+++\E)(?= \S+/ChangeLog\t)}{###};s{^@@}{##} if $c;'
24 echo >&2 "Invalid URL: $arg"