Mercurial > emacs
annotate admin/make-changelog-diff @ 96436:de00a663995a
(hi-lock-regexp-history): Make it an obsolete alias
to `regexp-history'.
(hi-lock-face-history): Rename to `hi-lock-face-defaults' and
make it an obsolete alias to it.
(hi-lock-face-defaults): New variable renamed from
`hi-lock-face-history'.
(hi-lock-line-face-buffer, hi-lock-face-buffer)
(hi-lock-face-phrase-buffer): Use `read-regexp' instead of
`read-from-minibuffer'. Doc fix.
(hi-lock-read-face-name): Replace `hi-lock-face-history' with
`hi-lock-face-defaults'. Remove `mapcar (lambda (f) (cons f f))'.
Set `hist' arg of `completing-read' to `face-name-history'.
Put a list of default faces to `default' arg instead of `hist' arg.
| author | Juri Linkov <juri@jurta.org> |
|---|---|
| date | Mon, 30 Jun 2008 19:36:38 +0000 |
| parents | 3e136d0943a4 |
| children | 52a7f3f50b89 ef719132ddfa |
| rev | line source |
|---|---|
| 49682 | 1 #! /bin/bash |
| 2 | |
| 75649 | 3 ## Author: Francesco Potorti` <pot@gnu.org> |
| 4 | |
| 49682 | 5 if [ $# -ne 2 ]; then |
| 6 echo "usage: $0 TAG1 TAG2" >&2 | |
| 7 exit 1 | |
| 8 fi | |
| 9 | |
| 10 if [ ! -f INSTALL -o ! -f configure -o ! -d lib-src ]; then | |
| 11 echo "this script should be run in the emacs root directory" >&2 | |
| 12 exit 2 | |
| 13 fi | |
| 14 | |
| 15 cvs -q diff -b -r $1 -r $2 $(find -name ChangeLog|sort) | | |
| 16 sed -n -e 's/^=\+/======/p' -e 's/^> //p' -e 's/^diff.*//p' \ | |
| 17 -e 's/^RCS file: .cvsroot.emacs.emacs.\(.*\),v/\1/p' | | |
| 18 sed -n -e "/^======$/ { | |
| 19 N | |
| 20 N | |
| 21 h | |
| 22 d | |
| 23 } | |
| 24 H | |
| 25 s/.*// | |
| 26 x | |
| 27 s/^\n// | |
| 28 p" | |
| 52401 | 29 |
| 30 # arch-tag: 7604a259-40b4-4f97-86b2-496a9c546f0a |
