Mercurial > emacs
annotate admin/make-announcement @ 49512:6a0305153436
(decompose-composite-char): Fix docstring.
author | Juanma Barranquero <lekktu@gmail.com> |
---|---|
date | Wed, 29 Jan 2003 08:54:20 +0000 |
parents | d1f15789b40b |
children | 6c4021c20d1f |
rev | line source |
---|---|
48804
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
1 #! /bin/bash |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
2 |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
3 if [ $# -ne 2 ]; then |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
4 echo "usage: $0 <old version number> <new version number>" >&2 |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
5 exit 1 |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
6 fi |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
7 |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
8 if [ ! -f INSTALL -o ! -f configure -o ! -d lib-src ]; then |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
9 echo "this script should be run in the emacs root directory" >&2 |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
10 exit 2 |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
11 fi |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
12 |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
13 OLD=$1 |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
14 NEW=$2 |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
15 outfile=emacs-$NEW.announce |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
16 oldtag=EMACS_PRETEST_$(echo $OLD|tr . _) |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
17 newtag=EMACS_PRETEST_$(echo $NEW|tr . _) |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
18 |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
19 if [ -f $outfile ]; then |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
20 echo "$outfile exists" |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
21 echo -n "interrupt to abort, ENTER to overwrite "; read answer |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
22 fi |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
23 |
49343 | 24 echo -n "tag name for OLD emacs version $OLD [$oldtag]: "; read answer |
48804
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
25 if [ "$answer" ]; then oldtag=$answer; fi |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
26 |
49343 | 27 echo -n "tag name for NEW emacs version $NEW [$newtag]: "; read answer |
48804
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
28 if [ "$answer" ]; then newtag=$answer; fi |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
29 |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
30 exec > $outfile |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
31 |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
32 cat <<EOF |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
33 There is a new pretest available in |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
34 |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
35 <ftp://alpha.gnu.org/gnu/emacs/pretest/emacs-$NEW.tar.gz> |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
36 <ftp://alpha.gnu.org/gnu/emacs/pretest/leim-$NEW.tar.gz> |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
37 |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
38 Please report results from compiling and running the pretest to |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
39 <emacs-pretest-bug@gnu.org>. Your feedback is necessary for us |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
40 to know on which platforms the pretest has been tried. |
48817
8bbce2893414
Ask about LEIM in the announcement.
Francesco Potortì <pot@gnu.org>
parents:
48804
diff
changeset
|
41 Please say whether you built with LEIM or not. |
48804
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
42 |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
43 If you have the tars from the previous pretest, and you have the |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
44 \`xdelta' utility, you can instead download the much smaller |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
45 |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
46 <ftp://alpha.gnu.org/gnu/emacs/pretest/emacs-$OLD-$NEW.xdelta> |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
47 <ftp://alpha.gnu.org/gnu/emacs/pretest/leim-$OLD-$NEW.xdelta> |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
48 |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
49 You can use a command like |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
50 |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
51 $ xdelta patch XDELTA PREVIOUS-TAR CURRENT-TAR |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
52 |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
53 to generate the new tar from the old one, where XDELTA is the xdelta |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
54 file you downloaded, PREVIOUS-TAR is the tar file from the previous |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
55 pretest, and CURRENT-TAR is the name of the tar file you downloaded. |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
56 |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
57 Information about xdelta can be found on the GNU ftp site, in |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
58 /non-gnu/xdelta.README. |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
59 |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
60 Changes since $OLD |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
61 |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
62 EOF |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
63 |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
64 cvs -q diff -b -r $oldtag -r $newtag $(find -name ChangeLog|sort) | |
49344 | 65 sed -n -e 's/^=\+/======/p' -e 's/^> //p' -e 's/^diff.*//p' \ |
66 -e 's/^RCS file: .cvsroot.emacs.emacs.\(.*\),v/\1/p' | | |
67 sed -n -e "/^======$/ { | |
68 N | |
69 N | |
70 h | |
71 d | |
72 } | |
73 H | |
74 s/.*// | |
75 x | |
76 s/^\n// | |
77 p" | |
48804
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
78 |
32e11c5dadbe
A script that creates the announcement for a pretest.
Francesco Potortì <pot@gnu.org>
parents:
diff
changeset
|
79 echo " announcement created in $outfile" >&2 |