aboutsummaryrefslogtreecommitdiffstats
path: root/admin
diff options
context:
space:
mode:
Diffstat (limited to 'admin')
-rw-r--r--admin/CPP-DEFINES2
-rw-r--r--admin/ChangeLog105
-rw-r--r--admin/MAINTAINERS1
-rw-r--r--admin/README4
-rw-r--r--admin/admin.el35
-rw-r--r--admin/alloc-colors.c6
-rwxr-xr-xadmin/build-configs4
-rw-r--r--admin/bzrmerge.el323
-rw-r--r--admin/charsets/Makefile3
-rw-r--r--admin/charsets/big5.awk3
-rw-r--r--admin/charsets/compact.awk3
-rw-r--r--admin/charsets/cp51932.awk6
-rw-r--r--admin/charsets/cp932.awk3
-rw-r--r--admin/charsets/eucjp-ms.awk5
-rw-r--r--admin/charsets/gb180302.awk3
-rw-r--r--admin/charsets/gb180304.awk3
-rw-r--r--admin/charsets/kuten.awk1
-rwxr-xr-xadmin/charsets/mapconv3
-rw-r--r--admin/charsets/mapfiles/README4
-rw-r--r--admin/charsets/mule-charsets.el3
-rwxr-xr-xadmin/check-doc-strings1
-rw-r--r--admin/cus-test.el4
-rwxr-xr-xadmin/diff-tar-files6
-rw-r--r--admin/emacs-pretesters1
-rwxr-xr-xadmin/make-announcement4
-rwxr-xr-xadmin/make-changelog-diff1
-rwxr-xr-xadmin/make-emacs5
-rw-r--r--admin/make-tarball.txt25
-rw-r--r--admin/notes/bugtracker47
-rw-r--r--admin/notes/bzr81
-rw-r--r--admin/notes/copyright39
-rw-r--r--admin/notes/elpa42
-rw-r--r--admin/notes/font-backend3
-rw-r--r--admin/notes/iftc1
-rw-r--r--admin/notes/lel-TODO2
-rw-r--r--admin/notes/multi-tty3
-rw-r--r--admin/notes/trailing-whitespace1
-rw-r--r--admin/notes/unicode3
-rw-r--r--admin/nt/README-UNDUMP.W323
-rw-r--r--admin/nt/README-ftp-server3
-rwxr-xr-xadmin/nt/dump.bat3
-rwxr-xr-xadmin/quick-install-emacs9
-rw-r--r--admin/unidata/.gitignore1
-rw-r--r--admin/unidata/Makefile.in2
-rw-r--r--admin/unidata/bidimirror.awk2
-rw-r--r--admin/unidata/biditype.awk2
-rw-r--r--admin/unidata/copyright.html3
-rw-r--r--admin/unidata/makefile.w32-in2
-rw-r--r--admin/unidata/unidata-gen.el5
49 files changed, 681 insertions, 143 deletions
diff --git a/admin/CPP-DEFINES b/admin/CPP-DEFINES
index b5f4d555ad4..7febc93bb33 100644
--- a/admin/CPP-DEFINES
+++ b/admin/CPP-DEFINES
@@ -62,7 +62,6 @@ SIGTYPE
62SYSTEM_TYPE 62SYSTEM_TYPE
63 63
64** Machine specific macros, decribed in detail in src/m/template.h 64** Machine specific macros, decribed in detail in src/m/template.h
65EXPLICIT_SIGN_EXTEND
66LOAD_AVE_CVT 65LOAD_AVE_CVT
67LOAD_AVE_TYPE 66LOAD_AVE_TYPE
68VIRT_ADDR_VARIES 67VIRT_ADDR_VARIES
@@ -383,4 +382,3 @@ wait
383write 382write
384xfree 383xfree
385 384
386# arch-tag: bc80061a-1168-4911-9766-46aaf2640250
diff --git a/admin/ChangeLog b/admin/ChangeLog
index 6d114eae003..46dbaa0da26 100644
--- a/admin/ChangeLog
+++ b/admin/ChangeLog
@@ -1,3 +1,102 @@
12011-02-03 Glenn Morris <rgm@gnu.org>
2
3 * bzrmerge.el (bzrmerge-buffer): New constant.
4 (bzrmerge-merges, bzrmerge-missing, bzrmerge-apply): Use it.
5 (bzrmerge-missing): If nothing to do, return nil not (nil).
6 (bzrmerge-apply): Remove odd character from message.
7 (bzrmerge): Give status messages.
8
92011-01-31 Eli Zaretskii <eliz@gnu.org>
10
11 * admin.el (set-version): Remove lib-src/makefile.w32-in.
12 Add nt/config.nt.
13
142011-01-31 Paul Eggert <eggert@cs.ucla.edu>
15
16 src/emacs.c now gets version number from configure.in
17 * admin.el (set-version): Don't update src/emacs.c.
18 * quick-install-emacs (VERSION): Get it from configure.in, not from
19 src/emacs.c.
20
212011-01-30 Paul Eggert <eggert@cs.ucla.edu>
22
23 strftime: import from gnulib
24 * notes/copyright: strftime.c moved from src to lib.
25
262011-01-25 Glenn Morris <rgm@gnu.org>
27
28 * bzrmerge.el (bzrmerge-skip-regexp): New variable.
29 (bzrmerge-missing): Use it.
30
312011-01-19 Paul Eggert <eggert@cs.ucla.edu>
32
33 * make-tarball.txt: Suggest 'autoreconf -I m4 --force'
34 rather than doing rm and autoconf by hand. See
35 <http://lists.gnu.org/archive/html/emacs-devel/2011-01/msg00673.html>.
36
372011-01-17 Paul Eggert <eggert@cs.ucla.edu>
38
39 * notes/bzr (Installing changes from gnulib): New section.
40 Need for this suggested by Stefan Monnier.
41
422011-01-17 Stefan Monnier <monnier@iro.umontreal.ca>
43
44 * bzrmerge.el (bzrmerge-apply): Warn the user when the tree might be in
45 an inconsistent state.
46
472011-01-17 Paul Eggert <eggert@cs.ucla.edu>
48
49 Update copyright notes to match recent gnulib-related changes.
50 * notes/copyright: Add aclocal.m4, m4/*.m4, lib/Makefile.in,
51 arg-nonnull.h, c++defs.h, compile, depcomp, missing,
52 warn-on-use.h, lib/*.[ch], lib/gnulib.mk. Remove src/mktime.c,
53 lib-src/getopt1.c, lib-src/getopt_int.h (files are now in lib and
54 are subsumed by the lib/*.[ch] rule). Remove m4/getopt.m4 (now
55 subsumed by m4/*.m4 rule). config.guess, config.sub, and
56 doc/man/texinfo.tex are now copied in from gnulib.
57
582011-01-15 Glenn Morris <rgm@gnu.org>
59
60 * charsets/cp51932.awk, charsets/eucjp-ms.awk: No longer print arch-tag.
61
62 * bzrmerge.el (bzrmerge-missing): Add another skip indicator.
63 (bzrmerge-resolve): Also ignore cl-loaddefs.el.
64
652011-01-14 Glenn Morris <rgm@gnu.org>
66
67 * admin.el (set-copyright): Also handle \year in refcards/*.tex.
68
692011-01-14 Glenn Morris <rgm@gnu.org>
70
71 * bzrmerge.el: Require cl when compiling.
72 (bzrmerge-merges): Doc fix.
73
742011-01-07 Paul Eggert <eggert@cs.ucla.edu>
75
76 * notes/copyright: There's only one install-sh, not two, so fix a
77 typo claiming that there's two. Add move-if-change to the list of
78 GPL files imported from gnulib.
79
802011-01-07 Paul Eggert <eggert@cs.ucla.edu>
81
82 * notes/copyright: Report status more accurately for non-GPL files.
83 Report copyright status more accurately for mkinstalldirs,
84 configure, m4/getopt.m4, and msdos/sed*.inp.
85
862011-01-02 Eli Zaretskii <eliz@gnu.org>
87
88 * nt/README.W32: Update the information about PNG support libraries.
89 (Bug#7716)
90
912010-12-27 Stefan Monnier <monnier@iro.umontreal.ca>
92
93 * bzrmerge.el: New file to help merge branches while skipping
94 some revisions (e.g. from emacs-23 to trunk).
95
962010-12-03 Andreas Schwab <schwab@linux-m68k.org>
97
98 * CPP-DEFINES (EXPLICIT_SIGN_EXTEND): Remove.
99
12010-10-12 Glenn Morris <rgm@gnu.org> 1002010-10-12 Glenn Morris <rgm@gnu.org>
2 101
3 * notes/nextstep: Move here from ../nextstep/DEV-NOTES. 102 * notes/nextstep: Move here from ../nextstep/DEV-NOTES.
@@ -963,11 +1062,9 @@
963 1062
964;; Local Variables: 1063;; Local Variables:
965;; coding: utf-8 1064;; coding: utf-8
966;; add-log-time-zone-rule: t
967;; End: 1065;; End:
968 1066
969 Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 1067 Copyright (C) 2001-2011 Free Software Foundation, Inc.
970 2008, 2009, 2010 Free Software Foundation, Inc.
971 1068
972 This file is part of GNU Emacs. 1069 This file is part of GNU Emacs.
973 1070
@@ -983,5 +1080,3 @@
983 1080
984 You should have received a copy of the GNU General Public License 1081 You should have received a copy of the GNU General Public License
985 along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. 1082 along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
986
987;;; arch-tag: 97728c77-77c0-4156-b669-0e8c07d94e5a
diff --git a/admin/MAINTAINERS b/admin/MAINTAINERS
index 432e4f5cf9f..1d988a25626 100644
--- a/admin/MAINTAINERS
+++ b/admin/MAINTAINERS
@@ -216,4 +216,3 @@ src/xrdb.c
216src/xselect.c 216src/xselect.c
217src/xterm.c 217src/xterm.c
218 218
219;;; arch-tag: 869126d4-4851-41b2-8470-14dd492a3c98
diff --git a/admin/README b/admin/README
index 694f206baaf..4dd1705fe74 100644
--- a/admin/README
+++ b/admin/README
@@ -1,5 +1,4 @@
1Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 1Copyright (C) 2001-2011 Free Software Foundation, Inc.
2 2010 Free Software Foundation, Inc.
3See the end of the file for license conditions. 2See the end of the file for license conditions.
4 3
5 4
@@ -90,4 +89,3 @@ mode: outline
90paragraph-separate: "[ ]*$" 89paragraph-separate: "[ ]*$"
91end: 90end:
92 91
93# arch-tag: 812b9461-bc0a-46a7-925e-24bd41118463
diff --git a/admin/admin.el b/admin/admin.el
index 7cd2c02fb58..9f87e9b2590 100644
--- a/admin/admin.el
+++ b/admin/admin.el
@@ -1,7 +1,6 @@
1;;; admin.el --- utilities for Emacs administration 1;;; admin.el --- utilities for Emacs administration
2 2
3;; Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 3;; Copyright (C) 2001-2011 Free Software Foundation, Inc.
4;; 2010 Free Software Foundation, Inc.
5 4
6;; This file is part of GNU Emacs. 5;; This file is part of GNU Emacs.
7 6
@@ -60,9 +59,6 @@ Root must be the root of an Emacs source tree."
60 (interactive "DEmacs root directory: \nsVersion number: ") 59 (interactive "DEmacs root directory: \nsVersion number: ")
61 (unless (file-exists-p (expand-file-name "src/emacs.c" root)) 60 (unless (file-exists-p (expand-file-name "src/emacs.c" root))
62 (error "%s doesn't seem to be the root of an Emacs source tree" root)) 61 (error "%s doesn't seem to be the root of an Emacs source tree" root))
63 (set-version-in-file root "src/emacs.c" version
64 (rx (and "emacs_version" (0+ (not (in ?\")))
65 ?\" (submatch (1+ (not (in ?\")))) ?\")))
66 (set-version-in-file root "README" version 62 (set-version-in-file root "README" version
67 (rx (and "version" (1+ space) 63 (rx (and "version" (1+ space)
68 (submatch (1+ (in "0-9.")))))) 64 (submatch (1+ (in "0-9."))))))
@@ -77,8 +73,9 @@ Root must be the root of an Emacs source tree."
77 (rx (and ".TH EMACS" (1+ not-newline) 73 (rx (and ".TH EMACS" (1+ not-newline)
78 "GNU Emacs" (1+ space) 74 "GNU Emacs" (1+ space)
79 (submatch (1+ (in "0-9.")))))) 75 (submatch (1+ (in "0-9."))))))
80 (set-version-in-file root "lib-src/makefile.w32-in" version 76 (set-version-in-file root "nt/config.nt" version
81 (rx (and "VERSION" (0+ space) "=" (0+ space) 77 (rx (and bol "#" (0+ blank) "define" (1+ blank)
78 "VERSION" (1+ blank)
82 (submatch (1+ (in "0-9.")))))) 79 (submatch (1+ (in "0-9."))))))
83 (set-version-in-file root "nt/makefile.w32-in" version 80 (set-version-in-file root "nt/makefile.w32-in" version
84 (rx (and "VERSION" (0+ space) "=" (0+ space) 81 (rx (and "VERSION" (0+ space) "=" (0+ space)
@@ -160,7 +157,6 @@ Root must be the root of an Emacs source tree."
160 version (rx (and "Version=" (submatch (1+ (in "0-9."))))))) 157 version (rx (and "Version=" (submatch (1+ (in "0-9.")))))))
161 158
162;; Note this makes some assumptions about form of short copyright. 159;; Note this makes some assumptions about form of short copyright.
163;; FIXME add the \year in the refcards/*.tex files.
164(defun set-copyright (root copyright) 160(defun set-copyright (root copyright)
165 "Set Emacs short copyright to COPYRIGHT in relevant files under ROOT. 161 "Set Emacs short copyright to COPYRIGHT in relevant files under ROOT.
166Root must be the root of an Emacs source tree." 162Root must be the root of an Emacs source tree."
@@ -174,16 +170,16 @@ Root must be the root of an Emacs source tree."
174 (error "%s doesn't seem to be the root of an Emacs source tree" root)) 170 (error "%s doesn't seem to be the root of an Emacs source tree" root))
175 (set-version-in-file root "src/emacs.c" copyright 171 (set-version-in-file root "src/emacs.c" copyright
176 (rx (and "emacs_copyright" (0+ (not (in ?\"))) 172 (rx (and "emacs_copyright" (0+ (not (in ?\")))
177 ?\" (submatch (1+ (not (in ?\")))) ?\"))) 173 ?\" (submatch (1+ (not (in ?\")))) ?\")))
178 (set-version-in-file root "lib-src/ebrowse.c" copyright 174 (set-version-in-file root "lib-src/ebrowse.c" copyright
179 (rx (and "emacs_copyright" (0+ (not (in ?\"))) 175 (rx (and "emacs_copyright" (0+ (not (in ?\")))
180 ?\" (submatch (1+ (not (in ?\")))) ?\"))) 176 ?\" (submatch (1+ (not (in ?\")))) ?\")))
181 (set-version-in-file root "lib-src/etags.c" copyright 177 (set-version-in-file root "lib-src/etags.c" copyright
182 (rx (and "emacs_copyright" (0+ (not (in ?\"))) 178 (rx (and "emacs_copyright" (0+ (not (in ?\")))
183 ?\" (submatch (1+ (not (in ?\")))) ?\"))) 179 ?\" (submatch (1+ (not (in ?\")))) ?\")))
184 (set-version-in-file root "lib-src/rcs2log" copyright 180 (set-version-in-file root "lib-src/rcs2log" copyright
185 (rx (and "Copyright" (0+ space) ?= (0+ space) 181 (rx (and "Copyright" (0+ space) ?= (0+ space)
186 ?\' (submatch (1+ nonl))))) 182 ?\' (submatch (1+ nonl)))))
187 ;; This one is a nuisance, as it needs to be split over two lines. 183 ;; This one is a nuisance, as it needs to be split over two lines.
188 (string-match "\\(.*[0-9]\\{4\\} *\\)\\(.*\\)" copyright) 184 (string-match "\\(.*[0-9]\\{4\\} *\\)\\(.*\\)" copyright)
189 ;; nextstep. 185 ;; nextstep.
@@ -199,7 +195,18 @@ Root must be the root of an Emacs source tree."
199 (set-version-in-file 195 (set-version-in-file
200 root "nextstep/GNUstep/Emacs.base/Resources/Info-gnustep.plist" 196 root "nextstep/GNUstep/Emacs.base/Resources/Info-gnustep.plist"
201 copyright (rx (and "Copyright" (0+ space) ?\= (0+ space) 197 copyright (rx (and "Copyright" (0+ space) ?\= (0+ space)
202 ?\" (submatch (1+ (not (in ?\")))))))) 198 ?\" (submatch (1+ (not (in ?\")))))))
199 (when (string-match "\\([0-9]\\{4\\}\\)" copyright)
200 (setq copyright (match-string 1 copyright))
201 (dolist (file (directory-files (expand-file-name "etc/refcards" root)
202 t "\\.tex\\'"))
203 (unless (string-match "gnus-refcard\\.tex" file)
204 (set-version-in-file
205 root file copyright
206 (concat (if (string-match "ru-refcard\\.tex" file)
207 "\\\\newcommand{\\\\cyear}\\[0\\]{"
208 "\\\\def\\\\year{")
209 "\\([0-9]\\{4\\}\\)}.+%.+copyright year"))))))
203 210
204(provide 'admin) 211(provide 'admin)
205 212
diff --git a/admin/alloc-colors.c b/admin/alloc-colors.c
index 8ff699382a0..e09ddd62b97 100644
--- a/admin/alloc-colors.c
+++ b/admin/alloc-colors.c
@@ -1,6 +1,6 @@
1/* Allocate X colors. Used for testing with dense colormaps. 1/* Allocate X colors. Used for testing with dense colormaps.
2 Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010 2
3 Free Software Foundation, Inc. 3Copyright (C) 2001-2011 Free Software Foundation, Inc.
4 4
5This file is part of GNU Emacs. 5This file is part of GNU Emacs.
6 6
@@ -112,5 +112,3 @@ main (int argc, char **argv)
112 return 0; 112 return 0;
113} 113}
114 114
115/* arch-tag: f1be90ac-5b70-43c2-835e-5a6432a25145
116 (do not change this comment) */
diff --git a/admin/build-configs b/admin/build-configs
index e20024ff666..79ba58aeec0 100755
--- a/admin/build-configs
+++ b/admin/build-configs
@@ -1,8 +1,7 @@
1#! /usr/bin/perl 1#! /usr/bin/perl
2# Build Emacs in several different configurations. 2# Build Emacs in several different configurations.
3 3
4# Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010 4# Copyright (C) 2001-2011 Free Software Foundation, Inc.
5# Free Software Foundation, Inc.
6 5
7# This file is part of GNU Emacs. 6# This file is part of GNU Emacs.
8 7
@@ -97,4 +96,3 @@ foreach $config (@configs)
97# mode: cperl 96# mode: cperl
98# End: 97# End:
99 98
100# arch-tag: 20a4452d-610a-4e54-9abc-ffe79f5c0d30
diff --git a/admin/bzrmerge.el b/admin/bzrmerge.el
new file mode 100644
index 00000000000..350f3795c52
--- /dev/null
+++ b/admin/bzrmerge.el
@@ -0,0 +1,323 @@
1;;; bzrmerge.el --- help merge one Emacs bzr branch to another
2
3;; Copyright (C) 2010-2011 Free Software Foundation, Inc.
4
5;; Author: Stefan Monnier <monnier@iro.umontreal.ca>
6;; Keywords:
7
8;; GNU Emacs is free software: you can redistribute it and/or modify
9;; it under the terms of the GNU General Public License as published by
10;; the Free Software Foundation, either version 3 of the License, or
11;; (at your option) any later version.
12
13;; GNU Emacs is distributed in the hope that it will be useful,
14;; but WITHOUT ANY WARRANTY; without even the implied warranty of
15;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16;; GNU General Public License for more details.
17
18;; You should have received a copy of the GNU General Public License
19;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
20
21;;; Commentary:
22
23;; Some usage notes are in admin/notes/bzr.
24
25;;; Code:
26
27(eval-when-compile
28 (require 'cl)) ; assert
29
30(defvar bzrmerge-skip-regexp
31 "back[- ]?port\\|merge\\|sync\\|re-?generate\\|bump version"
32 "Regexp matching logs of revisions that might be skipped.
33`bzrmerge-missing' will ask you if it should skip any matches.")
34
35(defconst bzrmerge-buffer "*bzrmerge*"
36 "Working buffer for bzrmerge.")
37
38(defun bzrmerge-merges ()
39 "Return the list of already merged (not yet committed) revisions.
40The list returned is sorted by oldest-first."
41 (with-current-buffer (get-buffer-create bzrmerge-buffer)
42 (erase-buffer)
43 ;; We generally want to make sure we start with a clean tree, but we also
44 ;; want to allow restarts (i.e. with some part of FROM already merged but
45 ;; not yet committed).
46 (call-process "bzr" nil t nil "status" "-v")
47 (goto-char (point-min))
48 (when (re-search-forward "^conflicts:\n" nil t)
49 (error "You still have unresolved conflicts"))
50 (let ((merges ()))
51 (if (not (re-search-forward "^pending merges:\n" nil t))
52 (when (save-excursion
53 (goto-char (point-min))
54 (re-search-forward "^[a-z ]*:\n" nil t))
55 (error "You still have uncommitted changes"))
56 ;; This is really stupid, but it seems there's no easy way to figure
57 ;; out which revisions have been merged already. The only info I can
58 ;; find is the "pending merges" from "bzr status -v", which is not
59 ;; very machine-friendly.
60 (while (not (eobp))
61 (skip-chars-forward " ")
62 (push (buffer-substring (point) (line-end-position)) merges)
63 (forward-line 1)))
64 merges)))
65
66(defun bzrmerge-check-match (merge)
67 ;; Make sure the MERGES match the revisions on the FROM branch.
68 ;; Stupidly the best form of MERGES I can find is the one from
69 ;; "bzr status -v" which is very machine non-friendly, so I have
70 ;; to do some fuzzy matching.
71 (let ((author
72 (or
73 (save-excursion
74 (if (re-search-forward "^author: *\\([^<]*[^ ]\\) +<.*"
75 nil t)
76 (match-string 1)))
77 (save-excursion
78 (if (re-search-forward
79 "^committer: *\\([^<]*[^< ]\\) +<" nil t)
80 (match-string 1)))))
81 (timestamp
82 (save-excursion
83 (if (re-search-forward
84 "^timestamp:[^0-9]*\\([-0-9]+\\)" nil t)
85 (match-string 1))))
86 (line1
87 (save-excursion
88 (if (re-search-forward "^message:[ \n]*" nil t)
89 (buffer-substring (point) (line-end-position))))))
90 ;; The `merge' may have a truncated line1 with "...", so get
91 ;; rid of any "..." and then look for a prefix match.
92 (when (string-match "\\.+\\'" merge)
93 (setq merge (substring merge 0 (match-beginning 0))))
94 (or (string-prefix-p
95 merge (concat author " " timestamp " " line1))
96 (string-prefix-p
97 merge (concat author " " timestamp " [merge] " line1)))))
98
99(defun bzrmerge-missing (from merges)
100 "Return the list of revisions that need to be merged.
101MERGES is the revisions already merged but not yet committed.
102Asks about skipping revisions with logs matching `bzrmerge-skip-regexp'.
103The result is of the form (TOMERGE . TOSKIP) where TOMERGE and TOSKIP
104are both lists of revnos, in oldest-first order."
105 (with-current-buffer (get-buffer-create bzrmerge-buffer)
106 (erase-buffer)
107 (call-process "bzr" nil t nil "missing" "--theirs-only"
108 (expand-file-name from))
109 (let ((revnos ()) (skipped ()))
110 (pop-to-buffer (current-buffer))
111 (goto-char (point-max))
112 (while (re-search-backward "^------------------------------------------------------------\nrevno: \\([0-9.]+\\).*" nil t)
113 (save-excursion
114 (if merges
115 (while (not (bzrmerge-check-match (pop merges)))
116 (unless merges
117 (error "Unmatched tip of merged revisions")))
118 (let ((case-fold-search t)
119 (revno (match-string 1))
120 (skip nil))
121 (if (string-match "\\." revno)
122 (error "Unexpected dotted revno!")
123 (setq revno (string-to-number revno)))
124 (re-search-forward "^message:\n")
125 (while (and (not skip)
126 (re-search-forward bzrmerge-skip-regexp nil t))
127 (let ((str (buffer-substring (line-beginning-position)
128 (line-end-position))))
129 (when (string-match "\\` *" str)
130 (setq str (substring str (match-end 0))))
131 (when (string-match "[.!;, ]+\\'" str)
132 (setq str (substring str 0 (match-beginning 0))))
133 (if (save-excursion (y-or-n-p (concat str ": Skip? ")))
134 (setq skip t))))
135 (if skip
136 (push revno skipped)
137 (push revno revnos)))))
138 (delete-region (point) (point-max)))
139 (and (or revnos skipped)
140 (cons (nreverse revnos) (nreverse skipped))))))
141
142(defun bzrmerge-resolve (file)
143 (unless (file-exists-p file) (error "Bzrmerge-resolve: Can't find %s" file))
144 (with-demoted-errors
145 (let ((exists (find-buffer-visiting file)))
146 (with-current-buffer (find-file-noselect file)
147 (if (buffer-modified-p)
148 (error "Unsaved changes in %s" (current-buffer)))
149 (save-excursion
150 (cond
151 ((derived-mode-p 'change-log-mode)
152 ;; Fix up dates before resolving the conflicts.
153 (goto-char (point-min))
154 (let ((diff-auto-refine-mode nil))
155 (while (re-search-forward smerge-begin-re nil t)
156 (smerge-match-conflict)
157 (smerge-ensure-match 3)
158 (let ((start1 (match-beginning 1))
159 (end1 (match-end 1))
160 (start3 (match-beginning 3))
161 (end3 (copy-marker (match-end 3) t)))
162 (goto-char start3)
163 (while (re-search-forward change-log-start-entry-re end3 t)
164 (let* ((str (match-string 0))
165 (newstr (save-match-data
166 (concat (add-log-iso8601-time-string)
167 (when (string-match " *\\'" str)
168 (match-string 0 str))))))
169 (replace-match newstr t t)))
170 ;; change-log-resolve-conflict prefers to put match-1's
171 ;; elements first (for equal dates), whereas we want to put
172 ;; match-3's first.
173 (let ((match3 (buffer-substring start3 end3))
174 (match1 (buffer-substring start1 end1)))
175 (delete-region start3 end3)
176 (goto-char start3)
177 (insert match1)
178 (delete-region start1 end1)
179 (goto-char start1)
180 (insert match3)))))
181 ;; (pop-to-buffer (current-buffer)) (debug 'before-resolve)
182 ))
183 ;; Try to resolve the conflicts.
184 (cond
185 ((member file '("configure" "lisp/ldefs-boot.el"
186 "lisp/emacs-lisp/cl-loaddefs.el"))
187 (call-process "bzr" nil t nil "revert" file)
188 (revert-buffer nil 'noconfirm))
189 (t
190 (goto-char (point-max))
191 (while (re-search-backward smerge-begin-re nil t)
192 (save-excursion
193 (ignore-errors
194 (smerge-match-conflict)
195 (smerge-resolve))))
196 ;; (when (derived-mode-p 'change-log-mode)
197 ;; (pop-to-buffer (current-buffer)) (debug 'after-resolve))
198 (save-buffer)))
199 (goto-char (point-min))
200 (prog1 (re-search-forward smerge-begin-re nil t)
201 (unless exists (kill-buffer))))))))
202
203(defun bzrmerge-add-metadata (from endrevno)
204 "Add the metadata for a merge of FROM upto ENDREVNO.
205Does not make other difference."
206 (if (with-temp-buffer
207 (call-process "bzr" nil t nil "status")
208 (goto-char (point-min))
209 (re-search-forward "^conflicts:\n" nil t))
210 (error "Don't know how to add metadata in the presence of conflicts")
211 (call-process "bzr" nil t nil "shelve" "--all"
212 "-m" "Bzrmerge shelved merge during skipping")
213 (call-process "bzr" nil t nil "revert")
214 (call-process "bzr" nil t nil
215 "merge" "-r" (format "%s" endrevno) from)
216 (call-process "bzr" nil t nil "revert" ".")
217 (call-process "bzr" nil t nil "unshelve")))
218
219(defvar bzrmerge-already-done nil)
220
221(defun bzrmerge-apply (missing from)
222 (setq from (expand-file-name from))
223 (with-current-buffer (get-buffer-create bzrmerge-buffer)
224 (erase-buffer)
225 (when (equal (cdr bzrmerge-already-done) (list from missing))
226 (setq missing (car bzrmerge-already-done)))
227 (setq bzrmerge-already-done nil)
228 (let ((merge (car missing))
229 (skip (cdr missing))
230 (unsafe nil)
231 beg end)
232 (when (or merge skip)
233 (cond
234 ((and skip (or (null merge) (< (car skip) (car merge))))
235 ;; Do a "skip" (i.e. merge the meta-data only).
236 (setq beg (1- (car skip)))
237 (while (and skip (or (null merge) (< (car skip) (car merge))))
238 (assert (> (car skip) (or end beg)))
239 (setq end (pop skip)))
240 (message "Skipping %s..%s" beg end)
241 (bzrmerge-add-metadata from end))
242
243 (t
244 ;; Do a "normal" merge.
245 (assert (or (null skip) (< (car merge) (car skip))))
246 (setq beg (1- (car merge)))
247 (while (and merge (or (null skip) (< (car merge) (car skip))))
248 (assert (> (car merge) (or end beg)))
249 (setq end (pop merge)))
250 (message "Merging %s..%s" beg end)
251 (if (with-temp-buffer
252 (call-process "bzr" nil t nil "status")
253 (zerop (buffer-size)))
254 (call-process "bzr" nil t nil
255 "merge" "-r" (format "%s" end) from)
256 ;; Stupidly, "bzr merge --force -r A..B" dos not maintain the
257 ;; metadata properly except when the checkout is clean.
258 (call-process "bzr" nil t nil "merge"
259 "--force" "-r" (format "%s..%s" beg end) from)
260 ;; The merge did not update the metadata, so force the next time
261 ;; around to update it (as a "skip").
262 (setq unsafe t)
263 (push end skip))
264 (pop-to-buffer (current-buffer))
265 (sit-for 1)
266 ;; (debug 'after-merge)
267 ;; Check the conflicts.
268 (let ((conflicted nil)
269 (files ()))
270 (goto-char (point-min))
271 (when (re-search-forward "bzr: ERROR:" nil t)
272 (error "Internal Bazaar error!!"))
273 (while (re-search-forward "^Text conflict in " nil t)
274 (push (buffer-substring (point) (line-end-position)) files))
275 (if (re-search-forward "^\\([0-9]+\\) conflicts encountered" nil t)
276 (if (/= (length files) (string-to-number (match-string 1)))
277 (setq conflicted t))
278 (if files (setq conflicted t)))
279 (dolist (file files)
280 (if (bzrmerge-resolve file)
281 (setq conflicted t)))
282 (when conflicted
283 (setq bzrmerge-already-done
284 (list (cons merge skip) from missing))
285 (if unsafe
286 ;; FIXME: Obviously, we'd rather make it right rather
287 ;; than output such a warning. But I don't know how to add
288 ;; the metadata to bzr's since the technique used in
289 ;; bzrmerge-add-metadata does not work when there
290 ;; are conflicts.
291 (display-warning 'bzrmerge "Resolve conflicts manually.
292¡BEWARE! Important metadata is kept in this Emacs session!
293Do not commit without re-running `M-x bzrmerge' first!"))
294 (error "Resolve conflicts manually")))))
295 (cons merge skip)))))
296
297(defun bzrmerge (from)
298 "Merge from branch FROM into `default-directory'."
299 (interactive
300 (list
301 (let ((def
302 (with-temp-buffer
303 (call-process "bzr" nil t nil "info")
304 (goto-char (point-min))
305 (when (re-search-forward "submit branch: *" nil t)
306 (buffer-substring (point) (line-end-position))))))
307 (read-file-name "From branch: " nil nil nil def))))
308 (message "Merging from %s..." from)
309 (require 'vc-bzr)
310 (let ((default-directory (or (vc-bzr-root default-directory)
311 (error "Not in a Bzr tree"))))
312 ;; First, check the status.
313 (let* ((merges (bzrmerge-merges))
314 ;; OK, we have the status, now check the missing data.
315 (missing (bzrmerge-missing from merges)))
316 (if (not missing)
317 (message "Merging from %s...nothing to merge" from)
318 (while missing
319 (setq missing (bzrmerge-apply missing from)))
320 (message "Merging from %s...done" from)))))
321
322(provide 'bzrmerge)
323;;; bzrmerge.el ends here
diff --git a/admin/charsets/Makefile b/admin/charsets/Makefile
index a93b18b63cc..b16e7ccd748 100644
--- a/admin/charsets/Makefile
+++ b/admin/charsets/Makefile
@@ -1,5 +1,5 @@
1# Makefile -- Makefile to generate charset maps in etc/charsets. 1# Makefile -- Makefile to generate charset maps in etc/charsets.
2# Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010 2# Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011
3# National Institute of Advanced Industrial Science and Technology (AIST) 3# National Institute of Advanced Industrial Science and Technology (AIST)
4# Registration Number H13PRO009 4# Registration Number H13PRO009
5# 5#
@@ -307,4 +307,3 @@ install:
307clean: 307clean:
308 rm -f ${CHARSETS} ${TRANS_TABLE} 308 rm -f ${CHARSETS} ${TRANS_TABLE}
309 309
310# arch-tag: 90b3bf30-1fef-45bf-b30c-665c30c22310
diff --git a/admin/charsets/big5.awk b/admin/charsets/big5.awk
index a0113a6677c..7482d11a2d1 100644
--- a/admin/charsets/big5.awk
+++ b/admin/charsets/big5.awk
@@ -1,4 +1,4 @@
1# Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010 1# Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011
2# National Institute of Advanced Industrial Science and Technology (AIST) 2# National Institute of Advanced Industrial Science and Technology (AIST)
3# Registration Number H13PRO009 3# Registration Number H13PRO009
4 4
@@ -70,4 +70,3 @@ function decode_big5(big5) {
70} 70}
71 71
72 72
73# arch-tag: 36f08d21-0d24-4b67-852d-a9a51299586d
diff --git a/admin/charsets/compact.awk b/admin/charsets/compact.awk
index f84715e1d8d..b7d1fd19d8e 100644
--- a/admin/charsets/compact.awk
+++ b/admin/charsets/compact.awk
@@ -1,5 +1,5 @@
1# compact.awk -- Make charset map compact. 1# compact.awk -- Make charset map compact.
2# Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010 2# Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011
3# National Institute of Advanced Industrial Science and Technology (AIST) 3# National Institute of Advanced Industrial Science and Technology (AIST)
4# Registration Number H13PRO009 4# Registration Number H13PRO009
5 5
@@ -120,4 +120,3 @@ END {
120 } 120 }
121} 121}
122 122
123# arch-tag: 7e6f57c3-8e62-4af3-8916-ca67bca3a0ce
diff --git a/admin/charsets/cp51932.awk b/admin/charsets/cp51932.awk
index 387f314fe37..39ccc1c7dc1 100644
--- a/admin/charsets/cp51932.awk
+++ b/admin/charsets/cp51932.awk
@@ -1,5 +1,5 @@
1# cp51932.awk -- Generate a translation table for CP51932. 1# cp51932.awk -- Generate a translation table for CP51932.
2# Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010 2# Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011
3# National Institute of Advanced Industrial Science and Technology (AIST) 3# National Institute of Advanced Industrial Science and Technology (AIST)
4# Registration Number H13PRO009 4# Registration Number H13PRO009
5 5
@@ -52,8 +52,4 @@ END {
52 print " (setcar x (cdr x)) (setcdr x tmp)))"; 52 print " (setcar x (cdr x)) (setcdr x tmp)))";
53 print " map)"; 53 print " map)";
54 print " (define-translation-table 'cp51932-encode map))"; 54 print " (define-translation-table 'cp51932-encode map))";
55 print "";
56 print ";; arch-tag: d21c06e5-a548-4dda-8802-c2922ff19da3";
57} 55}
58
59# arch-tag: bbae996b-2d1c-4e85-bb55-ac30146d7504
diff --git a/admin/charsets/cp932.awk b/admin/charsets/cp932.awk
index 397f025acee..acba0333371 100644
--- a/admin/charsets/cp932.awk
+++ b/admin/charsets/cp932.awk
@@ -1,5 +1,5 @@
1# cp932.awk -- Add sort keys and append user defined area to CP932-2BYTE.map. 1# cp932.awk -- Add sort keys and append user defined area to CP932-2BYTE.map.
2# Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010 2# Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011
3# National Institute of Advanced Industrial Science and Technology (AIST) 3# National Institute of Advanced Industrial Science and Technology (AIST)
4# Registration Number H13PRO009 4# Registration Number H13PRO009
5 5
@@ -114,4 +114,3 @@ END {
114 } 114 }
115} 115}
116 116
117# arch-tag: 998dc444-759d-43ef-87e3-2ab205011394
diff --git a/admin/charsets/eucjp-ms.awk b/admin/charsets/eucjp-ms.awk
index f5876777b01..18c19f5fb55 100644
--- a/admin/charsets/eucjp-ms.awk
+++ b/admin/charsets/eucjp-ms.awk
@@ -1,5 +1,5 @@
1# eucjp-ms.awk -- Generate a translation table for eucJP-ms. 1# eucjp-ms.awk -- Generate a translation table for eucJP-ms.
2# Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010 2# Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011
3# National Institute of Advanced Industrial Science and Technology (AIST) 3# National Institute of Advanced Industrial Science and Technology (AIST)
4# Registration Number H13PRO009 4# Registration Number H13PRO009
5 5
@@ -106,8 +106,5 @@ END {
106 print " (setcar x (cdr x)) (setcdr x tmp)))"; 106 print " (setcar x (cdr x)) (setcdr x tmp)))";
107 print " map)"; 107 print " map)";
108 print " (define-translation-table 'eucjp-ms-encode map))"; 108 print " (define-translation-table 'eucjp-ms-encode map))";
109 print "";
110 print ";; arch-tag: c4191096-288a-4f13-9b2a-ee7a1f11eb4a";
111} 109}
112 110
113# arch-tag: d9cc7af7-2d6e-48cd-8eed-a6d25226de7c
diff --git a/admin/charsets/gb180302.awk b/admin/charsets/gb180302.awk
index fd8748f50be..6cd9521ce90 100644
--- a/admin/charsets/gb180302.awk
+++ b/admin/charsets/gb180302.awk
@@ -1,4 +1,4 @@
1# Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010 1# Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011
2# National Institute of Advanced Industrial Science and Technology (AIST) 2# National Institute of Advanced Industrial Science and Technology (AIST)
3# Registration Number H13PRO009 3# Registration Number H13PRO009
4 4
@@ -98,4 +98,3 @@ END {
98 index_to_gb(from_gb), index_to_gb(to_gb), from_unicode; 98 index_to_gb(from_gb), index_to_gb(to_gb), from_unicode;
99} 99}
100 100
101# arch-tag: d7dbad89-a512-41a4-8ee0-ba1a4505b8c1
diff --git a/admin/charsets/gb180304.awk b/admin/charsets/gb180304.awk
index 43e2b474841..3c16cb556ea 100644
--- a/admin/charsets/gb180304.awk
+++ b/admin/charsets/gb180304.awk
@@ -1,4 +1,4 @@
1# Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010 1# Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011
2# National Institute of Advanced Industrial Science and Technology (AIST) 2# National Institute of Advanced Industrial Science and Technology (AIST)
3# Registration Number H13PRO009 3# Registration Number H13PRO009
4 4
@@ -120,4 +120,3 @@ END {
120 } 120 }
121} 121}
122 122
123# arch-tag: 8e5a22ae-610e-411f-ae17-d6e528b30d71
diff --git a/admin/charsets/kuten.awk b/admin/charsets/kuten.awk
index 9d43f2e0e8f..2bc58c438d0 100644
--- a/admin/charsets/kuten.awk
+++ b/admin/charsets/kuten.awk
@@ -4,4 +4,3 @@
4 printf "0x%02X%02X %s\n", ku, ten, $2; 4 printf "0x%02X%02X %s\n", ku, ten, $2;
5} 5}
6 6
7# arch-tag: dade6b45-b4c5-42ab-9d49-d6bf23a710b6
diff --git a/admin/charsets/mapconv b/admin/charsets/mapconv
index 89943074939..4f7a8b96f54 100755
--- a/admin/charsets/mapconv
+++ b/admin/charsets/mapconv
@@ -1,6 +1,6 @@
1#!/bin/sh 1#!/bin/sh
2 2
3# Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010 3# Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011
4# National Institute of Advanced Industrial Science and Technology (AIST) 4# National Institute of Advanced Industrial Science and Technology (AIST)
5# Registration Number H13PRO009 5# Registration Number H13PRO009
6 6
@@ -143,4 +143,3 @@ else
143 exit 1 143 exit 1
144fi 144fi
145 145
146# arch-tag: c33acb47-7eb6-4872-b871-15e1447e8f0e
diff --git a/admin/charsets/mapfiles/README b/admin/charsets/mapfiles/README
index 3e09cfd098f..c1804af98cd 100644
--- a/admin/charsets/mapfiles/README
+++ b/admin/charsets/mapfiles/README
@@ -1,5 +1,5 @@
1Copyright (C) 2009, 2010 Free Software Foundation, Inc. 1Copyright (C) 2009-2011 Free Software Foundation, Inc.
2Copyright (C) 2009, 2010 2Copyright (C) 2009, 2010, 2011
3 National Institute of Advanced Industrial Science and Technology (AIST) 3 National Institute of Advanced Industrial Science and Technology (AIST)
4 Registration Number H13PRO009 4 Registration Number H13PRO009
5See the end of the file for license conditions. 5See the end of the file for license conditions.
diff --git a/admin/charsets/mule-charsets.el b/admin/charsets/mule-charsets.el
index 07708bcd5a4..59969c3df28 100644
--- a/admin/charsets/mule-charsets.el
+++ b/admin/charsets/mule-charsets.el
@@ -1,5 +1,5 @@
1;; mule-charsets.el -- Generate Mule-orignal charset maps. 1;; mule-charsets.el -- Generate Mule-orignal charset maps.
2;; Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010 2;; Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011
3;; National Institute of Advanced Industrial Science and Technology (AIST) 3;; National Institute of Advanced Industrial Science and Technology (AIST)
4;; Registration Number H13PRO009 4;; Registration Number H13PRO009
5 5
@@ -54,4 +54,3 @@
54 (map-charset-chars 'func (cdr elt)) 54 (map-charset-chars 'func (cdr elt))
55 (write-file (car elt)))) 55 (write-file (car elt))))
56 56
57;;; arch-tag: 515989d7-2e2d-41cc-9163-05ad472fede4
diff --git a/admin/check-doc-strings b/admin/check-doc-strings
index daed2926b20..ef4b203cd79 100755
--- a/admin/check-doc-strings
+++ b/admin/check-doc-strings
@@ -301,4 +301,3 @@ foreach my $fun (sort keys %texi_funtype) {
301 } 301 }
302} 302}
303 303
304# arch-tag: e75331f5-5d1b-4393-ad5b-b0f87b5d47b0
diff --git a/admin/cus-test.el b/admin/cus-test.el
index 35d0412cc43..b254fedccc4 100644
--- a/admin/cus-test.el
+++ b/admin/cus-test.el
@@ -1,7 +1,6 @@
1;;; cus-test.el --- tests for custom types and load problems 1;;; cus-test.el --- tests for custom types and load problems
2 2
3;; Copyright (C) 1998, 2000, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010 3;; Copyright (C) 1998, 2000, 2002-2011 Free Software Foundation, Inc.
4;; Free Software Foundation, Inc.
5 4
6;; Author: Markus Rost <markus.rost@mathematik.uni-regensburg.de> 5;; Author: Markus Rost <markus.rost@mathematik.uni-regensburg.de>
7;; Maintainer: Markus Rost <rost@math.ohio-state.edu> 6;; Maintainer: Markus Rost <rost@math.ohio-state.edu>
@@ -525,5 +524,4 @@ in the Emacs source directory."
525 524
526(provide 'cus-test) 525(provide 'cus-test)
527 526
528;;; arch-tag: a4991a31-548d-48fb-8ba1-1ebbe68eb2e7
529;;; cus-test.el ends here 527;;; cus-test.el ends here
diff --git a/admin/diff-tar-files b/admin/diff-tar-files
index 9858fc00363..59ae1a6f26c 100755
--- a/admin/diff-tar-files
+++ b/admin/diff-tar-files
@@ -1,7 +1,6 @@
1#! /bin/sh 1#! /bin/sh
2 2
3# Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010 3# Copyright (C) 2001-2011 Free Software Foundation, Inc.
4# Free Software Foundation, Inc.
5 4
6# This file is part of GNU Emacs. 5# This file is part of GNU Emacs.
7 6
@@ -40,6 +39,3 @@ tar tzf $old_tar | sed -e 's,^[^/]*,,' | sort > $old_tmp
40tar tzf $new_tar | sed -e 's,^[^/]*,,' | sort > $new_tmp 39tar tzf $new_tar | sed -e 's,^[^/]*,,' | sort > $new_tmp
41diff -u $old_tmp $new_tmp 40diff -u $old_tmp $new_tmp
42rm -f $new_tmp $old_tmp 41rm -f $new_tmp $old_tmp
43
44
45# arch-tag: ef2c96e2-ea67-4668-925c-d9a6f3d205cf
diff --git a/admin/emacs-pretesters b/admin/emacs-pretesters
index 2e1ee64b248..3b1270b477c 100644
--- a/admin/emacs-pretesters
+++ b/admin/emacs-pretesters
@@ -215,4 +215,3 @@ Local Variables:
215mode: text 215mode: text
216End: 216End:
217 217
218# arch-tag: caf47b2c-b56b-44f7-a760-b5bfbed15fd3
diff --git a/admin/make-announcement b/admin/make-announcement
index 37ab76c0f05..dcfd55e8375 100755
--- a/admin/make-announcement
+++ b/admin/make-announcement
@@ -1,7 +1,6 @@
1#! /bin/bash 1#! /bin/bash
2 2
3## Copyright (C) 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 3## Copyright (C) 2002-2011 Free Software Foundation, Inc.
4## 2010 Free Software Foundation, Inc.
5 4
6## Author: Francesco Potorti` <pot@gnu.org> 5## Author: Francesco Potorti` <pot@gnu.org>
7 6
@@ -86,4 +85,3 @@ make-changelog-diff $oldtag $newtag
86 85
87echo " announcement created in $outfile" >&2 86echo " announcement created in $outfile" >&2
88 87
89# arch-tag: 605e00c7-7330-4c45-81e1-2ed53a13c39f
diff --git a/admin/make-changelog-diff b/admin/make-changelog-diff
index 5ab468c8f5d..88461131a3f 100755
--- a/admin/make-changelog-diff
+++ b/admin/make-changelog-diff
@@ -27,4 +27,3 @@ cvs -q diff -b -r $1 -r $2 $(find -name ChangeLog|sort) |
27 s/^\n// 27 s/^\n//
28 p" 28 p"
29 29
30# arch-tag: 7604a259-40b4-4f97-86b2-496a9c546f0a
diff --git a/admin/make-emacs b/admin/make-emacs
index 1fecaa33a69..b21dcad5f37 100755
--- a/admin/make-emacs
+++ b/admin/make-emacs
@@ -2,8 +2,7 @@
2# Build Emacs with various options for profiling, debugging, 2# Build Emacs with various options for profiling, debugging,
3# with and without warnings enabled etc. 3# with and without warnings enabled etc.
4 4
5# Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010 5# Copyright (C) 2001-2011 Free Software Foundation, Inc.
6# Free Software Foundation, Inc.
7 6
8# This file is part of GNU Emacs. 7# This file is part of GNU Emacs.
9 8
@@ -184,5 +183,3 @@ exit system "$make CC=\"$cc\" CFLAGS=\"$opts\" @ARGV";
184# Local Variables: 183# Local Variables:
185# mode: cperl 184# mode: cperl
186# End: 185# End:
187
188# arch-tag: 5c3f9713-9ece-4a12-b3f8-deaff15974ba
diff --git a/admin/make-tarball.txt b/admin/make-tarball.txt
index f685dd5e50f..6a8072de06c 100644
--- a/admin/make-tarball.txt
+++ b/admin/make-tarball.txt
@@ -4,7 +4,8 @@ Instructions to create pretest or release tarballs.
4 4
5For each step, check for possible errors. 5For each step, check for possible errors.
6 6
71. cvs -q update -Pd 71. `bzr update' (for a bound branch), or `bzr pull'.
8 bzr status # check for locally modified files
8 9
92. Bootstrap to make 100% sure all elc files are up-to-date, and to 102. Bootstrap to make 100% sure all elc files are up-to-date, and to
10 make sure that the later tagged version will bootstrap, should it be 11 make sure that the later tagged version will bootstrap, should it be
@@ -27,24 +28,23 @@ For each step, check for possible errors.
27 refer to a newer release of Emacs. (This is probably needed only 28 refer to a newer release of Emacs. (This is probably needed only
28 when preparing a major Emacs release, or branching for it.) 29 when preparing a major Emacs release, or branching for it.)
29 30
305. rm configure; autoconf 315. autoreconf -I m4 --force
31 make bootstrap 32 make bootstrap
32 33
336. Commit configure, README, doc/emacs/emacs.texi, 346. Commit configure, src/config.in, etc/AUTHORS, all the files changed
34 doc/lispref/elisp.texi, etc/AUTHORS, src/emacs.c, nt/emacs.rc, 35 by M-x set-version, and lisp/cus-edit.el (if modified).
35 and lisp/cus-edit.el (if modified). Copy lisp/loaddefs.el to 36 Copy lisp/loaddefs.el to lisp/ldefs-boot.el and commit lisp/ldefs-boot.el.
36 lisp/ldefs-boot.el and commit lisp/ldefs-boot.el. For a release, 37 For a release, also commit the ChangeLog files in all directories.
37 also commit the ChangeLog files in all directories.
38 38
397. make-dist --snapshot. Check the contents of the new tar with 397. make-dist --snapshot. Check the contents of the new tar with
40 admin/diff-tar-files against an older tar file. Some old pretest 40 admin/diff-tar-files against an older tar file. Some old pretest
41 tarballs are kept under fencepost.gnu.org:~pot/emacs-pretest/, while 41 tarballs may be found at <ftp://alpha.gnu.org/gnu/emacs/pretest>;
42 old emacs tarballs are at <ftp://ftp.gnu.org/pub/gnu/emacs/>. 42 old release tarballs are at <ftp://ftp.gnu.org/pub/gnu/emacs/>.
43 43
44 If this is the first pretest of a major release, just comparing 44 If this is the first pretest of a major release, just comparing
45 with the previous release may overlook many new files. You can try 45 with the previous release may overlook many new files. You can try
46 something like `find -f | grep -v CVS...etc' in a clean CVS tree, 46 something like `find . | sort' in a clean bzr tree, and compare the
47 and compare the results against the new tar contents. 47 results against the new tar contents.
48 48
498. xdelta delta emacs-OLD.tar.gz emacs-NEW.tar.gz emacs-OLD-NEW.xdelta 498. xdelta delta emacs-OLD.tar.gz emacs-NEW.tar.gz emacs-OLD-NEW.xdelta
50 50
@@ -107,6 +107,3 @@ For each step, check for possible errors.
10713. For a pretest, announce it on emacs-devel and BCC the pretesters. 10713. For a pretest, announce it on emacs-devel and BCC the pretesters.
108 For a release, announce it on info-gnu@gnu.org, 108 For a release, announce it on info-gnu@gnu.org,
109 info-gnu-emacs@gnu.org, and emacs-devel. 109 info-gnu-emacs@gnu.org, and emacs-devel.
110
111
112# arch-tag: c23c771f-ca26-4584-8a04-50ecf0989390
diff --git a/admin/notes/bugtracker b/admin/notes/bugtracker
index 5b3af5e242c..7c6c0ff4272 100644
--- a/admin/notes/bugtracker
+++ b/admin/notes/bugtracker
@@ -384,6 +384,14 @@ fixed 123 23.0.60
384*** To remove a "fixed" mark: 384*** To remove a "fixed" mark:
385notfixed 123 23.0.60 385notfixed 123 23.0.60
386 386
387*** To make a bug as present in a particular version:
388found 123 23.2
389NB if there is no specified "fixed" version, or if there is one and it
390is earlier than the found version, this reopens a closed bug.
391
392The leading "23.1;" that M-x report-emacs-bug adds to bug subjects
393automatically sets a found version (if none is explicitly specified).
394
387*** To assign or reassign a bug to a package or list of packages: 395*** To assign or reassign a bug to a package or list of packages:
388reassign 1234 emacs 396reassign 1234 emacs
389 397
@@ -466,16 +474,41 @@ http://lists.gnu.org/archive/html/emacs-devel/2009-11/msg00440.html
466 474
467** Bazaar stuff 475** Bazaar stuff
468 476
469*** You can use `bzr commit --fixes emacs:123' to mark that a commit fixes 477*** You can use `bzr commit --fixes debbugs:123' to mark that a commit fixes
470Emacs bug 123. You will first need to add a line to your bazaar.conf: 478Emacs bug 123. You will first need to add a line to one of your
479configuration files, ~/.bazaar/bazaar.conf or ~/.bazaar/locations.conf:
480
481bugtracker_debbugs_url = http://debbugs.gnu.org/{id}
482
483Here "{id}" is a literal string, a placeholder that will be replaced
484by the bug number you specify after `--fixes debbugs:' in the bzr
485command line (123 in the example above).
486
487In the bazaar.conf file, this setting should go into the [DEFAULTS]
488section.
489
490In the locations.conf file, it should go into the branch-specific
491configuration section for the branch where you want this to be in
492effect. For example, if you want this to be in effect for the branch
493located at `/home/projects/emacs/trunk', you need to have this in your
494~/.bazaar/locations.conf file:
495
496[/home/projects/emacs/trunk]
497bugtracker_debbugs_url = http://debbugs.gnu.org/{id}
498
499If you want to use this in all Emacs branches whose common parent is
500`/home/projects/emacs', put the setting in the [/home/projects/emacs]
501section. See "bzr help configuration" for more information about
502the *.conf files, their location and formats. See "bzr help bugs" for
503more information about the bugtracker_debbugs_url setting.
471 504
472bugtracker_emacs_url = http://debbugs.gnu.org/{id} 505See also log-edit-rewrite-fixes in .dir-locals.el.
473 506
474Note that all this does is add some metadata to the commit, it doesn't 507Note that all this does is add some metadata to the commit, it doesn't
475actually mark the bug as closed in the tracker. There seems to be no 508actually mark the bug as closed in the tracker. You can see this
476way to see this "metadata" with `bzr log', which is rather poor, but 509information with `bzr log', and it will show up as a link in a recent
477it will show up as a link in a recent loggerhead installation, or with 510loggerhead installation, or with some of the graphical frontends to
478some of the graphical frontends to bzr log. 511`bzr log'.
479 512
480** Gnus-specific voodoo 513** Gnus-specific voodoo
481 514
diff --git a/admin/notes/bzr b/admin/notes/bzr
index c66cdd98a3c..cb2a1bd4e4f 100644
--- a/admin/notes/bzr
+++ b/admin/notes/bzr
@@ -38,3 +38,84 @@ Or use shelves; or rebase; or do something else. See the thread for
38yet another fun excursion into the exciting world of version control. 38yet another fun excursion into the exciting world of version control.
39 39
40http://lists.gnu.org/archive/html/emacs-devel/2010-04/msg00086.html 40http://lists.gnu.org/archive/html/emacs-devel/2010-04/msg00086.html
41
42* Installing changes from gnulib
43Some of the files in Emacs are copied from gnulib. To synchronize
44these files from the version of gnulib that you have checked out into
45a sibling directory of your branch, type "make sync-from-gnulib"; this
46will check out the latest version of gnulib if there is no sibling
47directory already. It is a good idea to run "bzr status" afterwards,
48so that if a gnulib module added a file, you can record the new file
49using "bzr add". After synchronizing from gnulib, do a "make" in the
50usual way.
51
52To change the set of gnulib modules, change the GNULIB_MODULES
53variable in the top-level Makefile.in, and then run:
54
55 ./config.status
56 make sync-from-gnulib
57 bzr status
58
59The last command will mention files that may need to be added using
60"bzr add". If you remove a gnulib module, or if a gnulib module
61removes a file, then remove the corresponding files by hand.
62
63* How to merge changes from emacs-23 to trunk
64
65The following description uses bound branches, presumably it works in
66a similar way with unbound ones.
67
681) Get clean, up-to-date copies of the emacs-23 and trunk branches.
69Check for any uncommitted changes with bzr status.
70
712) M-x cd /path/to/trunk
72
733) load admin/bzrmerge.el
74
754) M-x bzrmerge RET /path/to/emacs-23 RET
76
77It will prompt about revisions that should be skipped, based on the
78regexp in bzrmerge-missing. If there are more revisions that you know
79need skipping, you'll have to do that by hand.
80
815) It will stop if there are any conflicts. Resolve them.
82Using smerge-mode, there are menu items to skip to the next conflict,
83and to take either the trunk, branch, or both copies.
84
856) After resolving all conflicts, you might need to run the bzmerge
86command again if there are more revisions still to merge.
87
88Do not commit (or exit Emacs) until you have run bzrmerge to completion.
89
90Before committing, check bzr status and bzr diff output.
91If you have run bzrmerge enough times, the "pending merge tip" in bzr
92status should be the last revision from the emacs-23 branch, and
93bzr status -v should show all the revisions you expect to merge.
94
95(Note that it will also show "skipped" revisions. This is expected,
96and is due to a technical limitation of bzr. The log data for those
97revisions gets merged, the actual changes themselves do not.
98http://lists.gnu.org/archive/html/emacs-devel/2011-01/msg00609.html )
99
100Note that ChangeLog entries are automatically merged to the top with
101today's date, but you still might want to check them to see that too
102much is not being included, or whitespace between entries is not missing.
103
104Notes:
105
1061) A lot that was in tramp.el in emacs-23 has moved to tramp-sh.el in
107the trunk. If you end up with a conflict in tramp.el, the changes may
108need to go to tramp-sh.el instead. Remember to update the file name in
109the ChangeLog.
110
1112) If a file is modified in emacs-23, and deleted in the trunk, you
112get a "contents conflict". Assuming the changes don't need to be in
113the trunk at all, use `bzr resolve path/to/file --take-this' to keep the
114trunk version. Prior to bzr 2.2.3, this may fail. You can just
115delete the .OTHER etc files by hand and use bzr resolve path/to/file.
116
1173) Conflicts in autoload md5sums in comments. Strictly speaking, the
118right thing to do is merge everything else, resolve the conflict by
119choosing either the trunk or branch version, then run `make -C lisp
120autoloads' to update the md5sums to the correct trunk value before
121committing.
diff --git a/admin/notes/copyright b/admin/notes/copyright
index e0389212304..e4077caf77b 100644
--- a/admin/notes/copyright
+++ b/admin/notes/copyright
@@ -1,4 +1,4 @@
1Copyright (C) 2007, 2008, 2009, 2010 Free Software Foundation, Inc. 1Copyright (C) 2007-2011 Free Software Foundation, Inc.
2See the end of the file for license conditions. 2See the end of the file for license conditions.
3 3
4 4
@@ -132,10 +132,18 @@ Cocoa/Emacs.base/Contents/Resources/English.lproj/InfoPlist.strings
132GNUstep/Emacs.base/Resources/Info-gnustep.plist 132GNUstep/Emacs.base/Resources/Info-gnustep.plist
133 `set-copyright' in admin.el will do all the above. 133 `set-copyright' in admin.el will do all the above.
134 134
135<top-level>/install-sh 135aclocal.m4
136lispintro/install-sh 136configure
137m4/*.m4
138 - copyright FSF, with unlimited permission to copy, distribute and modify
139
140lib/Makefile.in
141 - copyright FSF, with MIT-like license
142
143install-sh
137 - this file is copyright MIT, which is OK. Leave the copyright alone. 144 - this file is copyright MIT, which is OK. Leave the copyright alone.
138 145
146mkinstalldirs
139src/m/news-r6.h 147src/m/news-r6.h
140 public domain, leave alone. 148 public domain, leave alone.
141 149
@@ -218,9 +226,6 @@ lib-src/etags.c
218 --version output just says "Copyright <year> FSF" is apparently OK 226 --version output just says "Copyright <year> FSF" is apparently OK
219 from a legal point of view. 227 from a legal point of view.
220 228
221lib-src/getopt1.c, getopt_int.h
222 - these are from the GNU C library. Leave the copyrights alone.
223
224lisp/cedet/semantic/imenu.el 229lisp/cedet/semantic/imenu.el
225 - See http://lists.gnu.org/archive/html/emacs-devel/2010-03/msg00410.html 230 - See http://lists.gnu.org/archive/html/emacs-devel/2010-03/msg00410.html
226 in which Eric Ludlam established that the remaining contributions 231 in which Eric Ludlam established that the remaining contributions
@@ -329,6 +334,9 @@ Leave the copyrights alone. Leave the Eli Zaretskii copyright in
329is_exec.c alone. See the msdos/README file for the legal history of 334is_exec.c alone. See the msdos/README file for the legal history of
330these files. 335these files.
331 336
337msdos/sed*.inp - These files are copyright FSF and distributed under
338an MIT-like license.
339
332 340
333oldXMenu/ 341oldXMenu/
334 Keep the "copyright.h" method used by X11, rather than moving the 342 Keep the "copyright.h" method used by X11, rather than moving the
@@ -611,20 +619,25 @@ of writing) GPL >= 2. rms says may as well leave the licenses of these
611alone (may import them from Gnulib again). These are: 619alone (may import them from Gnulib again). These are:
612 620
613 Gnulib: 621 Gnulib:
622 arg-nonnull.h
623 c++defs.h
624 compile
625 config.guess
626 config.sub
627 depcomp
628 doc/man/texinfo.tex
629 missing
630 move-if-change
631 warn-on-use.h
632 lib/*.[ch]
633 lib/gnulib.mk
614 src/getloadavg.c 634 src/getloadavg.c
615 src/gmalloc.c 635 src/gmalloc.c
616 src/md5.c 636 src/md5.c
617 src/md5.h 637 src/md5.h
618 src/mktime.c
619 src/strftime.c
620 src/termcap.c 638 src/termcap.c
621 src/tparam.c 639 src/tparam.c
622 640
623 Others:
624 config.guess
625 config.sub
626 doc/man/texinfo.tex
627
628Note _not_ included in the above are src/regex.{c,h} (rms: "That 641Note _not_ included in the above are src/regex.{c,h} (rms: "That
629forked version is only in Emacs, so definitely relicense that."), and 642forked version is only in Emacs, so definitely relicense that."), and
630oldXMenu/insque.c (rms: "We wrote that specifically for Emacs, so 643oldXMenu/insque.c (rms: "We wrote that specifically for Emacs, so
diff --git a/admin/notes/elpa b/admin/notes/elpa
new file mode 100644
index 00000000000..e28d81e6d6e
--- /dev/null
+++ b/admin/notes/elpa
@@ -0,0 +1,42 @@
1NOTES ON THE EMACS PACKAGE ARCHIVE
2
3Here are instructions on uploading files to the package archive at
4elpa.gnu.org, for Emacs maintainers. (If you are not a maintainer,
5contact us if you want to submit a package.)
6
71. You will need login access to elpa.gnu.org. You will also need to
8 get the FSF sysadmins to allow ssh access through the FSF firewall
9 for your local machine. Ensure that your uid, USER, is in the
10 `elpa' group on elpa.gnu.org; this gives you write access to the
11 bzr repository from which the packages are managed.
12
132. Go to your bzr repository on your local machine. Of, if you don't
14 have one (you should, if you're tracking Emacs bzr), make one:
15
16 cd $DEVHOME
17 bzr init-repo elpa/
18 cd elpa
19
20 Create a branch for elpa:
21
22 bzr branch bzr+ssh://USER@elpa.gnu.org/home/elpa/package-repo package-repo
23
24 Bind the branch:
25
26 cd package-repo/
27 echo "public_branch = bzr+ssh://USER@elpa.gnu.org/home/elpa/package-repo" >> .bzr/branch/branch.conf
28 bzr bind bzr+ssh://USER@elpa.gnu.org/home/elpa/package-repo
29
30 Now you should be able to do `bzr up' and `bzr commit'.
31
323. Changes in bzr do not immediately propagate to the user-facing tree
33 (i.e., what users see when they do `M-x list-packages'). That tree
34 is created by a (daily) cron job that does "bzr export". If for
35 some reason you need to refresh the user-facing tree immediately,
36 run /home/elpa/bin/package-update.sh as the "elpa" user.
37
38 The Org mode dailies are not part of the repository. After the
39 package-update.sh script creates the user-facing tree, it copies
40 the daily tarfile hosted on orgmode.org directly into that tree.
41
424. FIXME: How to actually upload a package file.
diff --git a/admin/notes/font-backend b/admin/notes/font-backend
index d3fb56a2ba4..d51d3ec1c3b 100644
--- a/admin/notes/font-backend
+++ b/admin/notes/font-backend
@@ -1,5 +1,4 @@
1Copyright (C) 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010 1Copyright (C) 2002-2011 Free Software Foundation, Inc.
2 Free Software Foundation, Inc.
3See the end of the file for license conditions. 2See the end of the file for license conditions.
4 3
5 4
diff --git a/admin/notes/iftc b/admin/notes/iftc
index e8dcdd3a6d6..983b1486685 100644
--- a/admin/notes/iftc
+++ b/admin/notes/iftc
@@ -24,4 +24,3 @@ it from other casting. We commit the changes and can now go about modifying
24LOW and HIGH separately. When HIGH is ready to handle the type change, the 24LOW and HIGH separately. When HIGH is ready to handle the type change, the
25cast can be removed. 25cast can be removed.
26 26
27;;; arch-tag: 3309cc41-5d59-421b-b7be-c94b04083bb5
diff --git a/admin/notes/lel-TODO b/admin/notes/lel-TODO
index 2e453444275..c03d0f6fdfb 100644
--- a/admin/notes/lel-TODO
+++ b/admin/notes/lel-TODO
@@ -1,6 +1,6 @@
1Some lisp/emacs-lisp/ Features and Where They Are Documented 1Some lisp/emacs-lisp/ Features and Where They Are Documented
2 2
3Copyright (C) 2007, 2008, 2009, 2010 Free Software Foundation, Inc. 3Copyright (C) 2007-2011 Free Software Foundation, Inc.
4See the end of the file for license conditions. 4See the end of the file for license conditions.
5 5
6 6
diff --git a/admin/notes/multi-tty b/admin/notes/multi-tty
index d7f68930204..85babb903b9 100644
--- a/admin/notes/multi-tty
+++ b/admin/notes/multi-tty
@@ -1,6 +1,6 @@
1-*- coding: utf-8; mode: text; -*- 1-*- coding: utf-8; mode: text; -*-
2 2
3Copyright (C) 2007, 2008, 2009, 2010 Free Software Foundation, Inc. 3Copyright (C) 2007-2011 Free Software Foundation, Inc.
4See the end of the file for license conditions. 4See the end of the file for license conditions.
5 5
6From README.multi-tty in the multi-tty branch. 6From README.multi-tty in the multi-tty branch.
@@ -1360,4 +1360,3 @@ GNU General Public License for more details.
1360You should have received a copy of the GNU General Public License 1360You should have received a copy of the GNU General Public License
1361along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. 1361along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
1362 1362
1363;;; arch-tag: 8da1619e-2e79-41a8-9ac9-a0485daad17d
diff --git a/admin/notes/trailing-whitespace b/admin/notes/trailing-whitespace
index e29456b3a2f..8c85b8984d5 100644
--- a/admin/notes/trailing-whitespace
+++ b/admin/notes/trailing-whitespace
@@ -5,4 +5,3 @@ there was a mass-change to remove such from various branches in cvs. probably
5it's a good idea to avoid adding trailing whitespace in new code/docs and in 5it's a good idea to avoid adding trailing whitespace in new code/docs and in
6changes. 6changes.
7 7
8;;; arch-tag: de441379-c345-4826-a784-352b5413a698
diff --git a/admin/notes/unicode b/admin/notes/unicode
index a9176377dad..ce7d3732f03 100644
--- a/admin/notes/unicode
+++ b/admin/notes/unicode
@@ -1,7 +1,6 @@
1 -*-mode: text; coding: latin-1;-*- 1 -*-mode: text; coding: latin-1;-*-
2 2
3Copyright (C) 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010 3Copyright (C) 2002-2011 Free Software Foundation, Inc.
4 Free Software Foundation, Inc.
5See the end of the file for license conditions. 4See the end of the file for license conditions.
6 5
7Problems, fixmes and other unicode-related issues 6Problems, fixmes and other unicode-related issues
diff --git a/admin/nt/README-UNDUMP.W32 b/admin/nt/README-UNDUMP.W32
index 4ab34d3234f..8c7d1510a05 100644
--- a/admin/nt/README-UNDUMP.W32
+++ b/admin/nt/README-UNDUMP.W32
@@ -1,5 +1,4 @@
1Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010 1Copyright (C) 2001-2011 Free Software Foundation, Inc.
2 Free Software Foundation, Inc.
3See the end of the file for license conditions. 2See the end of the file for license conditions.
4 3
5 Emacs for Windows 4 Emacs for Windows
diff --git a/admin/nt/README-ftp-server b/admin/nt/README-ftp-server
index 6b6c592eab1..4310ac13dd5 100644
--- a/admin/nt/README-ftp-server
+++ b/admin/nt/README-ftp-server
@@ -1,5 +1,4 @@
1Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010 1Copyright (C) 2001-2011 Free Software Foundation, Inc.
2 Free Software Foundation, Inc.
3See the end of the file for license conditions. 2See the end of the file for license conditions.
4 3
5 Precompiled Distributions of 4 Precompiled Distributions of
diff --git a/admin/nt/dump.bat b/admin/nt/dump.bat
index c0e95426ccb..97ed396f206 100755
--- a/admin/nt/dump.bat
+++ b/admin/nt/dump.bat
@@ -18,6 +18,3 @@ copy temacs.exe obj\i386
18obj\i386\temacs -batch -l loadup dump 18obj\i386\temacs -batch -l loadup dump
19copy obj\i386\emacs.exe . 19copy obj\i386\emacs.exe .
20 20
21goto skipArchTag
22 arch-tag: 0ca3036d-3a1e-47ea-87c6-9c0845253496
23:skipArchTag
diff --git a/admin/quick-install-emacs b/admin/quick-install-emacs
index 24972e655b6..841a895248e 100755
--- a/admin/quick-install-emacs
+++ b/admin/quick-install-emacs
@@ -1,8 +1,7 @@
1#!/bin/sh 1#!/bin/sh
2### quick-install-emacs --- do a halfway-decent job of installing emacs quickly 2### quick-install-emacs --- do a halfway-decent job of installing emacs quickly
3 3
4## Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 4## Copyright (C) 2001-2011 Free Software Foundation, Inc.
5## 2010 Free Software Foundation, Inc.
6 5
7## Author: Miles Bader <miles@gnu.org> 6## Author: Miles Bader <miles@gnu.org>
8 7
@@ -171,8 +170,10 @@ test x"$SRC" = x && { SRC="`get_config_var srcdir`" || exit 4 ; }
171test x"$prefix" = x && { prefix="`get_config_var prefix`" || exit 4 ; } 170test x"$prefix" = x && { prefix="`get_config_var prefix`" || exit 4 ; }
172test x"$ARCH" = x && { ARCH="`get_config_var host`" || exit 4 ; } 171test x"$ARCH" = x && { ARCH="`get_config_var host`" || exit 4 ; }
173 172
174VERSION=`grep 'char emacs_version' $SRC/src/emacs.c \ 173VERSION=`
175 | sed -e 's/^[^"]*"\([^"]*\)".*$/\1/'` 174 sed -n 's/^AC_INIT(emacs,[ ]*\([^ )]*\).*/\1/p' <$SRC/configure.in
175` || exit 4
176test -n "$VERSION" || { echo >&2 "$me: no version in configure.in"; exit 4; }
176 177
177DST_SHARE="$prefix/share/emacs/$VERSION" 178DST_SHARE="$prefix/share/emacs/$VERSION"
178DST_BIN="$prefix/bin" 179DST_BIN="$prefix/bin"
diff --git a/admin/unidata/.gitignore b/admin/unidata/.gitignore
index 4f759a363db..3f2d8ca551d 100644
--- a/admin/unidata/.gitignore
+++ b/admin/unidata/.gitignore
@@ -1,4 +1,3 @@
1*.elc 1*.elc
2unidata.txt 2unidata.txt
3 3
4# arch-tag: 1b0c916f-3060-47b4-a8c9-cff5c3598adf
diff --git a/admin/unidata/Makefile.in b/admin/unidata/Makefile.in
index e7b0fbe4bf9..04f2f1d4380 100644
--- a/admin/unidata/Makefile.in
+++ b/admin/unidata/Makefile.in
@@ -1,5 +1,5 @@
1# Makefile -- Makefile to generate character property tables. 1# Makefile -- Makefile to generate character property tables.
2# Copyright (C) 2005, 2006, 2007, 2008, 2009, 2010 2# Copyright (C) 2005, 2006, 2007, 2008, 2009, 2010, 2011
3# National Institute of Advanced Industrial Science and Technology (AIST) 3# National Institute of Advanced Industrial Science and Technology (AIST)
4# Registration Number H13PRO009 4# Registration Number H13PRO009
5# 5#
diff --git a/admin/unidata/bidimirror.awk b/admin/unidata/bidimirror.awk
index 7965f36ad0d..fc3e8afaace 100644
--- a/admin/unidata/bidimirror.awk
+++ b/admin/unidata/bidimirror.awk
@@ -1,6 +1,6 @@
1# Generate data for bidi_mirroring_table, see src/bidi.c:bidi_initialize. 1# Generate data for bidi_mirroring_table, see src/bidi.c:bidi_initialize.
2 2
3# Copyright (C) 2010, Free Software Foundation, Inc. 3# Copyright (C) 2010-2011 Free Software Foundation, Inc.
4 4
5# This file is part of GNU Emacs. 5# This file is part of GNU Emacs.
6 6
diff --git a/admin/unidata/biditype.awk b/admin/unidata/biditype.awk
index 6e57884a879..bb1aaad1973 100644
--- a/admin/unidata/biditype.awk
+++ b/admin/unidata/biditype.awk
@@ -1,6 +1,6 @@
1# Generate data for filling bidi_type_table, see src/bidi.c:bidi_initialize. 1# Generate data for filling bidi_type_table, see src/bidi.c:bidi_initialize.
2 2
3# Copyright (C) 2010, Free Software Foundation, Inc. 3# Copyright (C) 2010-2011 Free Software Foundation, Inc.
4 4
5# This file is part of GNU Emacs. 5# This file is part of GNU Emacs.
6 6
diff --git a/admin/unidata/copyright.html b/admin/unidata/copyright.html
index 57a6d3945c1..f414ca461f2 100644
--- a/admin/unidata/copyright.html
+++ b/admin/unidata/copyright.html
@@ -340,6 +340,3 @@ PERFORMANCE OF THE DATA FILES OR SOFTWARE.</p>
340 340
341 341
342</html> 342</html>
343
344<!-- arch-tag: 359e3efa-6eb2-4b4e-841c-f002d7924c5e
345 (do not change this comment) -->
diff --git a/admin/unidata/makefile.w32-in b/admin/unidata/makefile.w32-in
index 58cea29db8b..1f9f276a35c 100644
--- a/admin/unidata/makefile.w32-in
+++ b/admin/unidata/makefile.w32-in
@@ -1,5 +1,5 @@
1# makefile.w32-in -- W32 -*- Makefile -*- to generate character property tables. 1# makefile.w32-in -- W32 -*- Makefile -*- to generate character property tables.
2# Copyright (C) 2005, 2006, 2007, 2008, 2009, 2010 2# Copyright (C) 2005, 2006, 2007, 2008, 2009, 2010, 2011
3# National Institute of Advanced Industrial Science and Technology (AIST) 3# National Institute of Advanced Industrial Science and Technology (AIST)
4# Registration Number H13PRO009 4# Registration Number H13PRO009
5# 5#
diff --git a/admin/unidata/unidata-gen.el b/admin/unidata/unidata-gen.el
index 211c6f0a530..9f898668526 100644
--- a/admin/unidata/unidata-gen.el
+++ b/admin/unidata/unidata-gen.el
@@ -1,5 +1,5 @@
1;; unidata-gen.el -- Create files containing character property data. 1;; unidata-gen.el -- Create files containing character property data.
2;; Copyright (C) 2005, 2006, 2007, 2008, 2009, 2010 2;; Copyright (C) 2005, 2006, 2007, 2008, 2009, 2010, 2011
3;; National Institute of Advanced Industrial Science and Technology (AIST) 3;; National Institute of Advanced Industrial Science and Technology (AIST)
4;; Registration Number H13PRO009 4;; Registration Number H13PRO009
5 5
@@ -1241,7 +1241,7 @@ Property value is a character."
1241 (byte-compile describer) 1241 (byte-compile describer)
1242 (setq describer (symbol-function describer))) 1242 (setq describer (symbol-function describer)))
1243 (set-char-table-extra-slot table 3 describer)) 1243 (set-char-table-extra-slot table 3 describer))
1244 (insert ";; Copyright (C) 1991-2009, 2010 Unicode, Inc. 1244 (insert ";; Copyright (C) 1991-2009 Unicode, Inc.
1245;; This file was generated from the Unicode data file at 1245;; This file was generated from the Unicode data file at
1246;; http://www.unicode.org/Public/UNIDATA/UnicodeData.txt. 1246;; http://www.unicode.org/Public/UNIDATA/UnicodeData.txt.
1247;; See lisp/international/README for the copyright and permission notice.\n" 1247;; See lisp/international/README for the copyright and permission notice.\n"
@@ -1261,5 +1261,4 @@ Property value is a character."
1261 1261
1262 1262
1263 1263
1264;; arch-tag: 961c862e-b821-447e-9b8a-bfbab9c2d525
1265;;; unidata-gen.el ends here 1264;;; unidata-gen.el ends here