aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKenichi Handa2010-07-26 13:29:08 +0900
committerKenichi Handa2010-07-26 13:29:08 +0900
commit50efd41b43c9b1b540c49c53d4e7824468ec7879 (patch)
tree4a3be8d0322c537816f47a0c6450fc13495edf35
parentdfe3c90fa5974e200483297e11bb889d0589b8f5 (diff)
parent7d383292d10b876efec43e77fd51c2665e912688 (diff)
downloademacs-50efd41b43c9b1b540c49c53d4e7824468ec7879.tar.gz
emacs-50efd41b43c9b1b540c49c53d4e7824468ec7879.zip
merge trunk
-rw-r--r--.gitignore1
-rw-r--r--ChangeLog18
-rw-r--r--admin/ChangeLog11
-rw-r--r--admin/admin.el3
-rwxr-xr-xadmin/nt/makedist.bat65
-rwxr-xr-xconfigure11
-rw-r--r--configure.in11
-rw-r--r--doc/emacs/ChangeLog4
-rw-r--r--doc/lispintro/ChangeLog6
-rw-r--r--doc/lispref/ChangeLog6
-rw-r--r--doc/misc/ChangeLog4
-rw-r--r--etc/ChangeLog7
-rw-r--r--etc/NEWS6
-rw-r--r--leim/ChangeLog2
-rw-r--r--lib-src/ChangeLog35
-rw-r--r--lib-src/b2m.c2
-rw-r--r--lib-src/emacsclient.c16
-rw-r--r--lib-src/etags.c6
-rw-r--r--lib-src/fakemail.c2
-rw-r--r--lib-src/hexl.c2
-rw-r--r--lib-src/make-docfile.c3
-rw-r--r--lib-src/movemail.c6
-rw-r--r--lib-src/ntlib.h12
-rw-r--r--lib-src/update-game-score.c2
-rw-r--r--lisp/ChangeLog60
-rw-r--r--lisp/ChangeLog.112
-rw-r--r--lisp/ChangeLog.1022
-rw-r--r--lisp/ChangeLog.1126
-rw-r--r--lisp/ChangeLog.1258
-rw-r--r--lisp/ChangeLog.1310
-rw-r--r--lisp/ChangeLog.142
-rw-r--r--lisp/ChangeLog.24
-rw-r--r--lisp/ChangeLog.36
-rw-r--r--lisp/ChangeLog.592
-rw-r--r--lisp/ChangeLog.624
-rw-r--r--lisp/ChangeLog.888
-rw-r--r--lisp/ChangeLog.9172
-rw-r--r--lisp/epa-file.el11
-rw-r--r--lisp/gnus/ChangeLog64
-rw-r--r--lisp/gnus/ChangeLog.114
-rw-r--r--lisp/gnus/ChangeLog.226
-rw-r--r--lisp/gnus/mml-smime.el12
-rw-r--r--lisp/mh-e/ChangeLog14
-rw-r--r--lisp/mh-e/ChangeLog.134
-rw-r--r--lisp/net/tramp.el91
-rw-r--r--lisp/org/ChangeLog62
-rw-r--r--lisp/play/tetris.el233
-rw-r--r--lisp/progmodes/ps-mode.el56
-rw-r--r--lwlib/ChangeLog2
-rw-r--r--msdos/ChangeLog4
-rw-r--r--nt/ChangeLog27
-rw-r--r--nt/INSTALL29
-rw-r--r--nt/README.W32 (renamed from admin/nt/README.W32)0
-rwxr-xr-xnt/configure.bat58
-rw-r--r--nt/makefile.w32-in33
-rw-r--r--nt/runemacs.c2
-rw-r--r--nt/zipdist.bat49
-rw-r--r--oldXMenu/ChangeLog4
-rw-r--r--src/ChangeLog100
-rw-r--r--src/ChangeLog.1018
-rw-r--r--src/ChangeLog.24
-rw-r--r--src/ChangeLog.32
-rw-r--r--src/ChangeLog.512
-rw-r--r--src/ChangeLog.62
-rw-r--r--src/ChangeLog.924
-rw-r--r--src/alloc.c10
-rw-r--r--src/callproc.c19
-rw-r--r--src/cmds.c4
-rw-r--r--src/config.in3
-rw-r--r--src/dired.c4
-rw-r--r--src/dispnew.c2
-rw-r--r--src/ecrt0.c95
-rw-r--r--src/editfns.c2
-rw-r--r--src/emacs.c10
-rw-r--r--src/font.c33
-rw-r--r--src/frame.c10
-rw-r--r--src/keyboard.c4
-rw-r--r--src/lisp.h9
-rw-r--r--src/lread.c6
-rw-r--r--src/mem-limits.h4
-rw-r--r--src/menu.c2
-rw-r--r--src/ndir.h9
-rw-r--r--src/ralloc.c33
-rw-r--r--src/sound.c2
-rw-r--r--src/syssignal.h2
-rw-r--r--src/term.c4
-rw-r--r--src/terminfo.c6
-rw-r--r--src/unexalpha.c539
-rw-r--r--src/vm-limit.c6
-rw-r--r--src/w32fns.c21
-rw-r--r--src/w32gui.h2
-rw-r--r--src/w32heap.h6
-rw-r--r--src/w32menu.c32
-rw-r--r--src/w32term.c4
-rw-r--r--src/w32term.h32
-rw-r--r--src/xfaces.c1
96 files changed, 1148 insertions, 1572 deletions
diff --git a/.gitignore b/.gitignore
index 760c452aab1..57537b8a503 100644
--- a/.gitignore
+++ b/.gitignore
@@ -1,6 +1,7 @@
1autom4te.cache 1autom4te.cache
2makefile 2makefile
3*~ 3*~
4/README.W32
4 5
5/bin/ 6/bin/
6/site-lisp/ 7/site-lisp/
diff --git a/ChangeLog b/ChangeLog
index 799cca598c6..64c61254371 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,19 @@
12010-07-25 Andreas Schwab <schwab@linux-m68k.org>
2
3 * configure.in: Check for __executable_start.
4
52010-07-24 Ken Brown <kbrown@cornell.edu>
6
7 * configure.in (LINKER, LIB_GCC): Remove cygwin special cases (Bug#6715)
8
92010-07-24 Juanma Barranquero <lekktu@gmail.com>
10
11 * .bzrignore, .gitignore: Ignore README.W32 on the root directory.
12
132010-07-24 Ken Brown <kbrown@cornell.edu> (tiny change)
14
15 * configure.in (START_FILES) [cygwin]: Set to pre-crt0.o (Bug#6715).
16
12010-07-12 Andreas Schwab <schwab@linux-m68k.org> 172010-07-12 Andreas Schwab <schwab@linux-m68k.org>
2 18
3 * configure.in (C_WARNINGS_SWITCH, PROFILING_CFLAGS) 19 * configure.in (C_WARNINGS_SWITCH, PROFILING_CFLAGS)
@@ -8373,7 +8389,7 @@
8373 (EMACSROOT): New variable, giving the directory under which all of 8389 (EMACSROOT): New variable, giving the directory under which all of
8374 Emacs's libraries should be installed. Changed rest of file to 8390 Emacs's libraries should be installed. Changed rest of file to
8375 use it. 8391 use it.
8376 (LIBDIR): Now denotes only architecture-dependent dir - relevant cha 8392 (LIBDIR): Now denotes only architecture-dependent dir.
8377 (DATADIR): New variable, denoting architecture-independent dir. 8393 (DATADIR): New variable, denoting architecture-independent dir.
8378 (LOCKDIR): New variable, for completeness. 8394 (LOCKDIR): New variable, for completeness.
8379 (SUBDIR): No more etc, new lib-src. 8395 (SUBDIR): No more etc, new lib-src.
diff --git a/admin/ChangeLog b/admin/ChangeLog
index 7a3104c9c40..e082eee36bf 100644
--- a/admin/ChangeLog
+++ b/admin/ChangeLog
@@ -1,3 +1,10 @@
12010-07-24 Christoph Scholtes <cschol2112@gmail.com>
2
3 * admin.el: Write version number to nt/makefile.w32-in.
4 * nt/makedist.bat: Remove; replaced with `zipdist.bat'
5 in the nt/ directory.
6 * nt/README.W32: Relocate to nt/ directory.
7
12010-07-11 Andreas Schwab <schwab@linux-m68k.org> 82010-07-11 Andreas Schwab <schwab@linux-m68k.org>
2 9
3 * CPP-DEFINES (HAVE_INDEX, HAVE_RINDEX): Remove. 10 * CPP-DEFINES (HAVE_INDEX, HAVE_RINDEX): Remove.
@@ -432,7 +439,7 @@
432 439
433 * charsets/mapconv: Handle UNICODE2. 440 * charsets/mapconv: Handle UNICODE2.
434 441
435 * charsets/Makefile (CJK): Include CP932-2BYTE.map 442 * charsets/Makefile (CJK): Include CP932-2BYTE.map.
436 (CP932-2BYTE.map): New target. 443 (CP932-2BYTE.map): New target.
437 444
4382008-02-01 Kenichi Handa <handa@m17n.org> 4452008-02-01 Kenichi Handa <handa@m17n.org>
@@ -752,7 +759,7 @@
752 759
7532004-08-28 Jan Djärv <jan.h.d@swipnet.se> 7602004-08-28 Jan Djärv <jan.h.d@swipnet.se>
754 761
755 * FOR-RELEASE (Indications): Remove entry about GTK and geometry, 762 * FOR-RELEASE (Indications): Remove entry about GTK and geometry
756 (now behaves as well as other ports). 763 (now behaves as well as other ports).
757 764
7582004-06-28 Jan Djärv <jan.h.d@swipnet.se> 7652004-06-28 Jan Djärv <jan.h.d@swipnet.se>
diff --git a/admin/admin.el b/admin/admin.el
index f2cf008f475..51bbecf4c57 100644
--- a/admin/admin.el
+++ b/admin/admin.el
@@ -95,6 +95,9 @@ Root must be the root of an Emacs source tree."
95 (set-version-in-file root "lib-src/makefile.w32-in" version 95 (set-version-in-file root "lib-src/makefile.w32-in" version
96 (rx (and "VERSION" (0+ space) "=" (0+ space) 96 (rx (and "VERSION" (0+ space) "=" (0+ space)
97 (submatch (1+ (in "0-9.")))))) 97 (submatch (1+ (in "0-9."))))))
98 (set-version-in-file root "nt/makefile.w32-in" version
99 (rx (and "VERSION" (0+ space) "=" (0+ space)
100 (submatch (1+ (in "0-9."))))))
98 ;; nt/emacs.rc also contains the version number, but in an awkward 101 ;; nt/emacs.rc also contains the version number, but in an awkward
99 ;; format. It must contain four components, separated by commas, and 102 ;; format. It must contain four components, separated by commas, and
100 ;; in two places those commas are followed by space, in two other 103 ;; in two places those commas are followed by space, in two other
diff --git a/admin/nt/makedist.bat b/admin/nt/makedist.bat
deleted file mode 100755
index 6546e6e10dc..00000000000
--- a/admin/nt/makedist.bat
+++ /dev/null
@@ -1,65 +0,0 @@
1@echo off
2
3rem Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010
4rem Free Software Foundation, Inc.
5
6rem Cannot use brackets in andrewi's email below because
7rem older Windows shells will treat that as redirection.
8
9rem Author: Andrew Innes andrewi@gnu.org
10
11rem This file is part of GNU Emacs.
12
13rem GNU Emacs is free software: you can redistribute it and/or modify
14rem it under the terms of the GNU General Public License as published by
15rem the Free Software Foundation, either version 3 of the License, or
16rem (at your option) any later version.
17
18rem GNU Emacs is distributed in the hope that it will be useful,
19rem but WITHOUT ANY WARRANTY; without even the implied warranty of
20rem MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
21rem GNU General Public License for more details.
22
23rem You should have received a copy of the GNU General Public License
24rem along with GNU Emacs. If not, see http://www.gnu.org/licenses/.
25
26
27if (%3) == () goto usage
28if not (%4) == () goto %4
29
30:bin
31
32echo Create full bin distribution
33copy %3\README.W32 emacs-%1\README.W32
34rem Info-ZIP zip seems to be broken on Windows.
35rem It always writes to zip.zip and treats the zipfile argument as one
36rem of the files to go in it.
37rem zip -9 -r %2-bin-i386 emacs-%1/BUGS emacs-%1/COPYING emacs-%1/README emacs-%1/README.W32 emacs-%1/INSTALL emacs-%1/bin emacs-%1/etc emacs-%1/info emacs-%1/lisp emacs-%1/leim -x emacs.mdp *.pdb *.opt *~ CVS
387z a -tZIP -mx=9 -xr!emacs.mdp -xr!*.pdb -xr!*.opt -xr!*~ -xr!CVS -xr!.arch-inventory %2-bin-i386.zip emacs-%1/BUGS emacs-%1/COPYING emacs-%1/README emacs-%1/README.W32 emacs-%1/INSTALL emacs-%1/bin emacs-%1/etc emacs-%1/info emacs-%1/lisp emacs-%1/leim emacs-%1/site-lisp
39del emacs-%1\README.W32
40if not (%4) == () goto end
41
42:barebin
43echo Create archive with just the basic binaries and generated files
44echo (the user needs to unpack the full source distribution for
45echo everything else)
46copy %3\README.W32 emacs-%1\README.W32
47rem Info-ZIP zip seems to be broken on Windows.
48rem It always writes to zip.zip and treats the zipfile argument as one
49rem of the files to go in it.
50rem zip -9 -r %2-barebin-i386.zip emacs-%1/README.W32 emacs-%1/bin emacs-%1/etc/DOC-X emacs-%1/COPYING
517z a -tZIP -mx=9 %2-barebin-i386.zip emacs-%1/README.W32 emacs-%1/bin emacs-%1/etc/DOC-X emacs-%1/COPYING
52del emacs-%1\README.W32
53if not (%4) == () goto end
54
55goto end
56
57:usage
58echo Generate source and binary distributions of emacs.
59echo Usage: %0 emacs-version dist-basename distfiles [bin,barebin]
60echo (e.g., %0 19.34 emacs-19.34.5 d:\andrewi\distfiles)
61:end
62
63goto skipArchTag
64 arch-tag: 6e2ddd92-c1c9-4992-b6b5-207aaab72f68
65:skipArchTag
diff --git a/configure b/configure
index 693e404bba7..b4a2ee64590 100755
--- a/configure
+++ b/configure
@@ -5885,7 +5885,7 @@ START_FILES=
5885case $opsys in 5885case $opsys in
5886 cygwin ) 5886 cygwin )
5887 LIB_MATH= 5887 LIB_MATH=
5888 START_FILES='ecrt0.o' 5888 START_FILES='pre-crt0.o'
5889 ;; 5889 ;;
5890 darwin ) 5890 darwin )
5891 ## Adding -lm confuses the dynamic linker, so omit it. 5891 ## Adding -lm confuses the dynamic linker, so omit it.
@@ -11190,7 +11190,7 @@ __fpending mblen mbrlen mbsinit strsignal setitimer ualarm strchr strrchr \
11190sendto recvfrom getsockopt setsockopt getsockname getpeername \ 11190sendto recvfrom getsockopt setsockopt getsockname getpeername \
11191gai_strerror mkstemp getline getdelim mremap memmove fsync sync \ 11191gai_strerror mkstemp getline getdelim mremap memmove fsync sync \
11192memset memcmp difftime memcpy mempcpy mblen mbrlen posix_memalign \ 11192memset memcmp difftime memcpy mempcpy mblen mbrlen posix_memalign \
11193cfmakeraw cfsetspeed isnan copysign 11193cfmakeraw cfsetspeed isnan copysign __executable_start
11194do : 11194do :
11195 as_ac_var=`$as_echo "ac_cv_func_$ac_func" | $as_tr_sh` 11195 as_ac_var=`$as_echo "ac_cv_func_$ac_func" | $as_tr_sh`
11196ac_fn_c_check_func "$LINENO" "$ac_func" "$as_ac_var" 11196ac_fn_c_check_func "$LINENO" "$ac_func" "$as_ac_var"
@@ -14149,9 +14149,7 @@ LINKER=
14149ORDINARY_LINK= 14149ORDINARY_LINK=
14150case "$opsys" in 14150case "$opsys" in
14151 ## gnu: GNU needs its own crt0. 14151 ## gnu: GNU needs its own crt0.
14152 aix4-2|darwin|gnu|usg5-4|irix6-5|sol2*|unixware) ORDINARY_LINK=yes ;; 14152 aix4-2|cygwin|darwin|gnu|usg5-4|irix6-5|sol2*|unixware) ORDINARY_LINK=yes ;;
14153
14154 cygwin) LINKER="\$(CC)" ;;
14155 14153
14156 ## On post 1.3 releases of NetBSD, gcc -nostdlib also clears the 14154 ## On post 1.3 releases of NetBSD, gcc -nostdlib also clears the
14157 ## library search parth, i.e. it won't search /usr/lib for libc and 14155 ## library search parth, i.e. it won't search /usr/lib for libc and
@@ -14206,8 +14204,7 @@ LIB_GCC=
14206if test "x$GCC" = "xyes" && test "x$ORDINARY_LINK" != "xyes"; then 14204if test "x$GCC" = "xyes" && test "x$ORDINARY_LINK" != "xyes"; then
14207 14205
14208 case "$opsys" in 14206 case "$opsys" in
14209 ## cygwin: don't link against static libgcc. 14207 freebsd|netbsd|openbsd) LIB_GCC= ;;
14210 cygwin|freebsd|netbsd|openbsd) LIB_GCC= ;;
14211 14208
14212 gnu-*) 14209 gnu-*)
14213 ## armin76@gentoo.org reported that the lgcc_s flag is necessary to 14210 ## armin76@gentoo.org reported that the lgcc_s flag is necessary to
diff --git a/configure.in b/configure.in
index ed229916eb8..0f4a3c7564b 100644
--- a/configure.in
+++ b/configure.in
@@ -1060,7 +1060,7 @@ START_FILES=
1060case $opsys in 1060case $opsys in
1061 cygwin ) 1061 cygwin )
1062 LIB_MATH= 1062 LIB_MATH=
1063 START_FILES='ecrt0.o' 1063 START_FILES='pre-crt0.o'
1064 ;; 1064 ;;
1065 darwin ) 1065 darwin )
1066 ## Adding -lm confuses the dynamic linker, so omit it. 1066 ## Adding -lm confuses the dynamic linker, so omit it.
@@ -2611,7 +2611,7 @@ __fpending mblen mbrlen mbsinit strsignal setitimer ualarm strchr strrchr \
2611sendto recvfrom getsockopt setsockopt getsockname getpeername \ 2611sendto recvfrom getsockopt setsockopt getsockname getpeername \
2612gai_strerror mkstemp getline getdelim mremap memmove fsync sync \ 2612gai_strerror mkstemp getline getdelim mremap memmove fsync sync \
2613memset memcmp difftime memcpy mempcpy mblen mbrlen posix_memalign \ 2613memset memcmp difftime memcpy mempcpy mblen mbrlen posix_memalign \
2614cfmakeraw cfsetspeed isnan copysign) 2614cfmakeraw cfsetspeed isnan copysign __executable_start)
2615 2615
2616AC_CHECK_HEADERS(sys/un.h) 2616AC_CHECK_HEADERS(sys/un.h)
2617 2617
@@ -3326,9 +3326,7 @@ LINKER=
3326ORDINARY_LINK= 3326ORDINARY_LINK=
3327case "$opsys" in 3327case "$opsys" in
3328 ## gnu: GNU needs its own crt0. 3328 ## gnu: GNU needs its own crt0.
3329 aix4-2|darwin|gnu|usg5-4|irix6-5|sol2*|unixware) ORDINARY_LINK=yes ;; 3329 aix4-2|cygwin|darwin|gnu|usg5-4|irix6-5|sol2*|unixware) ORDINARY_LINK=yes ;;
3330
3331 cygwin) LINKER="\$(CC)" ;;
3332 3330
3333 ## On post 1.3 releases of NetBSD, gcc -nostdlib also clears the 3331 ## On post 1.3 releases of NetBSD, gcc -nostdlib also clears the
3334 ## library search parth, i.e. it won't search /usr/lib for libc and 3332 ## library search parth, i.e. it won't search /usr/lib for libc and
@@ -3381,8 +3379,7 @@ LIB_GCC=
3381if test "x$GCC" = "xyes" && test "x$ORDINARY_LINK" != "xyes"; then 3379if test "x$GCC" = "xyes" && test "x$ORDINARY_LINK" != "xyes"; then
3382 3380
3383 case "$opsys" in 3381 case "$opsys" in
3384 ## cygwin: don't link against static libgcc. 3382 freebsd|netbsd|openbsd) LIB_GCC= ;;
3385 cygwin|freebsd|netbsd|openbsd) LIB_GCC= ;;
3386 3383
3387 gnu-*) 3384 gnu-*)
3388 ## armin76@gentoo.org reported that the lgcc_s flag is necessary to 3385 ## armin76@gentoo.org reported that the lgcc_s flag is necessary to
diff --git a/doc/emacs/ChangeLog b/doc/emacs/ChangeLog
index 487663109bd..a082f8ddb65 100644
--- a/doc/emacs/ChangeLog
+++ b/doc/emacs/ChangeLog
@@ -606,7 +606,7 @@
606 606
6072009-06-23 Miles Bader <miles@gnu.org> 6072009-06-23 Miles Bader <miles@gnu.org>
608 608
609 * display.texi (Scrolling): Document `recenter-redisplay' 609 * display.texi (Scrolling): Document `recenter-redisplay'.
610 (Temporary Face Changes): Document `text-scale-set'. 610 (Temporary Face Changes): Document `text-scale-set'.
611 611
6122009-06-21 Chong Yidong <cyd@stupidchicken.com> 6122009-06-21 Chong Yidong <cyd@stupidchicken.com>
@@ -5704,7 +5704,7 @@
57042005-03-05 Juri Linkov <juri@jurta.org> 57042005-03-05 Juri Linkov <juri@jurta.org>
5705 5705
5706 * cmdargs.texi (Emacs Invocation): Add cindex 5706 * cmdargs.texi (Emacs Invocation): Add cindex
5707 "invocation (command line arguments)" 5707 "invocation (command line arguments)".
5708 (Misc X): Add -nbc, --no-blinking-cursor. 5708 (Misc X): Add -nbc, --no-blinking-cursor.
5709 5709
57102005-03-04 Ulf Jasper <ulf.jasper@web.de> 57102005-03-04 Ulf Jasper <ulf.jasper@web.de>
diff --git a/doc/lispintro/ChangeLog b/doc/lispintro/ChangeLog
index 093a7018ca3..1ab06891961 100644
--- a/doc/lispintro/ChangeLog
+++ b/doc/lispintro/ChangeLog
@@ -212,7 +212,7 @@
212 (Simple Extension): Replace longer expression with 212 (Simple Extension): Replace longer expression with
213 `emacs-major-version'. Remove comment about `number-to-string' 213 `emacs-major-version'. Remove comment about `number-to-string'
214 function. 214 function.
215 (Miscellaneous): Add filename option, `-H', to `grep' example 215 (Miscellaneous): Add filename option, `-H', to `grep' example.
216 (debug, debug-on-entry): Replace `GNU Emacs 22' with `a recent 216 (debug, debug-on-entry): Replace `GNU Emacs 22' with `a recent
217 GNU Emacs'. 217 GNU Emacs'.
218 (edebug): More properly state where to place point for 'M-x 218 (edebug): More properly state where to place point for 'M-x
@@ -234,7 +234,7 @@
234 (sentence-end): Specify `in English' for glyphs that end a sentence. 234 (sentence-end): Specify `in English' for glyphs that end a sentence.
235 Note that in GNU Emacs 22, the name refers to both a variable and a 235 Note that in GNU Emacs 22, the name refers to both a variable and a
236 function. 236 function.
237 (fwd-sentence while loops): Write a function as one, not as a form 237 (fwd-sentence while loops): Write a function as one, not as a form.
238 (fwd-para let): Add `which' to sentence with `parstart' and `parsep'. 238 (fwd-para let): Add `which' to sentence with `parstart' and `parsep'.
239 (etags): Move sentences involving `find-tag' and sources. State 239 (etags): Move sentences involving `find-tag' and sources. State
240 location of Emacs `src' directory. 240 location of Emacs `src' directory.
@@ -356,7 +356,7 @@
3562003-11-16 Kevin Ryde <user42@zip.com.au> 3562003-11-16 Kevin Ryde <user42@zip.com.au>
357 357
358 * emacs-lisp-intro.texi: [CVS commitment by <bob@rattlesnake.com>] 358 * emacs-lisp-intro.texi: [CVS commitment by <bob@rattlesnake.com>]
359 Corrections to cross references, 359 Corrections to cross references.
360 (Interactive Options): elisp "interactive" -> "Using Interactive". 360 (Interactive Options): elisp "interactive" -> "Using Interactive".
361 (defvar and asterisk): Remove emacs "Edit Options" reference, 361 (defvar and asterisk): Remove emacs "Edit Options" reference,
362 edit-options is no longer described in the emacs manual. 362 edit-options is no longer described in the emacs manual.
diff --git a/doc/lispref/ChangeLog b/doc/lispref/ChangeLog
index 20e8150599b..cb275335ad7 100644
--- a/doc/lispref/ChangeLog
+++ b/doc/lispref/ChangeLog
@@ -6015,7 +6015,7 @@
60152005-02-05 Eli Zaretskii <eliz@gnu.org> 60152005-02-05 Eli Zaretskii <eliz@gnu.org>
6016 6016
6017 * frames.texi (Color Names): Add pointer to the X docs about RGB 6017 * frames.texi (Color Names): Add pointer to the X docs about RGB
6018 color specifications. Improve indexing 6018 color specifications. Improve indexing.
6019 (Text Terminal Colors): Replace the description of RGB values by 6019 (Text Terminal Colors): Replace the description of RGB values by
6020 an xref to "Color Names". 6020 an xref to "Color Names".
6021 6021
@@ -7778,7 +7778,7 @@
7778 * minibuf.texi (Reading File Names): read-file-name has new 7778 * minibuf.texi (Reading File Names): read-file-name has new
7779 arg PREDICATE. New function read-directory-name. 7779 arg PREDICATE. New function read-directory-name.
7780 7780
7781 * macros.texi (Defining Macros): Give definition of `declare' 7781 * macros.texi (Defining Macros): Give definition of `declare'.
7782 (Indenting Macros): New node. 7782 (Indenting Macros): New node.
7783 7783
7784 * frames.texi (Parameter Access): Add modify-all-frames-parameters. 7784 * frames.texi (Parameter Access): Add modify-all-frames-parameters.
@@ -7882,7 +7882,7 @@
7882 * numbers.texi (Integer Basics): Add most-positive-fixnum, 7882 * numbers.texi (Integer Basics): Add most-positive-fixnum,
7883 most-negative-fixnum. 7883 most-negative-fixnum.
7884 7884
7885 * compile.texi (Byte Compilation): Explain no-byte-compile 7885 * compile.texi (Byte Compilation): Explain no-byte-compile.
7886 (Compiler Errors): New node. 7886 (Compiler Errors): New node.
7887 7887
7888 * os.texi (User Identification): user-uid, user-real-uid 7888 * os.texi (User Identification): user-uid, user-real-uid
diff --git a/doc/misc/ChangeLog b/doc/misc/ChangeLog
index 44d1e00be0d..29767dfa2a7 100644
--- a/doc/misc/ChangeLog
+++ b/doc/misc/ChangeLog
@@ -4777,7 +4777,7 @@
4777 4777
4778 * org.texi (FAQ): Document `org-table-tab-jumps-over-hlines'. 4778 * org.texi (FAQ): Document `org-table-tab-jumps-over-hlines'.
4779 (Agenda): Document commands `org-cycle-agenda-files' and 4779 (Agenda): Document commands `org-cycle-agenda-files' and
4780 `org-agenda-file-to-front' 4780 `org-agenda-file-to-front'.
4781 (Built-in table editor): Document `org-table-sort-lines'. 4781 (Built-in table editor): Document `org-table-sort-lines'.
4782 (HTML formatting): Export of hand-formatted lists. 4782 (HTML formatting): Export of hand-formatted lists.
4783 4783
@@ -6366,7 +6366,7 @@
6366 6366
63672000-12-14 Dave Love <fx@gnu.org> 63672000-12-14 Dave Love <fx@gnu.org>
6368 6368
6369 * Makefile.in (mostlyclean): Remove gnustmp.* 6369 * Makefile.in (mostlyclean): Remove gnustmp.*.
6370 (gnus.dvi): Change rule to remove @latex stuff. 6370 (gnus.dvi): Change rule to remove @latex stuff.
6371 6371
63722000-10-19 Eric M. Ludlam <zappo@ultranet.com> 63722000-10-19 Eric M. Ludlam <zappo@ultranet.com>
diff --git a/etc/ChangeLog b/etc/ChangeLog
index ee1915245a0..a2770c12305 100644
--- a/etc/ChangeLog
+++ b/etc/ChangeLog
@@ -1,3 +1,8 @@
12010-07-24 Christoph Scholtes <cschol2112@gmail.com>
2
3 * NEWS: Document new --distfiles configure.bat option and
4 `dist' make target on Windows.
5
12010-07-20 Juanma Barranquero <lekktu@gmail.com> 62010-07-20 Juanma Barranquero <lekktu@gmail.com>
2 7
3 * PROBLEMS: Add note about use of backslashes in Windows paths. 8 * PROBLEMS: Add note about use of backslashes in Windows paths.
@@ -4941,7 +4946,7 @@
4941 * etags.c: Changes for VMS. 4946 * etags.c: Changes for VMS.
4942 Always define ETAGS on VMS. 4947 Always define ETAGS on VMS.
4943 Define macros GOOD and BAD for success and failure exit codes. 4948 Define macros GOOD and BAD for success and failure exit codes.
4944 (begtk, intk): Allow `$' in identifiers 4949 (begtk, intk): Allow `$' in identifiers.
4945 (main): Don't support -B, -F or -u on VMS. 4950 (main): Don't support -B, -F or -u on VMS.
4946 Alternate loop for scanning filename arguments. 4951 Alternate loop for scanning filename arguments.
4947 (system): Delete definition of this function. 4952 (system): Delete definition of this function.
diff --git a/etc/NEWS b/etc/NEWS
index 31dd69d5b4c..6b781ab8364 100644
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -432,6 +432,12 @@ displayed with a "spinning bar".
432** New configure.bat option --enable-checking builds emacs with extra 432** New configure.bat option --enable-checking builds emacs with extra
433runtime checks. 433runtime checks.
434 434
435** New configure.bat option --distfiles to specify files to be
436 included in binary distribution
437
438** New make target `dist' to create binary disttribution for Windows
439 platform
440
435 441
436---------------------------------------------------------------------- 442----------------------------------------------------------------------
437This file is part of GNU Emacs. 443This file is part of GNU Emacs.
diff --git a/leim/ChangeLog b/leim/ChangeLog
index 972a3279a29..174102b7817 100644
--- a/leim/ChangeLog
+++ b/leim/ChangeLog
@@ -1189,7 +1189,7 @@
1189 1189
11902001-03-31 Kenichi Handa <handa@etl.go.jp> 11902001-03-31 Kenichi Handa <handa@etl.go.jp>
1191 1191
1192 * Makefile.in (TIT-GB): Delete quail/PY.elc and quail/ZIRANMA.elc 1192 * Makefile.in (TIT-GB): Delete quail/PY.elc and quail/ZIRANMA.elc.
1193 (NON-TIT-BIG5): Delete ${srcdir}/quail/quick-b5.elc 1193 (NON-TIT-BIG5): Delete ${srcdir}/quail/quick-b5.elc
1194 ${srcdir}/quail/tsang-b5.elc. 1194 ${srcdir}/quail/tsang-b5.elc.
1195 (CHINESE-NON-TIT): Delete ${NON-TIT-CNS}. 1195 (CHINESE-NON-TIT): Delete ${NON-TIT-CNS}.
diff --git a/lib-src/ChangeLog b/lib-src/ChangeLog
index 1b6a16dd524..d0ab1087aa9 100644
--- a/lib-src/ChangeLog
+++ b/lib-src/ChangeLog
@@ -1,3 +1,30 @@
12010-07-25 Juanma Barranquero <lekktu@gmail.com>
2
3 * emacsclient.c (getcwd): Fix previous change: make getcwd
4 conditional on HAVE_GETCWD and declare with the correct POSIX
5 profile (for some reason MinGW headers define its 2nd arg as int,
6 not size_t; but getcwd is not used on Windows nonetheless).
7
82010-07-25 Juanma Barranquero <lekktu@gmail.com>
9
10 * emacsclient.c (getcwd, w32_getenv):
11 * ntlib.h (getlogin, getuid, getegid, getgid): Fix prototypes.
12
132010-07-24 Dan Nicolaescu <dann@ics.uci.edu>
14
15 * update-game-score.c (usage): Add NO_RETURN specifier.
16 * movemail.c (fatal, pfatal_with_name, pfatal_and_delete):
17 * make-docfile.c (fatal):
18 * hexl.c (usage):
19 * fakemail.c (fatal):
20 * etags.c (fatal, suggest_asking_for_help, pfatal):
21 * emacsclient.c (fatal):
22 * b2m.c (fatal): Likewise.
23
242010-07-23 Juanma Barranquero <lekktu@gmail.com>
25
26 * make-docfile.c (write_c_args): Correctly handle prefixes of "defalt".
27
12010-07-20 Juanma Barranquero <lekktu@gmail.com> 282010-07-20 Juanma Barranquero <lekktu@gmail.com>
2 29
3 * emacsclient.c (get_current_dir_name, w32_get_resource) 30 * emacsclient.c (get_current_dir_name, w32_get_resource)
@@ -775,7 +802,7 @@
775 802
7762008-02-01 Jason Rumney <jasonr@gnu.org> 8032008-02-01 Jason Rumney <jasonr@gnu.org>
777 804
778 * makefile.w32-in (obj): Sync with src/Makefile.in 805 * makefile.w32-in (obj): Sync with src/Makefile.in.
779 (TOOLTIP_SUPPORT, WINDOW_SUPPORT): New definitions. 806 (TOOLTIP_SUPPORT, WINDOW_SUPPORT): New definitions.
780 (WINNT_SUPPORT): Add term/w32-win.elc. 807 (WINNT_SUPPORT): Add term/w32-win.elc.
781 (lisp1, lisp2): Sync with lisp in src/Makefile.in. 808 (lisp1, lisp2): Sync with lisp in src/Makefile.in.
@@ -2471,7 +2498,7 @@
2471 2498
2472 * makefile.w32-in (WINNT_SUPPORT, MOUSE_SUPPORT, lisp): Revert to 2499 * makefile.w32-in (WINNT_SUPPORT, MOUSE_SUPPORT, lisp): Revert to
2473 using .elc files. 2500 using .elc files.
2474 (lisp): Sync with list in src/Makefile.in 2501 (lisp): Sync with list in src/Makefile.in.
2475 (VMS_SUPPORT, MSDOS_SUPPORT): Define, so DOC files can be shared. 2502 (VMS_SUPPORT, MSDOS_SUPPORT): Define, so DOC files can be shared.
2476 2503
24772002-02-10 Paul Eggert <eggert@twinsun.com> 25042002-02-10 Paul Eggert <eggert@twinsun.com>
@@ -6313,7 +6340,7 @@
6313 (TOKEN): Member linestart removed. 6340 (TOKEN): Member linestart removed.
6314 (linepos, prev_linepos, lb1): Deleted. 6341 (linepos, prev_linepos, lb1): Deleted.
6315 (main): Call initbuffer on lbs array instead of lb1. 6342 (main): Call initbuffer on lbs array instead of lb1.
6316 (init): Removed the initialisation of the logical _gd array; 6343 (init): Removed the initialisation of the logical _gd array.
6317 (find_entries): A .sa suffix means assembler file. 6344 (find_entries): A .sa suffix means assembler file.
6318 (C_create_stab): "auto", "void", "extern", "static" are st_C_typespec. 6345 (C_create_stab): "auto", "void", "extern", "static" are st_C_typespec.
6319 All C state machines rewritten. 6346 All C state machines rewritten.
@@ -7177,7 +7204,7 @@
7177 * etags.c: Changes for VMS. 7204 * etags.c: Changes for VMS.
7178 Always define ETAGS on VMS. 7205 Always define ETAGS on VMS.
7179 Define macros GOOD and BAD for success and failure exit codes. 7206 Define macros GOOD and BAD for success and failure exit codes.
7180 (begtk, intk): Allow `$' in identifiers 7207 (begtk, intk): Allow `$' in identifiers.
7181 (main): Don't support -B, -F or -u on VMS. 7208 (main): Don't support -B, -F or -u on VMS.
7182 Alternate loop for scanning filename arguments. 7209 Alternate loop for scanning filename arguments.
7183 (system): Delete definition of this function. 7210 (system): Delete definition of this function.
diff --git a/lib-src/b2m.c b/lib-src/b2m.c
index 733cd276653..f31b33f9780 100644
--- a/lib-src/b2m.c
+++ b/lib-src/b2m.c
@@ -70,7 +70,7 @@ long *xmalloc (unsigned int size);
70long *xrealloc (char *ptr, unsigned int size); 70long *xrealloc (char *ptr, unsigned int size);
71char *concat (char *s1, char *s2, char *s3); 71char *concat (char *s1, char *s2, char *s3);
72long readline (struct linebuffer *linebuffer, register FILE *stream); 72long readline (struct linebuffer *linebuffer, register FILE *stream);
73void fatal (char *message); 73void fatal (char *message) NO_RETURN;
74 74
75/* 75/*
76 * xnew -- allocate storage. SYNOPSIS: Type *xnew (int n, Type); 76 * xnew -- allocate storage. SYNOPSIS: Type *xnew (int n, Type);
diff --git a/lib-src/emacsclient.c b/lib-src/emacsclient.c
index bafc7e02720..1ca9b793f3a 100644
--- a/lib-src/emacsclient.c
+++ b/lib-src/emacsclient.c
@@ -82,10 +82,12 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
82 82
83 83
84char *getenv (const char *), *getwd (char *); 84char *getenv (const char *), *getwd (char *);
85char *(getcwd) (); 85#ifdef HAVE_GETCWD
86char *(getcwd) (char *, size_t);
87#endif
86 88
87#ifdef WINDOWSNT 89#ifdef WINDOWSNT
88char *w32_getenv (); 90char *w32_getenv (char *);
89#define egetenv(VAR) w32_getenv(VAR) 91#define egetenv(VAR) w32_getenv(VAR)
90#else 92#else
91#define egetenv(VAR) getenv(VAR) 93#define egetenv(VAR) getenv(VAR)
@@ -158,6 +160,8 @@ char *server_file = NULL;
158int emacs_pid = 0; 160int emacs_pid = 0;
159 161
160void print_help_and_exit (void) NO_RETURN; 162void print_help_and_exit (void) NO_RETURN;
163void fail (void) NO_RETURN;
164
161 165
162struct option longopts[] = 166struct option longopts[] =
163{ 167{
@@ -400,7 +404,7 @@ w32_set_user_model_id (void)
400 /* On Windows 7 and later, we need to set the user model ID 404 /* On Windows 7 and later, we need to set the user model ID
401 to associate emacsclient launched files with Emacs frames 405 to associate emacsclient launched files with Emacs frames
402 in the UI. */ 406 in the UI. */
403 shell = LoadLibrary("shell32.dll"); 407 shell = LoadLibrary ("shell32.dll");
404 if (shell) 408 if (shell)
405 { 409 {
406 set_user_model 410 set_user_model
@@ -430,7 +434,7 @@ w32_window_app (void)
430 nonconsole apps. Testing for the console title seems to work. */ 434 nonconsole apps. Testing for the console title seems to work. */
431 window_app = (GetConsoleTitleA (szTitle, MAX_PATH) == 0); 435 window_app = (GetConsoleTitleA (szTitle, MAX_PATH) == 0);
432 if (window_app) 436 if (window_app)
433 InitCommonControls(); 437 InitCommonControls ();
434 } 438 }
435 439
436 return window_app; 440 return window_app;
@@ -481,7 +485,7 @@ ttyname (int fd)
481void 485void
482message (int is_error, char *message, ...) 486message (int is_error, char *message, ...)
483{ 487{
484 char msg [2048]; 488 char msg[2048];
485 va_list args; 489 va_list args;
486 490
487 va_start (args, message); 491 va_start (args, message);
@@ -1468,7 +1472,7 @@ start_daemon_and_retry_set_socket (void)
1468 pid_t w; 1472 pid_t w;
1469 w = waitpid (dpid, &status, WUNTRACED | WCONTINUED); 1473 w = waitpid (dpid, &status, WUNTRACED | WCONTINUED);
1470 1474
1471 if ((w == -1) || !WIFEXITED (status) || WEXITSTATUS(status)) 1475 if ((w == -1) || !WIFEXITED (status) || WEXITSTATUS (status))
1472 { 1476 {
1473 message (TRUE, "Error: Could not start the Emacs daemon\n"); 1477 message (TRUE, "Error: Could not start the Emacs daemon\n");
1474 exit (EXIT_FAILURE); 1478 exit (EXIT_FAILURE);
diff --git a/lib-src/etags.c b/lib-src/etags.c
index 79475fe9922..b78686dde57 100644
--- a/lib-src/etags.c
+++ b/lib-src/etags.c
@@ -406,9 +406,9 @@ static void analyse_regex (char *);
406static void free_regexps (void); 406static void free_regexps (void);
407static void regex_tag_multiline (void); 407static void regex_tag_multiline (void);
408static void error (const char *, const char *); 408static void error (const char *, const char *);
409static void suggest_asking_for_help (void); 409static void suggest_asking_for_help (void) NO_RETURN;
410void fatal (char *, char *); 410void fatal (char *, char *) NO_RETURN;
411static void pfatal (char *); 411static void pfatal (char *) NO_RETURN;
412static void add_node (node *, node **); 412static void add_node (node *, node **);
413 413
414static void init (void); 414static void init (void);
diff --git a/lib-src/fakemail.c b/lib-src/fakemail.c
index f4d978b7d11..72e1b7179c0 100644
--- a/lib-src/fakemail.c
+++ b/lib-src/fakemail.c
@@ -147,6 +147,8 @@ static line_list file_preface;
147static stream_list the_streams; 147static stream_list the_streams;
148static boolean no_problems = true; 148static boolean no_problems = true;
149 149
150static void fatal (char *s1) NO_RETURN;
151
150extern FILE *popen (const char *, const char *); 152extern FILE *popen (const char *, const char *);
151extern int fclose (FILE *), pclose (FILE *); 153extern int fclose (FILE *), pclose (FILE *);
152 154
diff --git a/lib-src/hexl.c b/lib-src/hexl.c
index d730cac6814..b31ab812534 100644
--- a/lib-src/hexl.c
+++ b/lib-src/hexl.c
@@ -49,7 +49,7 @@ int base = DEFAULT_BASE, un_flag = FALSE, iso_flag = FALSE, endian = 1;
49int group_by = DEFAULT_GROUPING; 49int group_by = DEFAULT_GROUPING;
50char *progname; 50char *progname;
51 51
52void usage(void); 52void usage(void) NO_RETURN;
53 53
54int 54int
55main (int argc, char **argv) 55main (int argc, char **argv)
diff --git a/lib-src/make-docfile.c b/lib-src/make-docfile.c
index 51c30f91d8f..4b5012902a0 100644
--- a/lib-src/make-docfile.c
+++ b/lib-src/make-docfile.c
@@ -70,6 +70,7 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
70int scan_file (char *filename); 70int scan_file (char *filename);
71int scan_lisp_file (char *filename, char *mode); 71int scan_lisp_file (char *filename, char *mode);
72int scan_c_file (char *filename, char *mode); 72int scan_c_file (char *filename, char *mode);
73void fatal (char *s1, char *s2) NO_RETURN;
73 74
74#ifdef MSDOS 75#ifdef MSDOS
75/* s/msdos.h defines this as sys_chdir, but we're not linking with the 76/* s/msdos.h defines this as sys_chdir, but we're not linking with the
@@ -488,7 +489,7 @@ write_c_args (FILE *out, char *func, char *buf, int minargs, int maxargs)
488 489
489 /* In C code, `default' is a reserved word, so we spell it 490 /* In C code, `default' is a reserved word, so we spell it
490 `defalt'; unmangle that here. */ 491 `defalt'; unmangle that here. */
491 if (strncmp (ident_start, "defalt", ident_length) == 0) 492 if (ident_length == 6 && strncmp (ident_start, "defalt", 6) == 0)
492 fprintf (out, "DEFAULT"); 493 fprintf (out, "DEFAULT");
493 else 494 else
494 while (ident_length-- > 0) 495 while (ident_length-- > 0)
diff --git a/lib-src/movemail.c b/lib-src/movemail.c
index 541edf545df..bb4a922014c 100644
--- a/lib-src/movemail.c
+++ b/lib-src/movemail.c
@@ -147,10 +147,10 @@ static char *mail_spool_name ();
147char *strerror (int); 147char *strerror (int);
148#endif 148#endif
149 149
150static void fatal (char *s1, char *s2, char *s3); 150static void fatal (char *s1, char *s2, char *s3) NO_RETURN;
151static void error (char *s1, char *s2, char *s3); 151static void error (char *s1, char *s2, char *s3);
152static void pfatal_with_name (char *name); 152static void pfatal_with_name (char *name) NO_RETURN;
153static void pfatal_and_delete (char *name); 153static void pfatal_and_delete (char *name) NO_RETURN;
154static char *concat (char *s1, char *s2, char *s3); 154static char *concat (char *s1, char *s2, char *s3);
155static long *xmalloc (unsigned int size); 155static long *xmalloc (unsigned int size);
156#ifdef MAIL_USE_POP 156#ifdef MAIL_USE_POP
diff --git a/lib-src/ntlib.h b/lib-src/ntlib.h
index fd51269fdfd..4dd6a32ee32 100644
--- a/lib-src/ntlib.h
+++ b/lib-src/ntlib.h
@@ -30,14 +30,14 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
30#ifdef sleep 30#ifdef sleep
31#undef sleep 31#undef sleep
32#endif 32#endif
33void sleep(unsigned long seconds); 33void sleep (unsigned long seconds);
34char *getwd (char *dir); 34char *getwd (char *dir);
35int getppid(void); 35int getppid (void);
36char * getlogin (); 36char * getlogin (void);
37char * cuserid (char * s); 37char * cuserid (char * s);
38unsigned getuid (); 38unsigned getuid (void);
39unsigned getegid (); 39unsigned getegid (void);
40unsigned getgid (); 40unsigned getgid (void);
41int setuid (unsigned uid); 41int setuid (unsigned uid);
42int setegid (unsigned gid); 42int setegid (unsigned gid);
43char * getpass (const char * prompt); 43char * getpass (const char * prompt);
diff --git a/lib-src/update-game-score.c b/lib-src/update-game-score.c
index a96422a09a9..30208d5c8d2 100644
--- a/lib-src/update-game-score.c
+++ b/lib-src/update-game-score.c
@@ -60,6 +60,8 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
60extern char *optarg; 60extern char *optarg;
61extern int optind, opterr; 61extern int optind, opterr;
62 62
63int usage (int err) NO_RETURN;
64
63#define MAX_ATTEMPTS 5 65#define MAX_ATTEMPTS 5
64#define MAX_SCORES 200 66#define MAX_SCORES 200
65#define MAX_DATA_LEN 1024 67#define MAX_DATA_LEN 1024
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3ee371f06b2..e5629f41588 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,51 @@
12010-07-25 Daiki Ueno <ueno@unixuser.org>
2
3 * epa-file.el (epa-file-insert-file-contents): Check if LOCAL-FILE
4 exists before passing an error to find-file-not-found-functions
5 (bug#6723).
6
72010-07-23 Lukas Huonker <l.huonker@gmail.com>
8
9 * play/tetris.el (tetris-tty-colors, tetris-x-colors, tetris-blank):
10 Remove leading nil element, adjust values.
11 (tetris-shapes, tetris-shape-scores):
12 Change representation of shapes and remove some redundancy.
13 (tetris-get-shape-cell, tetris-shape-width, tetris-draw-next-shape)
14 (tetris-draw-shape, tetris-erase-shape, tetris-test-shape):
15 Adjust for working with new representation of shapes.
16 (tetris-shape-rotations): New function.
17 (tetris-move-bottom, tetris-move-left, tetris-move-right)
18 (tetris-rotate-prev, tetris-rotate-next):
19 Adjust for working with the new version of tetris-test-shape.
20
212010-07-23 Markus Triska <markus.triska@gmx.at>
22
23 * progmodes/ps-mode.el: Use comint (bug#5954).
24 (ps-run-mode-map): Adapt for comint-mode; omit "\r", [return]..
25 (ps-mode-other-newline): Simplify.
26 (ps-run-mode): Derive from comint-mode instead of
27 fundamental-mode, yielding input history etc.
28 (ps-run-start, ps-run-quit, ps-run-clear, ps-run-region)
29 (ps-run-send-string): Adapt for comint-mode.
30 (ps-run-newline): Remove now unneeded function.
31
322010-07-23 Michael Albinus <michael.albinus@gmx.de>
33
34 * net/tramp.el (tramp-methods): Move hostname to the end in all
35 plink `tramp-login-args'.
36
372010-07-23 Michael Albinus <michael.albinus@gmx.de>
38
39 * net/tramp.el (tramp-open-shell): New defun.
40 (tramp-find-shell, tramp-open-connection-setup-interactive-shell):
41 Use it.
42
432010-07-23 Michael Albinus <michael.albinus@gmx.de>
44
45 * net/tramp.el (tramp-file-name-regexp-unified)
46 (tramp-completion-file-name-regexp-unified): On W32 systems, do
47 not regard the volume letter as remote filename. (Bug#5447)
48
12010-07-23 Juanma Barranquero <lekktu@gmail.com> 492010-07-23 Juanma Barranquero <lekktu@gmail.com>
2 50
3 * custom.el (custom-declare-variable): Give a clearer error message 51 * custom.el (custom-declare-variable): Give a clearer error message
@@ -15,7 +63,7 @@
15 (sql-linter-login-params): Use it. 63 (sql-linter-login-params): Use it.
16 (sql-sqlite-login-params): Use it; Define "database" parameter as 64 (sql-sqlite-login-params): Use it; Define "database" parameter as
17 a file name. 65 a file name.
18 (sql-sqlite-program): Change to "sqlite3" 66 (sql-sqlite-program): Change to "sqlite3".
19 (sql-comint-sqlite): Make sure database name is complete. 67 (sql-comint-sqlite): Make sure database name is complete.
20 (sql-for-each-login): New function. 68 (sql-for-each-login): New function.
21 (sql-connect, sql-save-connection): Use it. 69 (sql-connect, sql-save-connection): Use it.
@@ -99,7 +147,7 @@
99 (sql-informix-login-params, sql-ingres-login-params) 147 (sql-informix-login-params, sql-ingres-login-params)
100 (sql-ms-login-params, sql-postgres-login-params) 148 (sql-ms-login-params, sql-postgres-login-params)
101 (sql-interbase-login-params, sql-db2-login-params) 149 (sql-interbase-login-params, sql-db2-login-params)
102 (sql-linter-login-params): Add `port' option 150 (sql-linter-login-params): Add `port' option.
103 (sql-get-product-feature): Added NO-INDIRECT parameter. 151 (sql-get-product-feature): Added NO-INDIRECT parameter.
104 (sql-comint-oracle, sql-comint-sybase) 152 (sql-comint-oracle, sql-comint-sybase)
105 (sql-comint-informix, sql-comint-sqlite, sql-comint-mysql) 153 (sql-comint-informix, sql-comint-sqlite, sql-comint-mysql)
@@ -109,7 +157,7 @@
109 sql-comint-*. 157 sql-comint-*.
110 (sql-product-alist, sql-mode-menu): Renamed as above and 158 (sql-product-alist, sql-mode-menu): Renamed as above and
111 :sqli-connect-func to :sqli-comint-func. 159 :sqli-connect-func to :sqli-comint-func.
112 (sql-connection): New variable 160 (sql-connection): New variable.
113 (sql-interactive-mode): Set it. 161 (sql-interactive-mode): Set it.
114 (sql-connection-alist): New variable. 162 (sql-connection-alist): New variable.
115 (sql-connect): New function. 163 (sql-connect): New function.
@@ -305,7 +353,7 @@
305 353
306 * epa-file.el (epa-file-error, epa-file--find-file-not-found-function) 354 * epa-file.el (epa-file-error, epa-file--find-file-not-found-function)
307 (epa-file-insert-file-contents): Hack to prevent 355 (epa-file-insert-file-contents): Hack to prevent
308 find-file from opening empty buffer when decryptin failed 356 find-file from opening empty buffer when decryption failed
309 (bug#6568). 357 (bug#6568).
310 358
3112010-07-07 Agustín Martín <agustin.martin@hispalinux.es> 3592010-07-07 Agustín Martín <agustin.martin@hispalinux.es>
@@ -3250,7 +3298,7 @@
3250 (verilog-pretty-declarations): Support lineup of declarations in 3298 (verilog-pretty-declarations): Support lineup of declarations in
3251 port lists. 3299 port lists.
3252 (verilog-skip-backward-comments, verilog-skip-forward-comment-p): 3300 (verilog-skip-backward-comments, verilog-skip-forward-comment-p):
3253 fix bug for /* / comments 3301 fix bug for /* / comments.
3254 (verilog-backward-syntactic-ws, verilog-forward-syntactic-ws): 3302 (verilog-backward-syntactic-ws, verilog-forward-syntactic-ws):
3255 Speed up and simplfy as this is never called with a bound. 3303 Speed up and simplfy as this is never called with a bound.
3256 (verilog-pretty-declarations): Enhance to line up declarations 3304 (verilog-pretty-declarations): Enhance to line up declarations
@@ -5359,7 +5407,7 @@
5359 5407
53602010-01-02 Karl Fogel <kfogel@red-bean.com> 54082010-01-02 Karl Fogel <kfogel@red-bean.com>
5361 5409
5362 * bookmark.el (bookmark-bmenu-any-marks): New function 5410 * bookmark.el (bookmark-bmenu-any-marks): New function.
5363 (bookmark-bmenu-save): Clear buffer modification if no marks. 5411 (bookmark-bmenu-save): Clear buffer modification if no marks.
5364 5412
53652010-01-02 Karl Fogel <kfogel@red-bean.com> 54132010-01-02 Karl Fogel <kfogel@red-bean.com>
diff --git a/lisp/ChangeLog.1 b/lisp/ChangeLog.1
index bd8b8c3ae27..8d9cf2a6eb2 100644
--- a/lisp/ChangeLog.1
+++ b/lisp/ChangeLog.1
@@ -1021,8 +1021,6 @@
1021 in the *compilation* buffer, thus allowing buffers to have local 1021 in the *compilation* buffer, thus allowing buffers to have local
1022 compilation-error-regexp variables. 1022 compilation-error-regexp variables.
1023 1023
1024 (provide 'compile)
1025
10261985-12-05 Richard M. Stallman (rms@prep) 10241985-12-05 Richard M. Stallman (rms@prep)
1027 1025
1028 * files.el (recover-file): 1026 * files.el (recover-file):
@@ -1495,7 +1493,7 @@
1495 1493
1496 * mouseinit.el 1494 * mouseinit.el
1497 Delete this file. Put its contents in files 1495 Delete this file. Put its contents in files
1498 term-bg.el, term-bgnv.el, term-bgrv.el, term-bbn.el 1496 term-bg.el, term-bgnv.el, term-bgrv.el, term-bbn.el.
1499 (Perhaps there should be a subdirectory emacs/lisp/term/ ??) 1497 (Perhaps there should be a subdirectory emacs/lisp/term/ ??)
1500 1498
15011985-10-23 Richard M. Stallman (rms@prep) 14991985-10-23 Richard M. Stallman (rms@prep)
@@ -1915,7 +1913,7 @@
1915 1913
1916 * texinfo.el: 1914 * texinfo.el:
1917 Change syntax for @xref and @pxref to use braces. 1915 Change syntax for @xref and @pxref to use braces.
1918 Change syntax for @node to read entire line 1916 Change syntax for @node to read entire line.
1919 (new function texinfo-format-parse-line-args for that). 1917 (new function texinfo-format-parse-line-args for that).
1920 Change paragraph-separate, etc., so only directives without 1918 Change paragraph-separate, etc., so only directives without
1921 braces separate paragraphs. When formatting, discard all of the 1919 braces separate paragraphs. When formatting, discard all of the
@@ -2178,8 +2176,8 @@
2178 "c-continued-statement-offset" as in the documentation and manual 2176 "c-continued-statement-offset" as in the documentation and manual
2179 2177
2180 * rmail.el (rmail-find): 2178 * rmail.el (rmail-find):
2181 Hack default of last search string, hack reverse search 2179 Hack default of last search string, hack reverse search.
2182 (-ve prefix arg) 2180 (-ve prefix arg):
2183 Make "-" be negative-argument 2181 Make "-" be negative-argument
2184 2182
21851985-07-23 Richard Mlynarik (mly@mit-prep) 21831985-07-23 Richard Mlynarik (mly@mit-prep)
@@ -3097,7 +3095,7 @@
3097 3095
3098 * sendmail.el, loaddefs.el 3096 * sendmail.el, loaddefs.el
3099 added send-mail-function; initially sendmail-send-it 3097 added send-mail-function; initially sendmail-send-it
3100 (also, mail-yank-ignored-headers had a typo) 3098 (also, mail-yank-ignored-headers had a typo).
3101 3099
3102 * rmail.el (rmail-get-new-mail, convert-to-babyl-format, ...) 3100 * rmail.el (rmail-get-new-mail, convert-to-babyl-format, ...)
3103 * loaddefs.el: 3101 * loaddefs.el:
diff --git a/lisp/ChangeLog.10 b/lisp/ChangeLog.10
index 50b82e13a15..cf4d13ccefb 100644
--- a/lisp/ChangeLog.10
+++ b/lisp/ChangeLog.10
@@ -1357,7 +1357,7 @@
1357 1357
13582003-06-10 Rajesh Vaidheeswarran <rv@gnu.org> 13582003-06-10 Rajesh Vaidheeswarran <rv@gnu.org>
1359 1359
1360 * whitespace.el (whitespace-version): Bump to 3.3 1360 * whitespace.el (whitespace-version): Bump to 3.3.
1361 (whitespace-cleanup): Respect user preference for silence 1361 (whitespace-cleanup): Respect user preference for silence
1362 1362
1363 * whitespace.el: Remove :tag in commentary :link. Remove empty 1363 * whitespace.el: Remove :tag in commentary :link. Remove empty
@@ -1645,7 +1645,7 @@
1645 (bibtex-version): Remove support for bug reporting. 1645 (bibtex-version): Remove support for bug reporting.
1646 (bibtex-field-delimiters, bibtex-entry-delimiters) 1646 (bibtex-field-delimiters, bibtex-entry-delimiters)
1647 (bibtex-sort-ignore-string-entries, bibtex-maintain-sorted-entries) 1647 (bibtex-sort-ignore-string-entries, bibtex-maintain-sorted-entries)
1648 Replace make-variable-buffer-local by make-local-variable for 1648 Replace make-variable-buffer-local by make-local-variable.
1649 (bibtex-entry-format): New tag `required-fields'. 1649 (bibtex-entry-format): New tag `required-fields'.
1650 (bibtex-maintain-sorted-entries): New var. 1650 (bibtex-maintain-sorted-entries): New var.
1651 (bibtex-sort-entry-class, bibtex-sort-entry-class-alist): New vars. 1651 (bibtex-sort-entry-class, bibtex-sort-entry-class-alist): New vars.
@@ -4069,9 +4069,9 @@
4069 (ccl-encode-mule-utf-16-le-with-signature) 4069 (ccl-encode-mule-utf-16-le-with-signature)
4070 (ccl-encode-mule-utf-16-be-with-signature): New CCL programs. 4070 (ccl-encode-mule-utf-16-be-with-signature): New CCL programs.
4071 (mule-utf-16-post-read-conversion): New function. 4071 (mule-utf-16-post-read-conversion): New function.
4072 (mule-utf-16-le-with-signature, mule-utf-16-be-with-signature), 4072 (mule-utf-16-le-with-signature, mule-utf-16-be-with-signature)
4073 (mule-utf-16): New coding systems. 4073 (mule-utf-16): New coding systems.
4074 (utf-16-le-with-signature, utf-16-be-with-signature), 4074 (utf-16-le-with-signature, utf-16-be-with-signature)
4075 (utf-16): Aliases of the above coding systems. 4075 (utf-16): Aliases of the above coding systems.
4076 4076
40772003-04-08 Martin Stjernholm <bug-cc-mode@gnu.org> 40772003-04-08 Martin Stjernholm <bug-cc-mode@gnu.org>
@@ -4109,7 +4109,7 @@
4109 Other cleanups. 4109 Other cleanups.
4110 Command line option --no-desktop introduced. 4110 Command line option --no-desktop introduced.
4111 (desktop-read): Record buffers in the desktop file in 4111 (desktop-read): Record buffers in the desktop file in
4112 the same order as that in the buffer list, 4112 the same order as that in the buffer list.
4113 (desktop-save): Put buffers in the order given in desktop file, 4113 (desktop-save): Put buffers in the order given in desktop file,
4114 regardless of what handlers do. 4114 regardless of what handlers do.
4115 (desktop-file-version): New variable. Version number of desktop 4115 (desktop-file-version): New variable. Version number of desktop
@@ -7684,7 +7684,7 @@
7684 * gdb-ui.el : Remove inappropriate key-bindings. 7684 * gdb-ui.el : Remove inappropriate key-bindings.
7685 (gdb-info-breakpoints-custom, gdb-goto-bp-this-line): 7685 (gdb-info-breakpoints-custom, gdb-goto-bp-this-line):
7686 Parse correctly when breakpoint has no line number. 7686 Parse correctly when breakpoint has no line number.
7687 (def-gdb-auto-update-handler, gdb-info-locals-handler), 7687 (def-gdb-auto-update-handler, gdb-info-locals-handler)
7688 (gdb-display-end): Avoid using insert-buffer. 7688 (gdb-display-end): Avoid using insert-buffer.
7689 (gdb-frames-select-by-mouse): Rename gdb-frames-mouse-select. 7689 (gdb-frames-select-by-mouse): Rename gdb-frames-mouse-select.
7690 7690
@@ -20177,10 +20177,10 @@
20177 20177
201782002-01-05 Andre Spiegel <spiegel@gnu.org> 201782002-01-05 Andre Spiegel <spiegel@gnu.org>
20179 20179
20180 * vc.el (vc-branch-part): Return nil if there's no `.' 20180 * vc.el (vc-branch-part): Return nil if there's no `.'.
20181 (vc-default-previous-version): Renamed from vc-previous-version. 20181 (vc-default-previous-version): Renamed from vc-previous-version.
20182 New args BACKEND and FILE. Return nil for revision numbers 20182 New args BACKEND and FILE. Return nil for revision numbers
20183 without a `.' 20183 without a `.'.
20184 (vc-version-diff): Call vc-BACKEND-previous-version. 20184 (vc-version-diff): Call vc-BACKEND-previous-version.
20185 (vc-steal-lock): Steal lock before composing mail, so that no mail 20185 (vc-steal-lock): Steal lock before composing mail, so that no mail
20186 is sent when the stealing goes wrong. And we'll actually see the 20186 is sent when the stealing goes wrong. And we'll actually see the
@@ -23253,11 +23253,11 @@
23253 lambda expression. 23253 lambda expression.
23254 (ps-mode-menu-main): Submenu with options on/off was replaced with 23254 (ps-mode-menu-main): Submenu with options on/off was replaced with
23255 a toggle button. 23255 a toggle button.
23256 (ps-mode, ps-run-mode): Define with `define-derived-mode' 23256 (ps-mode, ps-run-mode): Define with `define-derived-mode'.
23257 (ps-mode): Autoload cookie added on same line as comment. 23257 (ps-mode): Autoload cookie added on same line as comment.
23258 (ps-mode-tabkey, ps-mode-backward-delete-char): 23258 (ps-mode-tabkey, ps-mode-backward-delete-char):
23259 (ps-mode-r-balance): Replace `delete-horizontal-space' and 23259 (ps-mode-r-balance): Replace `delete-horizontal-space' and
23260 `indent-to' with `indent-line-to' 23260 `indent-to' with `indent-line-to'.
23261 (ps-mode-print-buffer, ps-mode-print-region): Use `funcall' 23261 (ps-mode-print-buffer, ps-mode-print-region): Use `funcall'
23262 instead of `eval'. 23262 instead of `eval'.
23263 (ps-mode-print-region): Use `with-temp-buffer'. 23263 (ps-mode-print-region): Use `with-temp-buffer'.
@@ -23464,7 +23464,7 @@
23464 (vc-default-annotate-current-time): Added. 23464 (vc-default-annotate-current-time): Added.
23465 23465
23466 * vc-cvs.el (vc-cvs-annotate-difference): Removed to generic 23466 * vc-cvs.el (vc-cvs-annotate-difference): Removed to generic
23467 version in vc.el, with 23467 version in vc.el.
23468 (vc-cvs-annotate-current-time): Added, as override of default. 23468 (vc-cvs-annotate-current-time): Added, as override of default.
23469 (vc-cvs-annotate-time): Added. Taken mostly from the (now removed) 23469 (vc-cvs-annotate-time): Added. Taken mostly from the (now removed)
23470 `vc-cvs-annotate-difference'. 23470 `vc-cvs-annotate-difference'.
diff --git a/lisp/ChangeLog.11 b/lisp/ChangeLog.11
index 86bf9434fc9..c1ee441ea6b 100644
--- a/lisp/ChangeLog.11
+++ b/lisp/ChangeLog.11
@@ -84,7 +84,7 @@
84 84
852004-12-30 Andreas Leue <al@sphenon.de> 852004-12-30 Andreas Leue <al@sphenon.de>
86 86
87 * textmodes/artist.el (artist-version): 1.2.6 87 * textmodes/artist.el (artist-version): 1.2.6.
88 (artist-prev-next-op-alist): New variable. 88 (artist-prev-next-op-alist): New variable.
89 (artist-select-next-op-in-list): New function. 89 (artist-select-next-op-in-list): New function.
90 (artist-select-prev-op-in-list): New function. 90 (artist-select-prev-op-in-list): New function.
@@ -380,7 +380,7 @@
380 (calculator-radix-grouping-digits) 380 (calculator-radix-grouping-digits)
381 (calculator-radix-grouping-separator): 381 (calculator-radix-grouping-separator):
382 New defcustoms for the new radix grouping mode functionality. 382 New defcustoms for the new radix grouping mode functionality.
383 (calculator-mode-hook): Now used in electric mode too, 383 (calculator-mode-hook): Now used in electric mode too.
384 (calculator): Call it. 384 (calculator): Call it.
385 (calculator-mode-map): Some new keys. 385 (calculator-mode-map): Some new keys.
386 (calculator-message): New function. Some new calls. 386 (calculator-message): New function. Some new calls.
@@ -2239,7 +2239,7 @@
2239 (math-so-far, math-integ-expr, math-expr-parts, calc-low) 2239 (math-so-far, math-integ-expr, math-expr-parts, calc-low)
2240 (calc-high, math-solve-var, math-solve-full, math-solve-vars) 2240 (calc-high, math-solve-var, math-solve-full, math-solve-vars)
2241 (math-try-solve-sign, math-solve-b, math-solve-system-vv) 2241 (math-try-solve-sign, math-solve-b, math-solve-system-vv)
2242 (math-solve-res): New variables 2242 (math-solve-res): New variables.
2243 (math-derivative, calcFunc-deriv, calcFunc-tderiv) 2243 (math-derivative, calcFunc-deriv, calcFunc-tderiv)
2244 (math-integral, math-replace-integral-parts) 2244 (math-integral, math-replace-integral-parts)
2245 (math-integrate-by-parts, calc-dump-integral-cache) 2245 (math-integrate-by-parts, calc-dump-integral-cache)
@@ -4692,7 +4692,7 @@
4692 mark mode (to include the current match to region boundaries). 4692 mark mode (to include the current match to region boundaries).
4693 Push the search string to `query-replace-from-history-variable'. 4693 Push the search string to `query-replace-from-history-variable'.
4694 Add prompt "Query replace regexp" for isearch-regexp. 4694 Add prompt "Query replace regexp" for isearch-regexp.
4695 Add region beginning/end as last arguments of `perform-replace.' 4695 Add region beginning/end as last arguments of `perform-replace'.
4696 (isearch-query-replace-regexp): Replace code by the call to 4696 (isearch-query-replace-regexp): Replace code by the call to
4697 `isearch-query-replace' with arg `t'. 4697 `isearch-query-replace' with arg `t'.
4698 4698
@@ -9809,7 +9809,7 @@
9809 9809
9810 (compile): Additional argument for interactive compiles like TeX. 9810 (compile): Additional argument for interactive compiles like TeX.
9811 9811
9812 * progmodes/grep.el (kill-grep): Move here from compile.el 9812 * progmodes/grep.el (kill-grep): Move here from compile.el.
9813 (grep-error, grep-hit-face, grep-error-face) 9813 (grep-error, grep-hit-face, grep-error-face)
9814 (grep-mode-font-lock-keywords): New variables. 9814 (grep-mode-font-lock-keywords): New variables.
9815 (grep-regexp-alist): Simplify regexp and add `binary' case. 9815 (grep-regexp-alist): Simplify regexp and add `binary' case.
@@ -10944,12 +10944,12 @@
10944 (rsf-bbdb-auto-delete-spam-entries): Rename from 10944 (rsf-bbdb-auto-delete-spam-entries): Rename from
10945 rmail-bbdb-auto-delete-spam-bbdb-entries. The cc: field is 10945 rmail-bbdb-auto-delete-spam-bbdb-entries. The cc: field is
10946 scanned together with the recipients field for spam testing; Don't 10946 scanned together with the recipients field for spam testing; Don't
10947 delete spam message if rmail-delete-after-output is non-nil; 10947 delete spam message if rmail-delete-after-output is non-nil.
10948 (rsf-check-field): New function, extracted from code in 10948 (rsf-check-field): New function, extracted from code in
10949 rmail-spam-filter to ease addition of header fields like 10949 rmail-spam-filter to ease addition of header fields like
10950 content-type:; 10950 content-type:.
10951 (message-content-type): New variable. The content-type: field was 10951 (message-content-type): New variable. The content-type: field was
10952 added also in defcustom of rsf-definitions-alist; 10952 added also in defcustom of rsf-definitions-alist.
10953 (rmail-spam-filter): Replace repeated test code for header fields 10953 (rmail-spam-filter): Replace repeated test code for header fields
10954 by calls to check-field; change the call to 10954 by calls to check-field; change the call to
10955 rmail-output-to-rmail-file such that rmail-current-message stays 10955 rmail-output-to-rmail-file such that rmail-current-message stays
@@ -11474,7 +11474,7 @@
114742003-12-29 Stuart Herring <herring@lanl.gov> (tiny change) 114742003-12-29 Stuart Herring <herring@lanl.gov> (tiny change)
11475 11475
11476 * comint.el (comint-watch-for-password-prompt): Pass `string' as 11476 * comint.el (comint-watch-for-password-prompt): Pass `string' as
11477 arg to send-invisible 11477 arg to send-invisible.
11478 (send-invisible): Doc fix. The argument is now a prompt, not the 11478 (send-invisible): Doc fix. The argument is now a prompt, not the
11479 string to send. 11479 string to send.
11480 (comint-read-noecho): Doc fix. 11480 (comint-read-noecho): Doc fix.
@@ -12951,7 +12951,7 @@
12951 Ensure that recentf correctly updates the menu bar. 12951 Ensure that recentf correctly updates the menu bar.
12952 * recentf.el (recentf-menu-path,recentf-menu-before): Doc fix. 12952 * recentf.el (recentf-menu-path,recentf-menu-before): Doc fix.
12953 (recentf-menu-bar): New function. 12953 (recentf-menu-bar): New function.
12954 (recentf-clear-data): Use it 12954 (recentf-clear-data): Use it.
12955 (recentf-update-menu): Likewise. Use easy-menu-add-item instead 12955 (recentf-update-menu): Likewise. Use easy-menu-add-item instead
12956 of easy-menu-change. 12956 of easy-menu-change.
12957 12957
@@ -13500,7 +13500,7 @@
13500 (reftex-toc-split-windows-fraction): New option. 13500 (reftex-toc-split-windows-fraction): New option.
13501 (reftex-recenter-toc-when-idle): Search *toc* window on all 13501 (reftex-recenter-toc-when-idle): Search *toc* window on all
13502 visible frames. 13502 visible frames.
13503 (reftex-toc): Additional parameter REUSE 13503 (reftex-toc): Additional parameter REUSE.
13504 (reftex-toc-recenter): Remember current frame. Call `reftex-toc' 13504 (reftex-toc-recenter): Remember current frame. Call `reftex-toc'
13505 with REUSE argument. 13505 with REUSE argument.
13506 (reftex-recenter-toc-when-idle): Reset `current-prefix-arg' for 13506 (reftex-recenter-toc-when-idle): Reset `current-prefix-arg' for
@@ -14153,7 +14153,7 @@
14153 erroneously in previous version. 14153 erroneously in previous version.
14154 (bibtex-string-files): Docstring reflects new parsing scheme. 14154 (bibtex-string-files): Docstring reflects new parsing scheme.
14155 (bibtex-autokey-transcriptions): Merge some rewrite entries, fix 14155 (bibtex-autokey-transcriptions): Merge some rewrite entries, fix
14156 docstring, add # as one of the chars to crush 14156 docstring, add # as one of the chars to crush.
14157 (bibtex-autokey-prefix-string, bibtex-autokey-names) 14157 (bibtex-autokey-prefix-string, bibtex-autokey-names)
14158 (bibtex-autokey-names-stretch, bibtex-autokey-additional-names) 14158 (bibtex-autokey-names-stretch, bibtex-autokey-additional-names)
14159 (bibtex-autokey-name-change-strings) 14159 (bibtex-autokey-name-change-strings)
@@ -14229,7 +14229,7 @@
14229 preamble entries. 14229 preamble entries.
14230 (bibtex-fill-field-bounds): New function. 14230 (bibtex-fill-field-bounds): New function.
14231 (bibtex-fill-field): New command. Bound to fill-paragraph-function. 14231 (bibtex-fill-field): New command. Bound to fill-paragraph-function.
14232 (bibtex-fill-entry): Use bibtex-fill-field-bounds 14232 (bibtex-fill-entry): Use bibtex-fill-field-bounds.
14233 (bibtex-String): Use bibtex-strings. Always obey 14233 (bibtex-String): Use bibtex-strings. Always obey
14234 bibtex-sort-ignore-string-entries. 14234 bibtex-sort-ignore-string-entries.
14235 14235
diff --git a/lisp/ChangeLog.12 b/lisp/ChangeLog.12
index b058e6813d5..640c45dfc0c 100644
--- a/lisp/ChangeLog.12
+++ b/lisp/ChangeLog.12
@@ -943,7 +943,7 @@
9432007-03-20 Richard Stallman <rms@gnu.org> 9432007-03-20 Richard Stallman <rms@gnu.org>
944 944
945 * textmodes/ispell.el (ispell-call-process): New function. 945 * textmodes/ispell.el (ispell-call-process): New function.
946 Defends against bad `default-directory.' 946 Defends against bad `default-directory'.
947 (ispell-check-version, ispell-find-aspell-dictionaries) 947 (ispell-check-version, ispell-find-aspell-dictionaries)
948 (ispell-get-aspell-config-value, lookup-words): Call it. 948 (ispell-get-aspell-config-value, lookup-words): Call it.
949 (ispell-call-process-region): New function. 949 (ispell-call-process-region): New function.
@@ -1606,7 +1606,7 @@
1606 (org-set-frame-title, org-show-reference) 1606 (org-set-frame-title, org-show-reference)
1607 (org-unhighlight-once, org-verify-change-for-undo): New functions. 1607 (org-unhighlight-once, org-verify-change-for-undo): New functions.
1608 (org-show-variable): Remove command. 1608 (org-show-variable): Remove command.
1609 (org-add-log-maybe): New arguments STATE, FINDPOS 1609 (org-add-log-maybe): New arguments STATE, FINDPOS.
1610 (org-table-sort-lines): Rewrite from scratch. 1610 (org-table-sort-lines): Rewrite from scratch.
1611 (org-link-search): New argument AVOID-POS. 1611 (org-link-search): New argument AVOID-POS.
1612 (org-print-icalendar-entries): Remove argument CATEGORY. 1612 (org-print-icalendar-entries): Remove argument CATEGORY.
@@ -2938,7 +2938,7 @@
2938 2938
29392006-12-30 Jan Djärv <jan.h.d@swipnet.se> 29392006-12-30 Jan Djärv <jan.h.d@swipnet.se>
2940 2940
2941 * scroll-bar.el (previous-scroll-bar-mode): New variable 2941 * scroll-bar.el (previous-scroll-bar-mode): New variable.
2942 (set-scroll-bar-mode): Set previous-scroll-bar-mode. 2942 (set-scroll-bar-mode): Set previous-scroll-bar-mode.
2943 (scroll-bar-mode): Use previous-scroll-bar-mode if set. 2943 (scroll-bar-mode): Use previous-scroll-bar-mode if set.
2944 2944
@@ -5438,7 +5438,7 @@
5438 (cperl-to-comment-or-eol): Do not call `cperl-update-syntaxification' 5438 (cperl-to-comment-or-eol): Do not call `cperl-update-syntaxification'
5439 recursively. 5439 recursively.
5440 Bound `next-single-property-change' via `point-max'. 5440 Bound `next-single-property-change' via `point-max'.
5441 (cperl-unwind-to-safe): Bound likewise 5441 (cperl-unwind-to-safe): Bound likewise.
5442 (cperl-font-lock-fontify-region-function): Likewise. 5442 (cperl-font-lock-fontify-region-function): Likewise.
5443 (cperl-find-pods-heres): Mark as recursive for `cperl-to-comment-or-eol' 5443 (cperl-find-pods-heres): Mark as recursive for `cperl-to-comment-or-eol'
5444 Initialization of `cperl-font-lock-multiline-start' could be 5444 Initialization of `cperl-font-lock-multiline-start' could be
@@ -5480,7 +5480,7 @@
5480 (cperl-calculate-indent): `char-after' could be nil... 5480 (cperl-calculate-indent): `char-after' could be nil...
5481 (cperl-find-pods-heres): REx can start after "[" too. 5481 (cperl-find-pods-heres): REx can start after "[" too.
5482 Highlight (??{}) in RExen too. 5482 Highlight (??{}) in RExen too.
5483 (cperl-maybe-white-and-comment-rex): New constant 5483 (cperl-maybe-white-and-comment-rex): New constant.
5484 (cperl-white-and-comment-rex): Likewise. 5484 (cperl-white-and-comment-rex): Likewise.
5485 XXXX Not very efficient, but hard to make 5485 XXXX Not very efficient, but hard to make
5486 better while keeping 1 group. 5486 better while keeping 1 group.
@@ -5526,7 +5526,7 @@
5526 Syntax-mark a {}-part of (?{}) as "comment" 5526 Syntax-mark a {}-part of (?{}) as "comment"
5527 (it was the ()-part) 5527 (it was the ()-part)
5528 Better logic to distinguish what is what in REx 5528 Better logic to distinguish what is what in REx
5529 (cperl-tips-faces): Document REx highlighting 5529 (cperl-tips-faces): Document REx highlighting.
5530 (cperl-praise): Mention REx syntax highlight etc. 5530 (cperl-praise): Mention REx syntax highlight etc.
5531 5531
5532 After 5.17: 5532 After 5.17:
@@ -5566,7 +5566,7 @@
5566 (cperl-indent-comment-at-column-0): New customization variable. 5566 (cperl-indent-comment-at-column-0): New customization variable.
5567 (cperl-comment-indent): Indentation after $#a would increase by 1. 5567 (cperl-comment-indent): Indentation after $#a would increase by 1.
5568 (cperl-mode): Make `defun-prompt-regexp' grok BEGIN/END etc. 5568 (cperl-mode): Make `defun-prompt-regexp' grok BEGIN/END etc.
5569 (cperl-find-pods-heres): Mark CODE of s///e as `syntax-type' `multiline' 5569 (cperl-find-pods-heres): Mark CODE of s///e as `syntax-type' `multiline'.
5570 (cperl-at-end-of-expr): Would fail if @BAR=12 follows after ";". 5570 (cperl-at-end-of-expr): Would fail if @BAR=12 follows after ";".
5571 (cperl-init-faces): If `cperl-highlight-variables-indiscriminately' 5571 (cperl-init-faces): If `cperl-highlight-variables-indiscriminately'
5572 highlight $ in $foo too (UNTESTED). 5572 highlight $ in $foo too (UNTESTED).
@@ -5579,7 +5579,7 @@
5579 (cperl-style-alist): Likewise. 5579 (cperl-style-alist): Likewise.
5580 (cperl-fix-line-spacing): Support `cperl-merge-trailing-else' being nil, 5580 (cperl-fix-line-spacing): Support `cperl-merge-trailing-else' being nil,
5581 and `cperl-extra-newline-before-brace' etc 5581 and `cperl-extra-newline-before-brace' etc
5582 being t 5582 being t.
5583 (cperl-indent-exp): Plans B and C to find continuation blocks even 5583 (cperl-indent-exp): Plans B and C to find continuation blocks even
5584 if `cperl-extra-newline-before-brace' is t. 5584 if `cperl-extra-newline-before-brace' is t.
5585 5585
@@ -7296,7 +7296,7 @@
7296 (gdb-stack-position): New variable. 7296 (gdb-stack-position): New variable.
7297 (gdb-starting, gdb-exited): Reset gdb-stack-position to nil. 7297 (gdb-starting, gdb-exited): Reset gdb-stack-position to nil.
7298 (gdb-frames-mode): Set gdb-stack-position to nil. 7298 (gdb-frames-mode): Set gdb-stack-position to nil.
7299 Add to overlay-arrow-variable-list 7299 Add to overlay-arrow-variable-list.
7300 (gdb-reset): Delete gdb-stack-position from above list. 7300 (gdb-reset): Delete gdb-stack-position from above list.
7301 7301
73022006-08-14 Jan Djärv <jan.h.d@swipnet.se> 73022006-08-14 Jan Djärv <jan.h.d@swipnet.se>
@@ -7459,7 +7459,7 @@
7459 * avoid.el (mouse-avoidance-animating-pointer): New var. 7459 * avoid.el (mouse-avoidance-animating-pointer): New var.
7460 (mouse-avoidance-nudge-mouse): Use it. 7460 (mouse-avoidance-nudge-mouse): Use it.
7461 (mouse-avoidance-banish): Rename from mouse-avoidance-banish-hook. 7461 (mouse-avoidance-banish): Rename from mouse-avoidance-banish-hook.
7462 (mouse-avoidance-exile): Rename from mouse-avoidance-exile-hook 7462 (mouse-avoidance-exile): Rename from mouse-avoidance-exile-hook.
7463 (mouse-avoidance-fancy): Rename from mouse-avoidance-fancy-hook. 7463 (mouse-avoidance-fancy): Rename from mouse-avoidance-fancy-hook.
7464 Don't activate if currently animating. All callers changed. 7464 Don't activate if currently animating. All callers changed.
7465 7465
@@ -8723,7 +8723,7 @@
8723 * progmodes/gdb-ui.el (gdb-same-frame): New option. 8723 * progmodes/gdb-ui.el (gdb-same-frame): New option.
8724 (gud-old-arrow, gdb-frame-begin, gdb-printing): New variables. 8724 (gud-old-arrow, gdb-frame-begin, gdb-printing): New variables.
8725 (gdb-init-1): Initialise them. 8725 (gdb-init-1): Initialise them.
8726 (gdb-starting): Reset gdb-printing 8726 (gdb-starting): Reset gdb-printing.
8727 (gdb-starting): Save value of gud-overlay-arrow-position. 8727 (gdb-starting): Save value of gud-overlay-arrow-position.
8728 (gdb-frame-begin): Set gdb-frame-begin, gdb-printing. 8728 (gdb-frame-begin): Set gdb-frame-begin, gdb-printing.
8729 (gdb-stopped): Don't look for source if calling procedure e.g "p a ()". 8729 (gdb-stopped): Don't look for source if calling procedure e.g "p a ()".
@@ -9460,7 +9460,7 @@
9460 links to BibTeX database entries.. 9460 links to BibTeX database entries..
9461 (org-get-current-options, org-set-regexps-and-options): 9461 (org-get-current-options, org-set-regexps-and-options):
9462 Implement logging as a startup option. 9462 Implement logging as a startup option.
9463 (org-store-link): Make sure context string is never empty 9463 (org-store-link): Make sure context string is never empty.
9464 (org-insert-link): Use relative path when possible. 9464 (org-insert-link): Use relative path when possible.
9465 (org-at-item-checklet-p): New function. 9465 (org-at-item-checklet-p): New function.
9466 (org-shifttab, org-shiftmetaleft, org-shiftmetaright) 9466 (org-shifttab, org-shiftmetaleft, org-shiftmetaright)
@@ -10197,7 +10197,7 @@
10197 (gdb-init-1, gdb-post-prompt): ...and references to it. 10197 (gdb-init-1, gdb-post-prompt): ...and references to it.
10198 (gdb-frame-handler): Strip directory name from filename if present. 10198 (gdb-frame-handler): Strip directory name from filename if present.
10199 10199
10200 * progmodes/gud.el (gdb-force-update): Delete defvar 10200 * progmodes/gud.el (gdb-force-update): Delete defvar.
10201 (gud-speedbar-buttons): ...and references to it. Use window-start 10201 (gud-speedbar-buttons): ...and references to it. Use window-start
10202 to try to keep position in watch expression. 10202 to try to keep position in watch expression.
10203 10203
@@ -10246,7 +10246,7 @@
10246 10246
10247 * diff-mode.el (diff-mode-shared-map): Don't bind M-W, M-U, M-C, 10247 * diff-mode.el (diff-mode-shared-map): Don't bind M-W, M-U, M-C,
10248 M-r, M-R, M-A, M-SPC or M-DEL. 10248 M-r, M-R, M-A, M-SPC or M-DEL.
10249 (diff-mode-map): diff-refine-hunk now on C-c C-w 10249 (diff-mode-map): diff-refine-hunk now on C-c C-w.
10250 (diff-mode-map): Bind C-c C-e, C-c C-n, C-c C-r, C-c C-u. 10250 (diff-mode-map): Bind C-c C-e, C-c C-n, C-c C-r, C-c C-u.
10251 10251
10252 * help-mode.el (help-mode): view-exit-action calls delete-window 10252 * help-mode.el (help-mode): view-exit-action calls delete-window
@@ -10862,7 +10862,7 @@
10862 (org-edit-agenda-file-list, org-store-new-agenda-file-list) 10862 (org-edit-agenda-file-list, org-store-new-agenda-file-list)
10863 (org-read-agenda-file-list): New functions. 10863 (org-read-agenda-file-list): New functions.
10864 (org-table-edit-field) 10864 (org-table-edit-field)
10865 (org-table-create-or-convert-from-region): New commands 10865 (org-table-create-or-convert-from-region): New commands.
10866 (org-table-toggle-vline-visibility): Command removed. 10866 (org-table-toggle-vline-visibility): Command removed.
10867 (org-table-convert-region): Made a command. 10867 (org-table-convert-region): Made a command.
10868 (orgtbl-delete-backward-char, orgtbl-delete-char): Remove commands. 10868 (orgtbl-delete-backward-char, orgtbl-delete-char): Remove commands.
@@ -10881,7 +10881,7 @@
10881 Optional argument unrestricted means ignore any restrictions. 10881 Optional argument unrestricted means ignore any restrictions.
10882 (org-install-agenda-files-menu): Find a buffer in Org-mode before 10882 (org-install-agenda-files-menu): Find a buffer in Org-mode before
10883 trying to modify the menu. Use generalized access to 10883 trying to modify the menu. Use generalized access to
10884 `org-agenda-files.' 10884 `org-agenda-files'.
10885 (org-agenda-list, org-todo-list, org-cycle-agenda-files) 10885 (org-agenda-list, org-todo-list, org-cycle-agenda-files)
10886 (org-agenda-file-to-front, org-remove-file, org-diary) 10886 (org-agenda-file-to-front, org-remove-file, org-diary)
10887 (org-tags-view, org-export-icalendar-all-agenda-files) 10887 (org-tags-view, org-export-icalendar-all-agenda-files)
@@ -13666,7 +13666,7 @@
13666 (thumbs-resize-image): Rename from thumbs-resize-image-interactive. 13666 (thumbs-resize-image): Rename from thumbs-resize-image-interactive.
13667 Use increment argument to enlarge/shrink. Preserve point. 13667 Use increment argument to enlarge/shrink. Preserve point.
13668 (thumbs-shrink-image): Rename from thumbs-resize-image-size-down. 13668 (thumbs-shrink-image): Rename from thumbs-resize-image-size-down.
13669 (thumbs-enlarge-image): Rename from thumbs-resize-image-size-up 13669 (thumbs-enlarge-image): Rename from thumbs-resize-image-size-up.
13670 (thumbs-show-thumbs-list): Set thumbs-buffer to current-buffer. 13670 (thumbs-show-thumbs-list): Set thumbs-buffer to current-buffer.
13671 (thumbs-mark, thumbs-unmark): Preserve point. 13671 (thumbs-mark, thumbs-unmark): Preserve point.
13672 (thumbs-modify-image): Keep old temp files and use to modify. 13672 (thumbs-modify-image): Keep old temp files and use to modify.
@@ -16160,7 +16160,7 @@
16160 (c-after-statement-terminator-p): Adapt for virtual semicolons; 16160 (c-after-statement-terminator-p): Adapt for virtual semicolons;
16161 check more rigorously for "end of macro". 16161 check more rigorously for "end of macro".
16162 (c-back-over-illiterals, c-forward-over-illiterals): Adapt for 16162 (c-back-over-illiterals, c-forward-over-illiterals): Adapt for
16163 virtual semicolons; 16163 virtual semicolons.
16164 (c-beginning-of-statement): Adapt for virtual semicolons; Separate 16164 (c-beginning-of-statement): Adapt for virtual semicolons; Separate
16165 out the code for forward movement into ... 16165 out the code for forward movement into ...
16166 (c-end-of-statement): Now contains the code for forward movement, 16166 (c-end-of-statement): Now contains the code for forward movement,
@@ -19706,7 +19706,7 @@
19706 (allout-mode): Use key-binding substitution in the docstring. 19706 (allout-mode): Use key-binding substitution in the docstring.
19707 (allout-kill-line): Spell-out kill ring data structure mutation 19707 (allout-kill-line): Spell-out kill ring data structure mutation
19708 instead of using byte-compiler-complaint-provoking `pop'. 19708 instead of using byte-compiler-complaint-provoking `pop'.
19709 (allout-insert-listified): Use `insert' rather than `insert-string' 19709 (allout-insert-listified): Use `insert' rather than `insert-string'.
19710 (allout-toggle-current-subtree-encryption): Update docstring, adjust 19710 (allout-toggle-current-subtree-encryption): Update docstring, adjust
19711 to new gpp-based encryption, use new `allout-encrypted-topic-p'. 19711 to new gpp-based encryption, use new `allout-encrypted-topic-p'.
19712 (allout-encrypt-string): Totally revamped vis new underlying 19712 (allout-encrypt-string): Totally revamped vis new underlying
@@ -20757,13 +20757,13 @@
20757 * progmodes/gdb-ui.el (gdb-info-breakpoints-custom): 20757 * progmodes/gdb-ui.el (gdb-info-breakpoints-custom):
20758 Put `font-lock-function-name-face'. 20758 Put `font-lock-function-name-face'.
20759 (gdb-info-frames-custom): Put `font-lock-function-name-face' 20759 (gdb-info-frames-custom): Put `font-lock-function-name-face'
20760 and `font-lock-variable-name-face' 20760 and `font-lock-variable-name-face'.
20761 (gdb-registers-font-lock-keywords): New font lock keywords definition. 20761 (gdb-registers-font-lock-keywords): New font lock keywords definition.
20762 (gdb-registers-mode): Use `gdb-registers-font-lock-keywords'. 20762 (gdb-registers-mode): Use `gdb-registers-font-lock-keywords'.
20763 (gdb-memory-font-lock-keywords): New font lock keywords definition. 20763 (gdb-memory-font-lock-keywords): New font lock keywords definition.
20764 (gdb-memory-mode): Use `gdb-memory-font-lock-keywords'. 20764 (gdb-memory-mode): Use `gdb-memory-font-lock-keywords'.
20765 (gdb-local-font-lock-keywords): New font lock keywords definition. 20765 (gdb-local-font-lock-keywords): New font lock keywords definition.
20766 (gdb-locals-mode): Use `gdb-local-font-lock-keywords' 20766 (gdb-locals-mode): Use `gdb-local-font-lock-keywords'.
20767 (gdb-threads-font-lock-keywords): New font lock keywords definition. 20767 (gdb-threads-font-lock-keywords): New font lock keywords definition.
20768 (gdb-threads-mode): Use `gdb-threads-font-lock-keywords'. 20768 (gdb-threads-mode): Use `gdb-threads-font-lock-keywords'.
20769 20769
@@ -29352,7 +29352,7 @@
29352 * loadhist.el (unload-feature): Update for new format of load-history. 29352 * loadhist.el (unload-feature): Update for new format of load-history.
29353 Simplify the code. 29353 Simplify the code.
29354 29354
29355 * mail/rmail.el (rmail-ignored-headers): Ignore more headers 29355 * mail/rmail.el (rmail-ignored-headers): Ignore more headers.
29356 (rmail-font-lock-keywords): Don't fontify the text of a citation. 29356 (rmail-font-lock-keywords): Don't fontify the text of a citation.
29357 29357
29358 * mail/sendmail.el (mail-font-lock-keywords): 29358 * mail/sendmail.el (mail-font-lock-keywords):
@@ -29421,7 +29421,7 @@
29421 (org-evaluate-time-range): Insert at point instead of directly 29421 (org-evaluate-time-range): Insert at point instead of directly
29422 after time range. 29422 after time range.
29423 (org-first-headline-recenter, org-subtree-end-visible-p) 29423 (org-first-headline-recenter, org-subtree-end-visible-p)
29424 (org-optimize-window-after-visibility-change): New functions 29424 (org-optimize-window-after-visibility-change): New functions.
29425 (org-agenda-post-command-hook): Don't allow point at end of line, 29425 (org-agenda-post-command-hook): Don't allow point at end of line,
29426 to make sure it always hits the text properties. 29426 to make sure it always hits the text properties.
29427 (org-agenda-next-date-line, org-agenda-previous-date-line): 29427 (org-agenda-next-date-line, org-agenda-previous-date-line):
@@ -29603,13 +29603,13 @@
29603 29603
296042005-04-11 Jan Djärv <jan.h.d@swipnet.se> 296042005-04-11 Jan Djärv <jan.h.d@swipnet.se>
29605 29605
29606 * dired.el (dired-mode): Use dnd-* instead of x-dnd-* 29606 * dired.el (dired-mode): Use dnd-* instead of x-dnd-*.
29607 (dired-dnd-handle-local-file): Call dnd-get-local-file-name. 29607 (dired-dnd-handle-local-file): Call dnd-get-local-file-name.
29608 (dired-dnd-handle-file): Call dnd-get-local-file-uri. 29608 (dired-dnd-handle-file): Call dnd-get-local-file-uri.
29609 29609
29610 * cus-edit.el (dnd): New group. 29610 * cus-edit.el (dnd): New group.
29611 29611
29612 * term/w32-win.el (dnd): Require dnd 29612 * term/w32-win.el (dnd): Require dnd.
29613 (w32-drag-n-drop): Call dnd-handle-one-url. 29613 (w32-drag-n-drop): Call dnd-handle-one-url.
29614 29614
29615 * x-dnd.el: Require dnd. 29615 * x-dnd.el: Require dnd.
@@ -31918,7 +31918,7 @@
31918 31918
31919 * progmodes/gdb-ui.el (gdb-var-update-handler) 31919 * progmodes/gdb-ui.el (gdb-var-update-handler)
31920 (gdb-speedbar-timer-fn): Ensure speedbar updates with new values 31920 (gdb-speedbar-timer-fn): Ensure speedbar updates with new values
31921 for watch expressions, 31921 for watch expressions.
31922 (gdb-var-create-handler): Don't set speedbar-update-flag. 31922 (gdb-var-create-handler): Don't set speedbar-update-flag.
31923 (gdb-post-prompt): Simplify test for speedbar. 31923 (gdb-post-prompt): Simplify test for speedbar.
31924 31924
@@ -32781,14 +32781,14 @@
327812005-01-15 James R. Van Zandt <jrvz@comcast.net> (tiny change) 327812005-01-15 James R. Van Zandt <jrvz@comcast.net> (tiny change)
32782 32782
32783 * progmodes/sh-script.el: Code copied from make-mode.el 32783 * progmodes/sh-script.el: Code copied from make-mode.el
32784 with small changes, 32784 with small changes.
32785 (sh-mode-map): Bind C-c C-\. 32785 (sh-mode-map): Bind C-c C-\.
32786 (sh-backslash-column, sh-backslash-align): New variables. 32786 (sh-backslash-column, sh-backslash-align): New variables.
32787 (sh-backslash-region, sh-append-backslash): New functions. 32787 (sh-backslash-region, sh-append-backslash): New functions.
32788 32788
327892005-01-15 Sergey Poznyakoff <gray@Mirddin.farlep.net> 327892005-01-15 Sergey Poznyakoff <gray@Mirddin.farlep.net>
32790 32790
32791 * mail/rmail.el: Updated to work with movemail from GNU Mailutils 32791 * mail/rmail.el: Updated to work with movemail from GNU Mailutils.
32792 (rmail-pop-password, rmail-pop-password-required): Move to 32792 (rmail-pop-password, rmail-pop-password-required): Move to
32793 rmail-obsolete group. 32793 rmail-obsolete group.
32794 (rmail-set-pop-password): Rename to rmail-set-remote-password. 32794 (rmail-set-pop-password): Rename to rmail-set-remote-password.
@@ -32892,7 +32892,7 @@
32892 32892
32893 * textmodes/reftex-vars.el (reftex-cite-format-builtin): 32893 * textmodes/reftex-vars.el (reftex-cite-format-builtin):
32894 Add optional arguments to most cite commands. 32894 Add optional arguments to most cite commands.
32895 (reftex-cite-cleanup-optional-args): New option 32895 (reftex-cite-cleanup-optional-args): New option.
32896 (reftex-cite-prompt-optional-args): New option. 32896 (reftex-cite-prompt-optional-args): New option.
32897 (reftex-trust-label-prefix): New option. 32897 (reftex-trust-label-prefix): New option.
32898 32898
diff --git a/lisp/ChangeLog.13 b/lisp/ChangeLog.13
index da88e3334c2..630a4bc0865 100644
--- a/lisp/ChangeLog.13
+++ b/lisp/ChangeLog.13
@@ -1498,7 +1498,7 @@
1498 (ps-header-footer-string): Delete function. 1498 (ps-header-footer-string): Delete function.
1499 (ps-encode-header-string-function): New variable. 1499 (ps-encode-header-string-function): New variable.
1500 (ps-generate-header-line): Call ps-encode-header-string-function. 1500 (ps-generate-header-line): Call ps-encode-header-string-function.
1501 (ps-basic-plot-string-function): New variable 1501 (ps-basic-plot-string-function): New variable.
1502 (ps-begin-job): Set ps-basic-plot-string-function and 1502 (ps-begin-job): Set ps-basic-plot-string-function and
1503 ps-encode-header-string-function. For setting up headers and 1503 ps-encode-header-string-function. For setting up headers and
1504 footers, don't use caches such as ps-rh-cache. Don't call 1504 footers, don't use caches such as ps-rh-cache. Don't call
@@ -1588,7 +1588,7 @@
1588 1588
1589 * international/mule.el (ctext-non-standard-encodings-alist): 1589 * international/mule.el (ctext-non-standard-encodings-alist):
1590 Rename from non-standard-icccm-encodings-alist. 1590 Rename from non-standard-icccm-encodings-alist.
1591 (ctext-non-standard-encodings-regexp): New variable 1591 (ctext-non-standard-encodings-regexp): New variable.
1592 (ctext-post-read-conversion): Full rewrite. 1592 (ctext-post-read-conversion): Full rewrite.
1593 (ctext-non-standard-designations-alist): Rename from 1593 (ctext-non-standard-designations-alist): Rename from
1594 non-standard-designations-alist. 1594 non-standard-designations-alist.
@@ -8209,7 +8209,7 @@
8209 (allout-end-of-line): Preserve mark activation status when jumping. 8209 (allout-end-of-line): Preserve mark activation status when jumping.
8210 (allout-open-topic): Account for opening after a child that 8210 (allout-open-topic): Account for opening after a child that
8211 contains a hidden trailing newline. Preserve match data. 8211 contains a hidden trailing newline. Preserve match data.
8212 Run allout-structure-added-hook 8212 Run allout-structure-added-hook.
8213 (allout-encrypt-decrypted): Preserve match data. 8213 (allout-encrypt-decrypted): Preserve match data.
8214 (allout-toggle-current-subtree-exposure): Add new interactive 8214 (allout-toggle-current-subtree-exposure): Add new interactive
8215 function for toggle subtree exposure - suggested by tassilo. 8215 function for toggle subtree exposure - suggested by tassilo.
@@ -9880,7 +9880,7 @@
9880 (org-find-base-buffer-visiting): Catch the case that there is no 9880 (org-find-base-buffer-visiting): Catch the case that there is no
9881 buffer visiting the file. 9881 buffer visiting the file.
9882 (org-property-or-variable-value): New function. 9882 (org-property-or-variable-value): New function.
9883 (org-todo): Use `org-property-or-variable-value' 9883 (org-todo): Use `org-property-or-variable-value'.
9884 (org-agenda-compact-blocks): New option. 9884 (org-agenda-compact-blocks): New option.
9885 (org-prepare-agenda, org-agenda-list): Use `org-agenda-compact-blocks'. 9885 (org-prepare-agenda, org-agenda-list): Use `org-agenda-compact-blocks'.
9886 (org-agenda-schedule, org-agenda-deadline): 9886 (org-agenda-schedule, org-agenda-deadline):
@@ -10227,7 +10227,7 @@
10227 10227
10228 * progmodes/cperl-mode.el: Merge upstream 5.23. 10228 * progmodes/cperl-mode.el: Merge upstream 5.23.
10229 (cperl-where-am-i): Remove function. 10229 (cperl-where-am-i): Remove function.
10230 (cperl-backward-to-noncomment): Don't go too far when skipping POD/HEREs 10230 (cperl-backward-to-noncomment): Don't go too far when skipping POD/HEREs.
10231 (cperl-sniff-for-indent): De-invert [string] and [comment]. 10231 (cperl-sniff-for-indent): De-invert [string] and [comment].
10232 When looking for label, skip s:m:y:tr. 10232 When looking for label, skip s:m:y:tr.
10233 (cperl-indent-line): Likewise. 10233 (cperl-indent-line): Likewise.
diff --git a/lisp/ChangeLog.14 b/lisp/ChangeLog.14
index a01020b87d0..9b5e0dcf2c0 100644
--- a/lisp/ChangeLog.14
+++ b/lisp/ChangeLog.14
@@ -8625,7 +8625,7 @@
8625 8625
86262008-07-31 Alan Mackenzie <acm@muc.de> 86262008-07-31 Alan Mackenzie <acm@muc.de>
8627 8627
8628 * progmodes/cc-mode.el (c-before-hack-hook): New function 8628 * progmodes/cc-mode.el (c-before-hack-hook): New function.
8629 (Top Level): Install c-before-hack-hook on 8629 (Top Level): Install c-before-hack-hook on
8630 before-hack-local-variables-hook, rather than 8630 before-hack-local-variables-hook, rather than
8631 c-postprocess-file-styles on hack-local-variables-hook. 8631 c-postprocess-file-styles on hack-local-variables-hook.
diff --git a/lisp/ChangeLog.2 b/lisp/ChangeLog.2
index e3193944011..90c00dc6360 100644
--- a/lisp/ChangeLog.2
+++ b/lisp/ChangeLog.2
@@ -3717,9 +3717,9 @@
37171986-08-07 Richard Mlynarik (mly@prep) 37171986-08-07 Richard Mlynarik (mly@prep)
3718 3718
3719 * rfc822.el, loaddefs.el, mail-utils.el: 3719 * rfc822.el, loaddefs.el, mail-utils.el:
3720 Hairy address parser, used only if mail-use-rfc822 is non-nil 3720 Hairy address parser, used only if mail-use-rfc822 is non-nil.
3721 (It is nil by default, so if one doesn't like or need the hair of 3721 (It is nil by default, so if one doesn't like or need the hair of
3722 this file, then one is never troubled by it) 3722 this file, then one is never troubled by it.)
3723 3723
3724 * disassemble.el, loaddefs.el: 3724 * disassemble.el, loaddefs.el:
3725 Code from doug@csli.stanford.edu modified by mly. 3725 Code from doug@csli.stanford.edu modified by mly.
diff --git a/lisp/ChangeLog.3 b/lisp/ChangeLog.3
index 26b872af9bb..f99f2ec4ec0 100644
--- a/lisp/ChangeLog.3
+++ b/lisp/ChangeLog.3
@@ -2619,7 +2619,7 @@
2619 2619
2620 * frame.el (frame-initialize): Fix error syntax. 2620 * frame.el (frame-initialize): Fix error syntax.
2621 (toggle-horizontal-scroll-bar): Likewise. 2621 (toggle-horizontal-scroll-bar): Likewise.
2622 (toggle-horizontal-scroll-bar): Renamed from set-horizontal-bar 2622 (toggle-horizontal-scroll-bar): Renamed from set-horizontal-bar.
2623 (toggle-vertical-scroll-bar): Likewise. 2623 (toggle-vertical-scroll-bar): Likewise.
2624 (toggle-auto-lower, toggle-auto-raise): Likewise. 2624 (toggle-auto-lower, toggle-auto-raise): Likewise.
2625 (set-foreground-color, set-background-color): 2625 (set-foreground-color, set-background-color):
@@ -10344,7 +10344,7 @@
10344 (list-diary-entries, mark-diary-entries) 10344 (list-diary-entries, mark-diary-entries)
10345 (include-other-diary-files, mark-included-diary-files): 10345 (include-other-diary-files, mark-included-diary-files):
10346 Added the possibility of `shared diary files' with a recursive 10346 Added the possibility of `shared diary files' with a recursive
10347 include mechanism like the C preprocessor 10347 include mechanism like the C preprocessor.
10348 (list-calendar-holidays): Eliminated the 'special class of holidays, 10348 (list-calendar-holidays): Eliminated the 'special class of holidays,
10349 rewriting the entire mechanism to make it more general. 10349 rewriting the entire mechanism to make it more general.
10350 (calendar-holiday-function-float): Changed the 'float class of 10350 (calendar-holiday-function-float): Changed the 'float class of
@@ -12091,7 +12091,7 @@
12091 12091
120921988-12-12 Richard Stallman (rms@mole.ai.mit.edu) 120921988-12-12 Richard Stallman (rms@mole.ai.mit.edu)
12093 12093
12094 * telnet.el (telnet-send-input): Save input in telnet-previous-input 12094 * telnet.el (telnet-send-input): Save input in telnet-previous-input.
12095 (telnet-mode): Make that var buffer-local. 12095 (telnet-mode): Make that var buffer-local.
12096 (telnet-copy-last-input): New fn to yank that var; now on C-c C-y. 12096 (telnet-copy-last-input): New fn to yank that var; now on C-c C-y.
12097 12097
diff --git a/lisp/ChangeLog.5 b/lisp/ChangeLog.5
index 6da88b3c0be..8cb0e343a1a 100644
--- a/lisp/ChangeLog.5
+++ b/lisp/ChangeLog.5
@@ -193,8 +193,8 @@
193 ispell-menu-map, ispell-menu-lucid, and ispell-menu-map-needed 193 ispell-menu-map, ispell-menu-lucid, and ispell-menu-map-needed
194 so users can more easily modify and upgrade entries. 194 so users can more easily modify and upgrade entries.
195 (ispell-dictionary-alist): Once more a single variable. 195 (ispell-dictionary-alist): Once more a single variable.
196 (ispell-required-version): Documentation changes 196 (ispell-required-version): Documentation changes.
197 (ispell-skip-sgml): Documentation changes 197 (ispell-skip-sgml): Documentation changes.
198 (ispell-command-loop): `mode-line-format' now shows misspelled word. 198 (ispell-command-loop): `mode-line-format' now shows misspelled word.
199 (ispell-message-text-end): Can now process postscript version 1. 199 (ispell-message-text-end): Can now process postscript version 1.
200 (ispell-message-start-skip): New variable for block skips, set up for 200 (ispell-message-start-skip): New variable for block skips, set up for
@@ -584,7 +584,7 @@
584 19.28 and earlier and XEmacs 19.11 and earlier. 584 19.28 and earlier and XEmacs 19.11 and earlier.
585 * ediff.el (ediff-patch-buffer): Now handles buffers that don't 585 * ediff.el (ediff-patch-buffer): Now handles buffers that don't
586 visit any file. 586 visit any file.
587 (ediff-windows): Renamed to ediff-windows-wordwise, added 587 (ediff-windows): Renamed to ediff-windows-wordwise.
588 (ediff-windows-linewise): New function. 588 (ediff-windows-linewise): New function.
589 Changed ediff-small/large-regions to ediff-regions-wordwise/linewise. 589 Changed ediff-small/large-regions to ediff-regions-wordwise/linewise.
590 590
@@ -783,7 +783,7 @@
783 783
784 * mail-extr.el (mail-extr-all-letters-but-separators): 784 * mail-extr.el (mail-extr-all-letters-but-separators):
785 Reinstate \377, the bug in search.c is apparently gone. 785 Reinstate \377, the bug in search.c is apparently gone.
786 (mail-extr-first-letters): Add 8-bit characters 786 (mail-extr-first-letters): Add 8-bit characters.
787 (mail-extr-last-letters): Ditto. 787 (mail-extr-last-letters): Ditto.
788 788
789 * simple.el (indent-for-comment): Move to beginning of line only 789 * simple.el (indent-for-comment): Move to beginning of line only
@@ -889,7 +889,7 @@
889 (ada-end-stmt-re): Add "separate" body parts, "else", and 889 (ada-end-stmt-re): Add "separate" body parts, "else", and
890 "package <Id> is". 890 "package <Id> is".
891 (ada-subprogram-start-re): Add "entry", "protected" and 891 (ada-subprogram-start-re): Add "entry", "protected" and
892 "package body" 892 "package body".
893 (ada-indent-function): Handle "elsif" the same way as "if", added 893 (ada-indent-function): Handle "elsif" the same way as "if", added
894 "separate" for no indent. 894 "separate" for no indent.
895 (ada-get-indent-type): If "type ... is .." is followed by code on 895 (ada-get-indent-type): If "type ... is .." is followed by code on
@@ -1328,7 +1328,7 @@
1328 ones the numbers of subexpressions to refer to. 1328 ones the numbers of subexpressions to refer to.
1329 (vc-cvs-status): New per-file property, only used in the CVS case. 1329 (vc-cvs-status): New per-file property, only used in the CVS case.
1330 (vc-cvs-status): New function. 1330 (vc-cvs-status): New function.
1331 (vc-log-info): Adapted to new version of vc-parse-buffer 1331 (vc-log-info): Adapted to new version of vc-parse-buffer.
1332 (vc-fetch-properties): Adapted to new version of vc-parse-buffer. 1332 (vc-fetch-properties): Adapted to new version of vc-parse-buffer.
1333 Better search regexp for CVS latest version. 1333 Better search regexp for CVS latest version.
1334 (vc-log-info): Search for branch version only in the RCS case, 1334 (vc-log-info): Search for branch version only in the RCS case,
@@ -1800,7 +1800,7 @@
1800 (vc-consult-rcs-headers): New function. 1800 (vc-consult-rcs-headers): New function.
1801 (vc-branch-version): New per-file property, refers 1801 (vc-branch-version): New per-file property, refers
1802 to the RCS version selected by `rcs -b'. 1802 to the RCS version selected by `rcs -b'.
1803 (vc-workfile-version): New function. Also new per-file property 1803 (vc-workfile-version): New function. Also new per-file property.
1804 (vc-consult-headers): New parameter variable. 1804 (vc-consult-headers): New parameter variable.
1805 (vc-mistrust-permissions): Default set to `nil'. 1805 (vc-mistrust-permissions): Default set to `nil'.
1806 (vc-locking-user): Property is now cached. The other functions 1806 (vc-locking-user): Property is now cached. The other functions
@@ -2145,7 +2145,7 @@
21451995-04-03 David KÃ¥gedal <davidk@lysator.liu.se> 21451995-04-03 David KÃ¥gedal <davidk@lysator.liu.se>
2146 2146
2147 * tempo.el (tempo-insert): 2147 * tempo.el (tempo-insert):
2148 Added the P tag and modified the s tag accordingly 2148 Added the P tag and modified the s tag accordingly.
2149 (tempo-insert-named): Checks for valid name, insert mark otherwise. 2149 (tempo-insert-named): Checks for valid name, insert mark otherwise.
2150 2150
2151 * tempo.el (tempo-dolist): Changed (cadr ...) to (car (cdr ...)). 2151 * tempo.el (tempo-dolist): Changed (cadr ...) to (car (cdr ...)).
@@ -2457,7 +2457,7 @@
2457 (enriched-delq-1, enriched-make-list-uniq) 2457 (enriched-delq-1, enriched-make-list-uniq)
2458 (enriched-make-relatively-unique, enriched-common-tail) 2458 (enriched-make-relatively-unique, enriched-common-tail)
2459 (enriched-reorder, enriched-insert-annotations) 2459 (enriched-reorder, enriched-insert-annotations)
2460 (enriched-loc-annotations, enriched-annotate-change 2460 (enriched-loc-annotations, enriched-annotate-change)
2461 (enriched-encode-unknown): Move to format.el. Names changed. 2461 (enriched-encode-unknown): Move to format.el. Names changed.
2462 2462
2463 (enriched-display-table): Copy standard table if there is one, 2463 (enriched-display-table): Copy standard table if there is one,
@@ -3365,7 +3365,7 @@
3365 (ispell-command-loop): Properly adjust screen with different settings 3365 (ispell-command-loop): Properly adjust screen with different settings
3366 of ispell-choices-win-default-height. 3366 of ispell-choices-win-default-height.
3367 (check-ispell-version): Use fundamental-mode as default-major-mode. 3367 (check-ispell-version): Use fundamental-mode as default-major-mode.
3368 (ispell-change-dictionary): Remove unnecessary process kills 3368 (ispell-change-dictionary): Remove unnecessary process kills.
3369 (ispell-region): Fold sgml support in with tib checking. 3369 (ispell-region): Fold sgml support in with tib checking.
3370 (ispell-message): Skips checking of forwarded messages. 3370 (ispell-message): Skips checking of forwarded messages.
3371 3371
@@ -3526,7 +3526,7 @@
3526 3526
35271995-02-02 Richard Stallman <rms@pogo.gnu.ai.mit.edu> 35271995-02-02 Richard Stallman <rms@pogo.gnu.ai.mit.edu>
3528 3528
3529 * c-mode.el (c-mode-map): No binding for c-fill-paragraph 3529 * c-mode.el (c-mode-map): No binding for c-fill-paragraph.
3530 (c-fill-paragraph): Return t. 3530 (c-fill-paragraph): Return t.
3531 (c-mode): Put c-fill-paragraph in fill-paragraph-function. 3531 (c-mode): Put c-fill-paragraph in fill-paragraph-function.
3532 3532
@@ -3770,7 +3770,7 @@
3770 * tempo.el (tempo-insert-template): Quoted transient-mark-mode 3770 * tempo.el (tempo-insert-template): Quoted transient-mark-mode
3771 Expansion around region now puts point at the first mark. 3771 Expansion around region now puts point at the first mark.
3772 3772
3773 * tempo.el (tempo-region-start, tempo-region-stop): New variables 3773 * tempo.el (tempo-region-start, tempo-region-stop): New variables.
3774 (tempo-insert-template, tempo-insert): Don't affect the 3774 (tempo-insert-template, tempo-insert): Don't affect the
3775 mark. Check for Transient Mark mode. 3775 mark. Check for Transient Mark mode.
3776 3776
@@ -3965,7 +3965,7 @@
3965 Keybinding for bold-italic changed from M-g o to M-g l; M-g o is 3965 Keybinding for bold-italic changed from M-g o to M-g l; M-g o is
3966 now "other". 3966 now "other".
3967 (facemenu-justification-menu, facemenu-indentation-menu): 3967 (facemenu-justification-menu, facemenu-indentation-menu):
3968 New submenus, moved from enriched.el 3968 New submenus, moved from enriched.el.
3969 (list-colors-display, facemenu-color-equal): New functions. 3969 (list-colors-display, facemenu-color-equal): New functions.
3970 (facemenu-menu): Added "Display Faces" item. 3970 (facemenu-menu): Added "Display Faces" item.
3971 (facemenu-new-faces-at-end): New variable. 3971 (facemenu-new-faces-at-end): New variable.
@@ -4554,18 +4554,18 @@
4554 reference keys before they are used. 4554 reference keys before they are used.
4555 (bibtex-generate-autokey, bibtex-clean-entry): New function to 4555 (bibtex-generate-autokey, bibtex-clean-entry): New function to
4556 generate an autokey if necessary. 4556 generate an autokey if necessary.
4557 (bibtex-autokey-names, bibtex-autokey-name-change-strings, 4557 (bibtex-autokey-names, bibtex-autokey-name-change-strings)
4558 bibtex-autokey-name-length, bibtex-autokey-name-separator, 4558 (bibtex-autokey-name-length, bibtex-autokey-name-separator)
4559 bibtex-autokey-year-length, bibtex-autokey-titlewords, 4559 (bibtex-autokey-year-length, bibtex-autokey-titlewords)
4560 bibtex-autokey-title-terminators, 4560 (bibtex-autokey-title-terminators)
4561 bibtex-autokey-titlewords-stretch, 4561 (bibtex-autokey-titlewords-stretch)
4562 bibtex-autokey-titleword-first-ignore, 4562 (bibtex-autokey-titleword-first-ignore)
4563 bibtex-autokey-titleword-abbrevs, 4563 (bibtex-autokey-titleword-abbrevs)
4564 bibtex-autokey-titleword-change-strings, 4564 (bibtex-autokey-titleword-change-strings)
4565 bibtex-autokey-titleword-length, 4565 (bibtex-autokey-titleword-length)
4566 bibtex-autokey-titleword-separator, 4566 (bibtex-autokey-titleword-separator)
4567 bibtex-autokey-name-year-separator, 4567 (bibtex-autokey-name-year-separator)
4568 bibtex-autokey-year-title-separator): New variables related to 4568 (bibtex-autokey-year-title-separator): New variables related to
4569 bibtex-generate-autokey. 4569 bibtex-generate-autokey.
4570 (bibtex-find-entry-location): Optional second parameter maybedup 4570 (bibtex-find-entry-location): Optional second parameter maybedup
4571 to tell it that entering a duplicate entry isn't to report by an 4571 to tell it that entering a duplicate entry isn't to report by an
@@ -4591,14 +4591,14 @@
4591 (validate-bibtex-buffer): Completely rewritten to validate, if 4591 (validate-bibtex-buffer): Completely rewritten to validate, if
4592 buffer is syntactically correct. 4592 buffer is syntactically correct.
4593 (find-bibtex-duplicates): Moved into validate-bibtex-buffer. 4593 (find-bibtex-duplicates): Moved into validate-bibtex-buffer.
4594 (ispell-abstract, bibtex-ispell-abstract, ispell-bibtex-entry, 4594 (ispell-abstract, bibtex-ispell-abstract, ispell-bibtex-entry)
4595 bibtex-ispell-entry, beginning-of-bibtex-entry, 4595 (bibtex-ispell-entry, beginning-of-bibtex-entry)
4596 bibtex-beginning-of-entry, end-of-bibtex-entry, 4596 (bibtex-beginning-of-entry, end-of-bibtex-entry)
4597 bibtex-end-of-entry, hide-bibtex-entry-bodies, 4597 (bibtex-end-of-entry, hide-bibtex-entry-bodies)
4598 bibtex-hide-entry-bodies, narrow-to-bibtex-entry, 4598 (bibtex-hide-entry-bodies, narrow-to-bibtex-entry)
4599 bibtex-narrow-to-entry, sort-bibtex-entries, bibtex-sort-entries, 4599 (bibtex-narrow-to-entry, sort-bibtex-entries, bibtex-sort-entries)
4600 validate-bibtex-buffer, bibtex-validate-buffer, 4600 (validate-bibtex-buffer, bibtex-validate-buffer)
4601 find-bibtex-entry-location, bibtex-find-entry-location): All 4601 (find-bibtex-entry-location, bibtex-find-entry-location): All
4602 interactive functions are renamed, so that any interface function 4602 interactive functions are renamed, so that any interface function
4603 begins with "bibtex-". Mapping: 4603 begins with "bibtex-". Mapping:
4604 ispell-abstract --> bibtex-ispell-abstract 4604 ispell-abstract --> bibtex-ispell-abstract
@@ -4610,8 +4610,8 @@
4610 sort-bibtex-entries --> bibtex-sort-entries 4610 sort-bibtex-entries --> bibtex-sort-entries
4611 validate-bibtex-buffer --> bibtex-validate-buffer 4611 validate-bibtex-buffer --> bibtex-validate-buffer
4612 find-bibtex-entry-location --> bibtex-find-entry-location 4612 find-bibtex-entry-location --> bibtex-find-entry-location
4613 (bibtex-maintain-sorted-entries, 4613 (bibtex-maintain-sorted-entries)
4614 bibtex-sort-ignore-string-entries): Default is now t. 4614 (bibtex-sort-ignore-string-entries): Default is now t.
4615 (bibtex-complete-string): String list is built from additional 4615 (bibtex-complete-string): String list is built from additional
4616 string list bibtex-predefined-string and current strings in file. 4616 string list bibtex-predefined-string and current strings in file.
4617 (string-equalp): Deleted and substituted by string-equal. 4617 (string-equalp): Deleted and substituted by string-equal.
@@ -4633,8 +4633,8 @@
4633 (bibtex-current-entry-label, put-string-on-kill-ring): Deleted 4633 (bibtex-current-entry-label, put-string-on-kill-ring): Deleted
4634 (AUCTeX provides all the functionality needed for citation 4634 (AUCTeX provides all the functionality needed for citation
4635 completion). 4635 completion).
4636 (bibtex-enclosing-reference, bibtex-pop-previous, bibtex-pop-next, 4636 (bibtex-enclosing-reference, bibtex-pop-previous, bibtex-pop-next)
4637 bibtex-clean-entry): Hacked for speed (bibtex-pop-previous and 4637 (bibtex-clean-entry): Hacked for speed (bibtex-pop-previous and
4638 bibtex-pop-next were to slow for larger BibTeX files). 4638 bibtex-pop-next were to slow for larger BibTeX files).
4639 (bibtex-pop-previous, bibtex-pop-next): Delimiters from previous 4639 (bibtex-pop-previous, bibtex-pop-next): Delimiters from previous
4640 or next entry are changed to actual delimiters if necessary. 4640 or next entry are changed to actual delimiters if necessary.
@@ -4657,7 +4657,7 @@
4657 bibtex-pop-next didn't work, probably due to a bug in 4657 bibtex-pop-next didn't work, probably due to a bug in
4658 re-search-forward). 4658 re-search-forward).
4659 (several functions): Added support for {} as field delimiters 4659 (several functions): Added support for {} as field delimiters
4660 (better than '"' for accented characters. 4660 (better than '"' for accented characters).
4661 (bibtex-clean-entry): If optional field crossref is empty or 4661 (bibtex-clean-entry): If optional field crossref is empty or
4662 missing, former optional fields (if bibtex-include-OPTcrossref was 4662 missing, former optional fields (if bibtex-include-OPTcrossref was
4663 t) are necessary again. bibtex-clean-entry complains if they are 4663 t) are necessary again. bibtex-clean-entry complains if they are
@@ -4825,8 +4825,8 @@
48251994-12-09 Ken Stevens <stevensk@afit.af.mil> 48251994-12-09 Ken Stevens <stevensk@afit.af.mil>
4826 4826
4827 * ispell.el: Added ispell-offset for version consistency. 4827 * ispell.el: Added ispell-offset for version consistency.
4828 (ispell-dictionary-alist): Updated dictionaries & better match defaults 4828 (ispell-dictionary-alist): Updated dictionaries & better match defaults.
4829 (ispell-alternate-dictionary): Added /usr/shar path 4829 (ispell-alternate-dictionary): Added /usr/shar path.
4830 (ispell-menu-map-needed): Redo changes that made this incompatible 4830 (ispell-menu-map-needed): Redo changes that made this incompatible
4831 with earlier versions of Emacs19. 4831 with earlier versions of Emacs19.
4832 (ispell-required-version): Changed to assure version 3.1.12 accessed. 4832 (ispell-required-version): Changed to assure version 3.1.12 accessed.
@@ -6112,7 +6112,7 @@
61121994-10-07 Richard Stallman <rms@mole.gnu.ai.mit.edu> 61121994-10-07 Richard Stallman <rms@mole.gnu.ai.mit.edu>
6113 6113
6114 * mouse.el (mouse-major-mode-menu): New function, on C-mouse-3. 6114 * mouse.el (mouse-major-mode-menu): New function, on C-mouse-3.
6115 (mouse-major-mode-menu-1): New function 6115 (mouse-major-mode-menu-1): New function.
6116 (mouse-set-font): Move it to C-mouse-2. 6116 (mouse-set-font): Move it to C-mouse-2.
6117 6117
6118 * font-lock.el (font-lock-defaults-alist): Delete most modes--all 6118 * font-lock.el (font-lock-defaults-alist): Delete most modes--all
@@ -6534,7 +6534,7 @@
6534 6534
6535 * cc-mode.el (c-progress-info, c-progress-init) 6535 * cc-mode.el (c-progress-info, c-progress-init)
6536 (c-progress-update, c-progress-fini): 6536 (c-progress-update, c-progress-fini):
6537 New vars/defuns for better long indentation progress reporting 6537 New vars/defuns for better long indentation progress reporting.
6538 (c-indent-exp, c-indent-region): Use them. 6538 (c-indent-exp, c-indent-region): Use them.
6539 6539
6540 * cc-mode.el (c-guess-basic-syntax): 6540 * cc-mode.el (c-guess-basic-syntax):
@@ -6542,7 +6542,7 @@
6542 find proper relpos of an arglist-cont. 6542 find proper relpos of an arglist-cont.
6543 6543
6544 * cc-mode.el (c-offset-alist-default): 6544 * cc-mode.el (c-offset-alist-default):
6545 statement-case-open default offset is zero 6545 statement-case-open default offset is zero.
6546 (c-skip-case-statement-forward): New function. 6546 (c-skip-case-statement-forward): New function.
6547 (c-guess-basic-syntax): CASE 15: use c-skip-case-statement-forward in 6547 (c-guess-basic-syntax): CASE 15: use c-skip-case-statement-forward in
6548 proper places to find the real relpos of statement's inside switch 6548 proper places to find the real relpos of statement's inside switch
@@ -8795,9 +8795,9 @@
8795 `gnus-uu-asynchronous' variable set. 8795 `gnus-uu-asynchronous' variable set.
8796 (gnus-uu-ctl-map): Removed the keystrokes `C-c C-v C-h' and 8796 (gnus-uu-ctl-map): Removed the keystrokes `C-c C-v C-h' and
8797 `C-c C-v h' from the keymap. 8797 `C-c C-v h' from the keymap.
8798 (gnus-uu-decode-and-view-all-articles, 8798 (gnus-uu-decode-and-view-all-articles)
8799 (gnus-uu-decode-and-view-all-unread-articles, 8799 (gnus-uu-decode-and-view-all-unread-articles)
8800 (gnus-uu-decode-and-save-all-unread-articles, 8800 (gnus-uu-decode-and-save-all-unread-articles)
8801 (gnus-uu-decode-and-save-all-articles): Accept prefix arg for # files. 8801 (gnus-uu-decode-and-save-all-articles): Accept prefix arg for # files.
8802 (gnus-uu-uustrip-article-as): Waits for uudecode to finish before 8802 (gnus-uu-uustrip-article-as): Waits for uudecode to finish before
8803 further treatment of the resulting files. 8803 further treatment of the resulting files.
diff --git a/lisp/ChangeLog.6 b/lisp/ChangeLog.6
index 45c832c5e24..e5bd7fa9d27 100644
--- a/lisp/ChangeLog.6
+++ b/lisp/ChangeLog.6
@@ -1420,7 +1420,7 @@
1420 Added default constants. 1420 Added default constants.
1421 (simula-emacs-features): New constant to hold information 1421 (simula-emacs-features): New constant to hold information
1422 on which flavor if emacs is running (from cc-mode.el). 1422 on which flavor if emacs is running (from cc-mode.el).
1423 (simula-mode-menu): Menu definition for Lucid Emacs 1423 (simula-mode-menu): Menu definition for Lucid Emacs.
1424 (simula-mode-map): Bound new command simula-indent-exp to C-M-q 1424 (simula-mode-map): Bound new command simula-indent-exp to C-M-q
1425 and added lots of commands to [menu-bar]. 1425 and added lots of commands to [menu-bar].
1426 (simula-popup-menu): New function for Lucid menus. 1426 (simula-popup-menu): New function for Lucid menus.
@@ -1577,7 +1577,7 @@
1577 (gomoku-winning-qtuple-beg, gomoku-winning-qtuple-end) 1577 (gomoku-winning-qtuple-beg, gomoku-winning-qtuple-end)
1578 (gomoku-winning-qtuple-dx, gomoku-winning-qtuple-dy): Pseudo variables 1578 (gomoku-winning-qtuple-dx, gomoku-winning-qtuple-dy): Pseudo variables
1579 only used for non-functional argument passing deleted. 1579 only used for non-functional argument passing deleted.
1580 (gomoku-cross-winning-qtuple): Accordingly deleted function and 1580 (gomoku-cross-winning-qtuple): Accordingly deleted function.
1581 (gomoku-check-filled-qtuple): Accordingly adapted. 1581 (gomoku-check-filled-qtuple): Accordingly adapted.
1582 (gomoku-cross-qtuple): Don't be confused by tabs. 1582 (gomoku-cross-qtuple): Don't be confused by tabs.
1583 (gomoku-move-down, gomoku-move-up): Simplified because point is always 1583 (gomoku-move-down, gomoku-move-up): Simplified because point is always
@@ -2455,7 +2455,7 @@
2455 2455
2456 * ediff-init.el (ediff-hide-face): New function. 2456 * ediff-init.el (ediff-hide-face): New function.
2457 (ediff-collect-diffs-metajob): Fixed. 2457 (ediff-collect-diffs-metajob): Fixed.
2458 (ediff-check-for-cl-seq): Function deleted 2458 (ediff-check-for-cl-seq): Function deleted.
2459 (ediff-abbreviate-file-name): Now a defun. 2459 (ediff-abbreviate-file-name): Now a defun.
2460 (ediff-has-face-support-p): New function. Ediff now supports 2460 (ediff-has-face-support-p): New function. Ediff now supports
2461 faces whenever possible. 2461 faces whenever possible.
@@ -2475,7 +2475,7 @@
2475 (run-ediff-from-cvs-buffer): New function. Moved all 2475 (run-ediff-from-cvs-buffer): New function. Moved all
2476 version-control-related stuff to a new file, ediff-vers.el. 2476 version-control-related stuff to a new file, ediff-vers.el.
2477 2477
2478 * ediff-util.el (ediff-save-buffer-in-file): New function 2478 * ediff-util.el (ediff-save-buffer-in-file): New function.
2479 (ediff-visible-region): No longer narrows the merge buffer. 2479 (ediff-visible-region): No longer narrows the merge buffer.
2480 (ediff-status-info): Now tells if we are focusing on regions where 2480 (ediff-status-info): Now tells if we are focusing on regions where
2481 both buffers differ from the ancestor. 2481 both buffers differ from the ancestor.
@@ -5884,7 +5884,7 @@
5884 5884
5885 * ediff-meta.el: New file. 5885 * ediff-meta.el: New file.
5886 * ediff-hook.el: New file. 5886 * ediff-hook.el: New file.
5887 * ediff.el: Moved menubar definitions to a new file, ediff-hook.el 5887 * ediff.el: Moved menubar definitions to a new file, ediff-hook.el.
5888 (ediff-files, ediff-merge-files): Better file-name defaults. 5888 (ediff-files, ediff-merge-files): Better file-name defaults.
5889 (ediff-split-string): New function. 5889 (ediff-split-string): New function.
5890 (ediff-exec-process): Now handles diff args separated by space. 5890 (ediff-exec-process): Now handles diff args separated by space.
@@ -6855,11 +6855,11 @@
6855 6855
68561995-08-15 Daniel Pfeiffer <Daniel.Pfeiffer@Informatik.START.dbp.de> 68561995-08-15 Daniel Pfeiffer <Daniel.Pfeiffer@Informatik.START.dbp.de>
6857 6857
6858 * skeleton.el (skeleton-pair-insert-maybe): Plain insert in Ovwrt mode 6858 * skeleton.el (skeleton-pair-insert-maybe): Plain insert in Ovwrt mode.
6859 (skeleton-insert): If skeleton doesn't fit in window, put beginning 6859 (skeleton-insert): If skeleton doesn't fit in window, put beginning
6860 at top before going to _ point. 6860 at top before going to _ point.
6861 (skeleton-internal-list): Rewritten so that resume: sections pertain 6861 (skeleton-internal-list): Rewritten so that resume: sections pertain
6862 only to inferior skeletons and make str available there 6862 only to inferior skeletons and make str available there.
6863 (skeleton-read): Don't quit and remove partial skeleton when empty 6863 (skeleton-read): Don't quit and remove partial skeleton when empty
6864 string entered for outer iterator. Added implicit argument `input'. 6864 string entered for outer iterator. Added implicit argument `input'.
6865 (define-skeleton, skeleton-insert, skeleton-internal-list): Use `x 6865 (define-skeleton, skeleton-insert, skeleton-internal-list): Use `x
@@ -7301,7 +7301,7 @@
73011995-07-22 Daniel Pfeiffer <Daniel.Pfeiffer@Informatik.START.dbp.de> 73011995-07-22 Daniel Pfeiffer <Daniel.Pfeiffer@Informatik.START.dbp.de>
7302 7302
7303 * apropos.el: Add latest changes of old library and some more. 7303 * apropos.el: Add latest changes of old library and some more.
7304 (apropos): Only show unbound symbols when do-all 7304 (apropos): Only show unbound symbols when do-all.
7305 (apropos-documentation-check-elc-file): New copied function. 7305 (apropos-documentation-check-elc-file): New copied function.
7306 (apropos-command): Also use `apropos-do-all' when called as function. 7306 (apropos-command): Also use `apropos-do-all' when called as function.
7307 (apropos-print-doc): Renamed from `apropos-print-documentation', i 7307 (apropos-print-doc): Renamed from `apropos-print-documentation', i
@@ -7632,7 +7632,7 @@
7632 (apropos-use-faces, apropos-local-map): New variables. 7632 (apropos-use-faces, apropos-local-map): New variables.
7633 (apropos-command): New name for `command-apropos' no longer in help.el. 7633 (apropos-command): New name for `command-apropos' no longer in help.el.
7634 (apropos-value): New command. 7634 (apropos-value): New command.
7635 (apropos-documentation): New name for `super-apropos' 7635 (apropos-documentation): New name for `super-apropos'.
7636 (apropos-follow, apropos-mouse-follow): New commands for hypertext. 7636 (apropos-follow, apropos-mouse-follow): New commands for hypertext.
7637 (apropos-describe-plist): New function. 7637 (apropos-describe-plist): New function.
7638 7638
@@ -7644,8 +7644,8 @@
7644 7644
7645 * skeleton.el: Partly rewritten and extended. 7645 * skeleton.el: Partly rewritten and extended.
7646 (skeleton-filter, skeleton-untabify, skeleton-further-elements) 7646 (skeleton-filter, skeleton-untabify, skeleton-further-elements)
7647 (skeleton-abbrev-cleanup): New variables 7647 (skeleton-abbrev-cleanup): New variables.
7648 (skeleton-proxy, skeleton-abbrev-cleanup): New functions 7648 (skeleton-proxy, skeleton-abbrev-cleanup): New functions.
7649 (skeleton-insert): Sublanguage element < must now be handled via 7649 (skeleton-insert): Sublanguage element < must now be handled via
7650 `skeleton-further-elements' (used only in sh-script and ada). Lisp 7650 `skeleton-further-elements' (used only in sh-script and ada). Lisp
7651 expressions can be quoted to ignore the return value. 7651 expressions can be quoted to ignore the return value.
@@ -7798,7 +7798,7 @@
7798 7798
77991995-06-29 David M. Smith <D.M.Smith@lancaster.ac.uk> 77991995-06-29 David M. Smith <D.M.Smith@lancaster.ac.uk>
7800 7800
7801 * ielm.el (ielm-font-lock-keywords): New variable 7801 * ielm.el (ielm-font-lock-keywords): New variable.
7802 (inferior-emacs-lisp-mode): Use it for font-lock support 7802 (inferior-emacs-lisp-mode): Use it for font-lock support
7803 7803
78041995-06-29 Bryan O'Sullivan <bos@Eng.Sun.COM> 78041995-06-29 Bryan O'Sullivan <bos@Eng.Sun.COM>
diff --git a/lisp/ChangeLog.8 b/lisp/ChangeLog.8
index 8ecf3f0e33a..8a30b0c6d90 100644
--- a/lisp/ChangeLog.8
+++ b/lisp/ChangeLog.8
@@ -104,7 +104,7 @@
104 version numbering regexp list 104 version numbering regexp list
105 change-log-version-number-regexp-list. 105 change-log-version-number-regexp-list.
106 (change-log-find-version): Renamed to 106 (change-log-find-version): Renamed to
107 change-log-version-number-search 107 change-log-version-number-search.
108 (add-log-file-name-function): New. 108 (add-log-file-name-function): New.
109 (change-log-search-vc-number): Added END parameter. Added doc 109 (change-log-search-vc-number): Added END parameter. Added doc
110 string to function. 110 string to function.
@@ -338,7 +338,7 @@
3381999-12-15 Carsten Dominik <dominik@astro.uva.nl> 3381999-12-15 Carsten Dominik <dominik@astro.uva.nl>
339 339
340 * textmodes/reftex.el (reftex-compile-variables): Respect new 340 * textmodes/reftex.el (reftex-compile-variables): Respect new
341 structure of `reftex-index-macro' 341 structure of `reftex-index-macro'.
342 (reftex-compile-variables): Use the changed structure of 342 (reftex-compile-variables): Use the changed structure of
343 `reftex-label-alist'. 343 `reftex-label-alist'.
344 344
@@ -448,7 +448,7 @@
448 ps-mule-prepare-cmpchar-font): Deleted. 448 ps-mule-prepare-cmpchar-font): Deleted.
449 (ps-mule-string-encoding): New arg NO-SETFONT. 449 (ps-mule-string-encoding): New arg NO-SETFONT.
450 (ps-mule-bitmap-prologue): In Postscript code of BuildGlyphCommon, 450 (ps-mule-bitmap-prologue): In Postscript code of BuildGlyphCommon,
451 check Composing, not Cmpchar 451 check Composing, not Cmpchar.
452 (ps-mule-initialize): Set ps-mule-composition-prologue-generated 452 (ps-mule-initialize): Set ps-mule-composition-prologue-generated
453 to nil. 453 to nil.
454 (ps-mule-begin-job): Check existence of new composition. 454 (ps-mule-begin-job): Check existence of new composition.
@@ -978,7 +978,7 @@
978 (font-lock-add-keywords): Rename `major-mode' into `mode'. 978 (font-lock-add-keywords): Rename `major-mode' into `mode'.
979 (font-lock-remove-keywords): Added a dummy `mode' argument for 979 (font-lock-remove-keywords): Added a dummy `mode' argument for
980 potential future support. 980 potential future support.
981 (font-lock-fontify-anchored-keywords, 981 (font-lock-fontify-anchored-keywords)
982 (font-lock-fontify-keywords-region): Only handle multiline strings 982 (font-lock-fontify-keywords-region): Only handle multiline strings
983 if necessary (avoids a pathological behavior in (f.ex) diff-mode). 983 if necessary (avoids a pathological behavior in (f.ex) diff-mode).
984 984
@@ -1603,7 +1603,7 @@
1603 the new backquote syntax. 1603 the new backquote syntax.
1604 (smbclient-program, smbclient-program-options) 1604 (smbclient-program, smbclient-program-options)
1605 (smbclient-prompt-regexp, smbclient-font-lock-keywords): New 1605 (smbclient-prompt-regexp, smbclient-font-lock-keywords): New
1606 variables 1606 variables.
1607 (smbclient, smbclient-list-shares): New functions 1607 (smbclient, smbclient-list-shares): New functions
1608 1608
16091999-11-12 Sam Steingold <sds@ksp.com> 16091999-11-12 Sam Steingold <sds@ksp.com>
@@ -1858,7 +1858,7 @@
1858 * whitespace.el: Test for existence of `defcustom' and `defgroup' 1858 * whitespace.el: Test for existence of `defcustom' and `defgroup'
1859 using fboundp instead of assuming that these are not present in 1859 using fboundp instead of assuming that these are not present in
1860 particular flavors of emacs. 1860 particular flavors of emacs.
1861 (whitespace-version): Update to 2.8 1861 (whitespace-version): Update to 2.8.
1862 (whitespace-display-in-modeline): Add custom variable to control 1862 (whitespace-display-in-modeline): Add custom variable to control
1863 displaying the whitespace errors on the modeline based on 1863 displaying the whitespace errors on the modeline based on
1864 suggestion from <klaus.berndl@sdm.de> 1864 suggestion from <klaus.berndl@sdm.de>
@@ -2136,17 +2136,17 @@
21361999-10-19 Peter Kleiweg <kleiweg@let.rug.nl> 21361999-10-19 Peter Kleiweg <kleiweg@let.rug.nl>
2137 2137
2138 * progmodes/ps-mode.el (ps-mode-print-function): Fix default 2138 * progmodes/ps-mode.el (ps-mode-print-function): Fix default
2139 value: \"lpr\" changed to "lpr" 2139 value: \"lpr\" changed to "lpr".
2140 (ps-mode-version): New constant 2140 (ps-mode-version): New constant.
2141 (ps-mode-show-version): New function, added key in ps-mode-map 2141 (ps-mode-show-version): New function, added key in ps-mode-map.
2142 (ps-run-messages): Removed 2142 (ps-run-messages): Removed.
2143 (ps-run-font-lock-keywords-2): New defcustom variable replacing 2143 (ps-run-font-lock-keywords-2): New defcustom variable replacing
2144 ps-run-messages. These keywords now include the value of 2144 ps-run-messages. These keywords now include the value of
2145 ps-run-prompt, making its fontification customizable. 2145 ps-run-prompt, making its fontification customizable.
2146 (ps-run-init): Removed \\n from docstring, it is now added when 2146 (ps-run-init): Removed \\n from docstring, it is now added when
2147 the value is used 2147 the value is used.
2148 (ps-run-font-lock-keywords-1): Added checking for initial ^ in 2148 (ps-run-font-lock-keywords-1): Added checking for initial ^ in
2149 ps-run-prompt 2149 ps-run-prompt.
2150 (ps-mode): Added ps-run-font-lock-keywords-2 to list of 2150 (ps-mode): Added ps-run-font-lock-keywords-2 to list of
2151 customizable variables in doc-string (its equivalent 2151 customizable variables in doc-string (its equivalent
2152 ps-run-messages was missing in previous version of the doc-string). 2152 ps-run-messages was missing in previous version of the doc-string).
@@ -2271,7 +2271,7 @@
22711999-10-14 Stefan Monnier <monnier@cs.yale.edu> 22711999-10-14 Stefan Monnier <monnier@cs.yale.edu>
2272 2272
2273 * ange-ftp.el (ange-ftp-make-tmp-name, ange-ftp-del-tmp-name): 2273 * ange-ftp.el (ange-ftp-make-tmp-name, ange-ftp-del-tmp-name):
2274 * browse-url.el (browse-url-of-buffer, browse-url-delete-temp-file), 2274 * browse-url.el (browse-url-of-buffer, browse-url-delete-temp-file)
2275 (browse-url-temp-file-list, browse-url-delete-temp-file-list): 2275 (browse-url-temp-file-list, browse-url-delete-temp-file-list):
2276 * ediff-util.el (ediff-make-temp-file): 2276 * ediff-util.el (ediff-make-temp-file):
2277 * ediff-vers.el (ediff-pcl-cvs-view-revision): 2277 * ediff-vers.el (ediff-pcl-cvs-view-revision):
@@ -2830,7 +2830,7 @@
2830 (custom-buffer-create-internal): Obey custom-raised-buttons, 2830 (custom-buffer-create-internal): Obey custom-raised-buttons,
2831 Custom-buffer-done. 2831 Custom-buffer-done.
2832 (custom-button-face): Make it `released-button'. 2832 (custom-button-face): Make it `released-button'.
2833 (custom-button-pressed-face): Make it `pressed-button' 2833 (custom-button-pressed-face): Make it `pressed-button'.
2834 (custom-mode-map): Bind "q" to Custom-buffer-done. 2834 (custom-mode-map): Bind "q" to Custom-buffer-done.
2835 (custom-mode): Deal with raised/pressed buttons. 2835 (custom-mode): Deal with raised/pressed buttons.
2836 2836
@@ -2987,7 +2987,7 @@
2987 font-lock-defaults setting. 2987 font-lock-defaults setting.
2988 (java-properties-generic-mode): Supports both ! and # as comment 2988 (java-properties-generic-mode): Supports both ! and # as comment
2989 characters. 2989 characters.
2990 (java-properties-generic-mode): Added an imenu-generic-expression 2990 (java-properties-generic-mode): Added an imenu-generic-expression.
2991 (java-properties-generic-mode): Reworked to support the various 2991 (java-properties-generic-mode): Reworked to support the various
2992 different ways to separate name and value (viz, '=', ':' and 2992 different ways to separate name and value (viz, '=', ':' and
2993 whitespace). 2993 whitespace).
@@ -3483,7 +3483,7 @@
3483 (reftex-toc-find-section): Use new version of `reftex-nearest-match'. 3483 (reftex-toc-find-section): Use new version of `reftex-nearest-match'.
3484 (reftex-insert-docstruct): Adapted to work with the index stuff. 3484 (reftex-insert-docstruct): Adapted to work with the index stuff.
3485 (reftex-parse-from-file): Find index entries as well. 3485 (reftex-parse-from-file): Find index entries as well.
3486 (reftex-toc-toggle-index): New function 3486 (reftex-toc-toggle-index): New function.
3487 (reftex-toc-map): `i' is now used to toggle the index, File 3487 (reftex-toc-map): `i' is now used to toggle the index, File
3488 boundaries has been moved to `F'. 3488 boundaries has been moved to `F'.
3489 (reftex-select-label-map): Toggling display of file boundaries is 3489 (reftex-select-label-map): Toggling display of file boundaries is
@@ -3506,7 +3506,7 @@
3506 (reftex-index-section-letters, reftex-index-include-context) 3506 (reftex-index-section-letters, reftex-index-include-context)
3507 (reftex-index-follow-mode, reftex-index-header-face) 3507 (reftex-index-follow-mode, reftex-index-header-face)
3508 (reftex-index-section-face, reftex-index-tag-face) 3508 (reftex-index-section-face, reftex-index-tag-face)
3509 (reftex-index-face): New options 3509 (reftex-index-face): New options.
3510 (reftex-index-map, reftex-index-menu, reftex-last-index-file) 3510 (reftex-index-map, reftex-index-menu, reftex-last-index-file)
3511 (reftex-index-tag, reftex-index-return-marker) 3511 (reftex-index-tag, reftex-index-return-marker)
3512 (reftex-index-restriction-indicator, reftex-index-restriction-data) 3512 (reftex-index-restriction-indicator, reftex-index-restriction-data)
@@ -3514,9 +3514,9 @@
3514 (reftex-index-key-end-re, reftex-find-index-entry-regexp-format) 3514 (reftex-index-key-end-re, reftex-find-index-entry-regexp-format)
3515 (reftex-everything-regexp-no-index, reftex-index-re) 3515 (reftex-everything-regexp-no-index, reftex-index-re)
3516 (reftex-macros-with-index, reftex-index-macro-alist): New variables. 3516 (reftex-macros-with-index, reftex-index-macro-alist): New variables.
3517 (reftex-index-help, reftex-index-macros-builtin, 3517 (reftex-index-help, reftex-index-macros-builtin)
3518 (reftex-key-to-index-macro-alist, reftex-query-index-macro-prompt) 3518 (reftex-key-to-index-macro-alist, reftex-query-index-macro-prompt)
3519 (reftex-query-index-macro-help): New constants 3519 (reftex-query-index-macro-help): New constants.
3520 (reftex-index-selection-or-word, reftex-index) 3520 (reftex-index-selection-or-word, reftex-index)
3521 (reftex-default-index, reftex-update-default-index) 3521 (reftex-default-index, reftex-update-default-index)
3522 (reftex-index-complete-tag, reftex-index-select-tag) 3522 (reftex-index-complete-tag, reftex-index-select-tag)
@@ -3607,7 +3607,7 @@
3607 window; and poles can be oriented horizontally. Face support is 3607 window; and poles can be oriented horizontally. Face support is
3608 thrown in gratuitously. 3608 thrown in gratuitously.
3609 (hanoi): Changed default number of rings back to 3. 3609 (hanoi): Changed default number of rings back to 3.
3610 (hanoi-unix, hanoi-unix-64): New commands 3610 (hanoi-unix, hanoi-unix-64): New commands.
3611 (hanoi-horizontal-flag, hanoi-move-period, hanoi-use-faces, 3611 (hanoi-horizontal-flag, hanoi-move-period, hanoi-use-faces,
3612 hanoi-pole-face, hanoi-base-face, hanoi-even-ring-face, 3612 hanoi-pole-face, hanoi-base-face, hanoi-even-ring-face,
3613 hanoi-odd-ring-face): New variables. 3613 hanoi-odd-ring-face): New variables.
@@ -5777,20 +5777,20 @@
57771999-03-12 Eric M. Ludlam <zappo@ultranet.com> 57771999-03-12 Eric M. Ludlam <zappo@ultranet.com>
5778 5778
5779 * speedbar.el: Added commentary about stealthy functions. 5779 * speedbar.el: Added commentary about stealthy functions.
5780 (speedbar-message) new function. 5780 (speedbar-message): New function.
5781 (speedbar-y-or-n-p): New function 5781 (speedbar-y-or-n-p): New function.
5782 (speedbar-with-attached-buffer) Moved macro before reference. 5782 (speedbar-with-attached-buffer): Moved macro before reference.
5783 Now uses `save-selected-window'. 5783 Now uses `save-selected-window'.
5784 (speedbar-mouse-hscroll, speedbar-track-mouse, speedbar-refresh, 5784 (speedbar-mouse-hscroll, speedbar-track-mouse, speedbar-refresh)
5785 speedbar-generic-item-info, speedbar-item-info-file-helper, 5785 (speedbar-generic-item-info, speedbar-item-info-file-helper)
5786 speedbar-item-delete, speedbar-insert-generic-list, 5786 (speedbar-item-delete, speedbar-insert-generic-list)
5787 speedbar-timer-fn, speedbar-check-vc-this-line, 5787 (speedbar-timer-fn, speedbar-check-vc-this-line)
5788 speedbar-check-obj-this-line, speedbar-fetch-dynamic-etags, 5788 (speedbar-check-obj-this-line, speedbar-fetch-dynamic-etags)
5789 speedbar-buffers-item-info) Use speedbar-message. 5789 (speedbar-buffers-item-info): Use speedbar-message.
5790 (speedbar-item-info) Limit `message-log-max'. 5790 (speedbar-item-info): Limit `message-log-max'.
5791 (speedbar-item-load, speedbar-item-copy, speedbar-item-rename, 5791 (speedbar-item-load, speedbar-item-copy, speedbar-item-rename)
5792 speedbar-item-delete, speedbar-item-object-delete, 5792 (speedbar-item-delete, speedbar-item-object-delete)
5793 speedbar-buffer-kill-buffer) Use speedbar-y-or-n-p. 5793 (speedbar-buffer-kill-buffer): Use speedbar-y-or-n-p.
5794 5794
57951999-03-10 Kenichi Handa <handa@mulelab.etl.go.jp> 57951999-03-10 Kenichi Handa <handa@mulelab.etl.go.jp>
5796 5796
@@ -6230,7 +6230,7 @@
6230 6230
62311999-02-12 Alex Schroeder <a.schroeder@bsiag.ch> 62311999-02-12 Alex Schroeder <a.schroeder@bsiag.ch>
6232 6232
6233 * sql.el: Set version to 1.3.2 6233 * sql.el: Set version to 1.3.2.
6234 (sql-solid-program): Added support for solid. 6234 (sql-solid-program): Added support for solid.
6235 (sql-help): Doc mentions sql-solid. 6235 (sql-help): Doc mentions sql-solid.
6236 (sql-solid): Entry function for Solid. 6236 (sql-solid): Entry function for Solid.
@@ -6384,7 +6384,7 @@
6384 coding-system-list here. 6384 coding-system-list here.
6385 6385
6386 * international/mule.el (coding-system-lessp): Moved here from 6386 * international/mule.el (coding-system-lessp): Moved here from
6387 mule-util.el 6387 mule-util.el.
6388 (add-to-coding-system-list): New function. 6388 (add-to-coding-system-list): New function.
6389 (make-subsidiary-coding-system, make-coding-system, 6389 (make-subsidiary-coding-system, make-coding-system,
6390 define-coding-system-alias): Use it instead of setting 6390 define-coding-system-alias): Use it instead of setting
@@ -6721,7 +6721,7 @@
6721 (speedbar-add-mode-functions-list) Improve doc. 6721 (speedbar-add-mode-functions-list) Improve doc.
6722 (speedbar-line-token) New function. 6722 (speedbar-line-token) New function.
6723 (speedbar-dired) Fix order of directories in -shown-directories. 6723 (speedbar-dired) Fix order of directories in -shown-directories.
6724 (speedbar-line-path): Default return is default-directory 6724 (speedbar-line-path): Default return is default-directory.
6725 (speedbar-buffers-line-path): Return is dir name only. 6725 (speedbar-buffers-line-path): Return is dir name only.
6726 (speedbar-mode-functions-list): New variable. 6726 (speedbar-mode-functions-list): New variable.
6727 (speedbar-mouse-item-info): Rewrote to be a replaceable fn. 6727 (speedbar-mouse-item-info): Rewrote to be a replaceable fn.
@@ -7321,7 +7321,7 @@
73211998-12-29 Masatake Yamato <masata-y@tori.aist-nara.ac.jp> 73211998-12-29 Masatake Yamato <masata-y@tori.aist-nara.ac.jp>
7322 7322
7323 * page-ext.el: Added mouse-selection feature for pages directory buffer. 7323 * page-ext.el: Added mouse-selection feature for pages directory buffer.
7324 (pages-directory-map): Bind mouse-2 7324 (pages-directory-map): Bind mouse-2.
7325 (pages-copy-header-and-position): Put text property. 7325 (pages-copy-header-and-position): Put text property.
7326 (pages-directory-goto-with-mouse): New function. 7326 (pages-directory-goto-with-mouse): New function.
7327 7327
@@ -7399,7 +7399,7 @@
7399 (cperl-after-block-p): Likewise. 7399 (cperl-after-block-p): Likewise.
7400 (cperl-after-block-and-statement-beg): Likewise. 7400 (cperl-after-block-and-statement-beg): Likewise.
7401 (cperl-after-block-p): After END/BEGIN we are a block. 7401 (cperl-after-block-p): After END/BEGIN we are a block.
7402 (cperl-after-expr-p): Skip labels when checking 7402 (cperl-after-expr-p): Skip labels when checking.
7403 (cperl-indent-region): Make a marker for END - text added/removed. 7403 (cperl-indent-region): Make a marker for END - text added/removed.
7404 Disable hooks during the call (how to call them later?). 7404 Disable hooks during the call (how to call them later?).
7405 Now indents 820-line-long function in 6.5 sec (including 7405 Now indents 820-line-long function in 6.5 sec (including
@@ -7462,7 +7462,7 @@
7462 (cperl-fix-line-spacing): Sped up to bail out early. 7462 (cperl-fix-line-spacing): Sped up to bail out early.
7463 (x-color-defined-p): Was not compiling on XEmacs 7463 (x-color-defined-p): Was not compiling on XEmacs
7464 Was defmacro'ed with a tick. Remove another def. 7464 Was defmacro'ed with a tick. Remove another def.
7465 (cperl-clobber-lisp-bindings): If set, C-c variants are the old ones 7465 (cperl-clobber-lisp-bindings): If set, C-c variants are the old ones.
7466 (cperl-unwind-to-safe): New function. 7466 (cperl-unwind-to-safe): New function.
7467 (cperl-fontify-syntaxically): Use `cperl-unwind-to-safe' to start at 7467 (cperl-fontify-syntaxically): Use `cperl-unwind-to-safe' to start at
7468 reasonable position. 7468 reasonable position.
@@ -7512,7 +7512,7 @@
7512 (cperl-etags-goto-tag-location): New macro. 7512 (cperl-etags-goto-tag-location): New macro.
7513 (cperl-version): New variable. New menu entry 7513 (cperl-version): New variable. New menu entry
7514 random docstrings: References to "future" 20.3 removed. 7514 random docstrings: References to "future" 20.3 removed.
7515 Menu was described as `CPerl' instead of `Perl' 7515 Menu was described as `CPerl' instead of `Perl'.
7516 (perl-font-lock-keywords): Would not highlight `sub foo($$);'. 7516 (perl-font-lock-keywords): Would not highlight `sub foo($$);'.
7517 (cperl-toggle-construct-fix): Was toggling to t instead of 1. 7517 (cperl-toggle-construct-fix): Was toggling to t instead of 1.
7518 (cperl-ps-print-init): Associate `cperl-array-face', `cperl-hash-face' 7518 (cperl-ps-print-init): Associate `cperl-array-face', `cperl-hash-face'
@@ -8972,7 +8972,7 @@
8972 set unconditional-jump to nil. 8972 set unconditional-jump to nil.
8973 (ccl-compile-read-multibyte-character): Return nil. 8973 (ccl-compile-read-multibyte-character): Return nil.
8974 (ccl-compile-write-multibyte-character): Likewise. 8974 (ccl-compile-write-multibyte-character): Likewise.
8975 (ccl-compile-translate-character): Likewise 8975 (ccl-compile-translate-character): Likewise.
8976 (ccl-compile-map-multiple): Likewise. 8976 (ccl-compile-map-multiple): Likewise.
8977 (ccl-compile-map-single): Likewise. 8977 (ccl-compile-map-single): Likewise.
8978 8978
@@ -9055,7 +9055,7 @@
9055 9055
9056 * net-utils.el (ftp, nslookup): Require comint. 9056 * net-utils.el (ftp, nslookup): Require comint.
9057 (network-service-connection): Likewise. 9057 (network-service-connection): Likewise.
9058 (whois-server-name): Defaults to whois.arin.net 9058 (whois-server-name): Defaults to whois.arin.net.
9059 (whois-server-list, whois-server-tld, whois-guess-server): New var. 9059 (whois-server-list, whois-server-tld, whois-guess-server): New var.
9060 (whois): Tries to guess the appropriate top-level domain server. 9060 (whois): Tries to guess the appropriate top-level domain server.
9061 (whois-get-tld): New function. 9061 (whois-get-tld): New function.
@@ -9599,7 +9599,7 @@
9599 (reftex-view-cr-cite, reftex-view-cr-ref, reftex-end-of-bib-entry): 9599 (reftex-view-cr-cite, reftex-view-cr-ref, reftex-end-of-bib-entry):
9600 New functions. 9600 New functions.
9601 (reftex-auto-view-crossref): New value `window' allowed. 9601 (reftex-auto-view-crossref): New value `window' allowed.
9602 (reftex-view-crossref-when-idle): Process new `window' option in 9602 (reftex-view-crossref-when-idle): Process new `window' option.
9603 (reftex-translate-to-ascii-function): New default. 9603 (reftex-translate-to-ascii-function): New default.
9604 (reftex-label-illegal-re): Default changed, removed Latin1. 9604 (reftex-label-illegal-re): Default changed, removed Latin1.
9605 (reftex-latin1-to-ascii): New function. 9605 (reftex-latin1-to-ascii): New function.
@@ -9639,7 +9639,7 @@
9639 (checkdoc-this-string-valid): When converting a comment into a doc 9639 (checkdoc-this-string-valid): When converting a comment into a doc
9640 string, make sure " chars are \". 9640 string, make sure " chars are \".
9641 (checkdoc-sentencespace-region-engine): Only do double space check 9641 (checkdoc-sentencespace-region-engine): Only do double space check
9642 if based on the variable `sentence-end-double-space' 9642 if based on the variable `sentence-end-double-space'.
9643 (checkdoc-this-string-valid-engine): ? ends valid sentence. 9643 (checkdoc-this-string-valid-engine): ? ends valid sentence.
9644 (checkdoc-proper-noun-region-engine): Exclude items in URLs 9644 (checkdoc-proper-noun-region-engine): Exclude items in URLs
9645 9645
diff --git a/lisp/ChangeLog.9 b/lisp/ChangeLog.9
index d008640cbe3..39cfea5669b 100644
--- a/lisp/ChangeLog.9
+++ b/lisp/ChangeLog.9
@@ -242,8 +242,8 @@
242 (cperl-find-pods-heres): Could access `font-lock-comment-face' in -nw. 242 (cperl-find-pods-heres): Could access `font-lock-comment-face' in -nw.
243 No -nw-compile time warnings now. 243 No -nw-compile time warnings now.
244 (cperl-find-tags): TAGS file had too short substring-to-search. 244 (cperl-find-tags): TAGS file had too short substring-to-search.
245 Be less verbose in non-interactive mode 245 Be less verbose in non-interactive mode.
246 (imenu-example--create-perl-index): Set index-marker after name 246 (imenu-example--create-perl-index): Set index-marker after name.
247 (cperl-outline-regexp): New variable. 247 (cperl-outline-regexp): New variable.
248 (cperl-outline-level): Made compatible with `cperl-outline-regexp'. 248 (cperl-outline-level): Made compatible with `cperl-outline-regexp'.
249 (cperl-mode): Made use `cperl-outline-regexp'. 249 (cperl-mode): Made use `cperl-outline-regexp'.
@@ -479,7 +479,7 @@
479 (help-setup-xref, help-xref-following, help-make-xrefs) 479 (help-setup-xref, help-xref-following, help-make-xrefs)
480 (help-xref-button, help-insert-xref-button, help-xref-interned) 480 (help-xref-button, help-insert-xref-button, help-xref-interned)
481 (help-xref-go-back, help-go-back, help-do-xref, help-follow) 481 (help-xref-go-back, help-go-back, help-do-xref, help-follow)
482 (help-xref-on-pp): Functions moved into `help-mode.el' 482 (help-xref-on-pp): Functions moved into `help-mode.el'.
483 (help-mode-map, help-xref-stack, help-xref-stack-item) 483 (help-mode-map, help-xref-stack, help-xref-stack-item)
484 (help-highlight-p, help-highlight-face, help-back-label) 484 (help-highlight-p, help-highlight-face, help-back-label)
485 (help-xref-symbol-regexp, help-xref-mule-regexp) 485 (help-xref-symbol-regexp, help-xref-mule-regexp)
@@ -1188,7 +1188,7 @@
11882001-09-07 Eli Zaretskii <eliz@is.elta.co.il> 11882001-09-07 Eli Zaretskii <eliz@is.elta.co.il>
1189 1189
1190 * textmodes/ispell.el (ispell-dictionary-alist-4): Add "german" 1190 * textmodes/ispell.el (ispell-dictionary-alist-4): Add "german"
1191 and "german8", for the new German orthography dictionaries, 1191 and "german8", for the new German orthography dictionaries.
1192 (ispell-dictionary-alist-5, ispell-dictionary-alist-6): Rearrange 1192 (ispell-dictionary-alist-5, ispell-dictionary-alist-6): Rearrange
1193 the entries, to keep the line length balanced for loaddefs.el. 1193 the entries, to keep the line length balanced for loaddefs.el.
1194 1194
@@ -2072,7 +2072,7 @@
2072 2072
2073 * ediff-init.el (ediff-with-syntax-table): New macro, uses 2073 * ediff-init.el (ediff-with-syntax-table): New macro, uses
2074 with-syntax-table. 2074 with-syntax-table.
2075 (ediff-coding-system-for-read): From ediff-diff.el 2075 (ediff-coding-system-for-read): From ediff-diff.el.
2076 (ediff-coding-system-for-write): New variable. 2076 (ediff-coding-system-for-write): New variable.
2077 (ediff-highest-priority): Fixed the bug having to do with disappearing 2077 (ediff-highest-priority): Fixed the bug having to do with disappearing
2078 overlays. 2078 overlays.
@@ -6812,7 +6812,7 @@
6812 to nil. 6812 to nil.
6813 6813
6814 * tooltip.el (tooltip-frame-parameters): Remove colors. 6814 * tooltip.el (tooltip-frame-parameters): Remove colors.
6815 (tooltip): New face 6815 (tooltip): New face.
6816 (tooltip-set-param): New function. 6816 (tooltip-set-param): New function.
6817 (tooltip-show): Set up color frame parameters from face `tooltip'. 6817 (tooltip-show): Set up color frame parameters from face `tooltip'.
6818 Display the tooltip text in face `tooltip'. 6818 Display the tooltip text in face `tooltip'.
@@ -8804,7 +8804,7 @@
8804 8804
88052000-11-12 Dave Love <fx@gnu.org> 88052000-11-12 Dave Love <fx@gnu.org>
8806 8806
8807 * mail/feedmail.el: Fix header, 8807 * mail/feedmail.el: Fix header.
8808 (feedmail) <defgroup>: Add :link. 8808 (feedmail) <defgroup>: Add :link.
8809 8809
8810 * view.el: Use local-map property, not keymap on mode-line string. 8810 * view.el: Use local-map property, not keymap on mode-line string.
@@ -10715,7 +10715,7 @@
10715 * iswitchb.el (iswitchb-mode): Add :require. 10715 * iswitchb.el (iswitchb-mode): Add :require.
10716 10716
10717 * info.el (Info-goto-node, Info-menu): Doc fix. 10717 * info.el (Info-goto-node, Info-menu): Doc fix.
10718 (Info-mode-menu): Bind beginning-of-buffer, Info-edit 10718 (Info-mode-menu): Bind beginning-of-buffer, Info-edit.
10719 (info-tool-bar-map): New variable. 10719 (info-tool-bar-map): New variable.
10720 (Info-mode): Use it. 10720 (Info-mode): Use it.
10721 (Info-edit-map): Define all in defvar. 10721 (Info-edit-map): Define all in defvar.
@@ -11010,7 +11010,7 @@
11010 11010
11011 * net/net-utils.el (nslookup-font-lock-keywords) 11011 * net/net-utils.el (nslookup-font-lock-keywords)
11012 (ftp-font-lock-keywords, smbclient-font-lock-keywords): 11012 (ftp-font-lock-keywords, smbclient-font-lock-keywords):
11013 Only set if window-system is non-nil 11013 Only set if window-system is non-nil.
11014 (net-utils-run-program): Returns buffer. 11014 (net-utils-run-program): Returns buffer.
11015 (network-connection-reconnect): Added this function. 11015 (network-connection-reconnect): Added this function.
11016 11016
@@ -11025,13 +11025,13 @@
11025 (generic-mode-alist): Renamed to generic-mode-list. 11025 (generic-mode-alist): Renamed to generic-mode-list.
11026 (generic-find-file-regexp): Default changed to "^#". 11026 (generic-find-file-regexp): Default changed to "^#".
11027 (generic-read-type): Uses completing read on generic-mode-list. 11027 (generic-read-type): Uses completing read on generic-mode-list.
11028 (generic-mode-sanity-check): removed this function. 11028 (generic-mode-sanity-check): Removed this function.
11029 (generic-add-to-auto-mode): Removed this function 11029 (generic-add-to-auto-mode): Removed this function.
11030 (generic-mode-internal): Bind mode-specific definitions 11030 (generic-mode-internal): Bind mode-specific definitions
11031 into function instead of putting them in alist. 11031 into function instead of putting them in alist.
11032 (generic-mode-set-comments): Reworked extensively. 11032 (generic-mode-set-comments): Reworked extensively.
11033 (generic-mode-find-file-hook): Simplified regexp searching 11033 (generic-mode-find-file-hook): Simplified regexp searching.
11034 (generic-make-keywords-list): Omit extra pair of parens 11034 (generic-make-keywords-list): Omit extra pair of parens.
11035 11035
11036 * find-lisp.el (find-lisp-find-files-internal): 11036 * find-lisp.el (find-lisp-find-files-internal):
11037 Make sure directory name ends with "/". 11037 Make sure directory name ends with "/".
@@ -11040,7 +11040,7 @@
11040 Regexp now allows leading whitespace. 11040 Regexp now allows leading whitespace.
11041 (rc-generic-mode): Added eval-when-compile 11041 (rc-generic-mode): Added eval-when-compile
11042 around generic-make-keywords-list. 11042 around generic-make-keywords-list.
11043 Deleted duplicate regexp 11043 Deleted duplicate regexp.
11044 (rul-generic-mode): Added eval-when-compile 11044 (rul-generic-mode): Added eval-when-compile
11045 around generic-make-keywords-list. 11045 around generic-make-keywords-list.
11046 (etc-fstab-generic-mode): New generic mode. 11046 (etc-fstab-generic-mode): New generic mode.
@@ -11356,7 +11356,7 @@
11356 (comint-insert-clicked-input): Be more careful to find the overlay. 11356 (comint-insert-clicked-input): Be more careful to find the overlay.
11357 Use this-command-keys rather than hardcoding mouse-2. 11357 Use this-command-keys rather than hardcoding mouse-2.
11358 11358
11359 * font-lock.el: Replace confusing (,@ with , 11359 * font-lock.el: Replace confusing (,@ with ,.
11360 (tex-font-lock-keywords-1, tex-font-lock-keywords-2): 11360 (tex-font-lock-keywords-1, tex-font-lock-keywords-2):
11361 Don't use regexp-opt-depth. Spice up the regexp for args. 11361 Don't use regexp-opt-depth. Spice up the regexp for args.
11362 Don't distinguish between cmds that can take an opt arg or not. 11362 Don't distinguish between cmds that can take an opt arg or not.
@@ -11885,7 +11885,7 @@
11885 New functions, used instead of non-`strokes-' versions.. 11885 New functions, used instead of non-`strokes-' versions..
11886 (strokes-mouse-event-p): Rewritten. 11886 (strokes-mouse-event-p): Rewritten.
11887 (strokes-event-closest-point): Avoid event-point. 11887 (strokes-event-closest-point): Avoid event-point.
11888 (strokes-get-grid-position): Avoid cdadr, caadr 11888 (strokes-get-grid-position): Avoid cdadr, caadr.
11889 (strokes-read-stroke, strokes-read-complex-stroke): Avoid levents 11889 (strokes-read-stroke, strokes-read-complex-stroke): Avoid levents
11890 functions. 11890 functions.
11891 (strokes-help): Use with-output-to-temp-buffer. 11891 (strokes-help): Use with-output-to-temp-buffer.
@@ -14110,14 +14110,14 @@
14110 * locate.el (locate): Cleaned up locate command's interactive prompting 14110 * locate.el (locate): Cleaned up locate command's interactive prompting
14111 Thanks to François_Pinard <pinard@iro.umontreal.ca> for suggestions. 14111 Thanks to François_Pinard <pinard@iro.umontreal.ca> for suggestions.
14112 14112
14113 * filecache.el (file-cache-case-fold-search): New variable 14113 * filecache.el (file-cache-case-fold-search): New variable.
14114 (file-cache-assoc-function): New variable 14114 (file-cache-assoc-function): New variable.
14115 (file-cache-minibuffer-complete): Use file-cache-assoc-function. 14115 (file-cache-minibuffer-complete): Use file-cache-assoc-function.
14116 Use file-cache-case-fold-search variable 14116 Use file-cache-case-fold-search variable.
14117 (file-cache-add-file): Use file-cache-assoc-function 14117 (file-cache-add-file): Use file-cache-assoc-function.
14118 (file-cache-delete-file): likewise 14118 (file-cache-delete-file): Likewise.
14119 (file-cache-directory-name): likewise 14119 (file-cache-directory-name): Likewise.
14120 (file-cache-debug-read-from-minibuffer): likewise 14120 (file-cache-debug-read-from-minibuffer): Likewise.
14121 14121
141222000-08-28 Gerd Moellmann <gerd@gnu.org> 141222000-08-28 Gerd Moellmann <gerd@gnu.org>
14123 14123
@@ -14191,12 +14191,12 @@
14191 14191
14192 * international/ja-dic-cnv.el: Renamed from skkdic-cnv.el. 14192 * international/ja-dic-cnv.el: Renamed from skkdic-cnv.el.
14193 Provide ja-dic-cnv instead of skkdic-cnv. 14193 Provide ja-dic-cnv instead of skkdic-cnv.
14194 (ja-dic-filename): Renamed from skkdic-filename. Referers changed 14194 (ja-dic-filename): Renamed from skkdic-filename. Referers changed.
14195 (iso-2022-7bit-short): Add safe-charsets property. 14195 (iso-2022-7bit-short): Add safe-charsets property.
14196 (skkdic-convert-postfix): Search Japanese chou-on character in 14196 (skkdic-convert-postfix): Search Japanese chou-on character in
14197 addition to Hiragana character. 14197 addition to Hiragana character.
14198 (skkdic-convert-prefix, skkdic-collect-okuri-nasi): Likewise. 14198 (skkdic-convert-prefix, skkdic-collect-okuri-nasi): Likewise.
14199 (skkdic-convert): Change file names from skkdic.el to ja-dic.el 14199 (skkdic-convert): Change file names from skkdic.el to ja-dic.el.
14200 (batch-skkdic-convert): Likewise. 14200 (batch-skkdic-convert): Likewise.
14201 14201
14202 * international/ja-dic-utl.el: Renamed from skkdic-utl.el. 14202 * international/ja-dic-utl.el: Renamed from skkdic-utl.el.
@@ -14389,12 +14389,12 @@
14389 (ispell-dictionary-alist-4): Fixed regexp in francais-tex 14389 (ispell-dictionary-alist-4): Fixed regexp in francais-tex
14390 dictionary, added italiano dictionary. 14390 dictionary, added italiano dictionary.
14391 (ispell-skip-region-alist): Removed regexp thrashing when `-' is a 14391 (ispell-skip-region-alist): Removed regexp thrashing when `-' is a
14392 word character 14392 word character.
14393 (ispell-tex-skip-alists): Added psfig support. 14393 (ispell-tex-skip-alists): Added psfig support.
14394 (ispell-skip-html): Renamed from ispell-skip-sgml. 14394 (ispell-skip-html): Renamed from ispell-skip-sgml.
14395 (ispell-begin-skip-region-regexp, ispell-skip-region) 14395 (ispell-begin-skip-region-regexp, ispell-skip-region)
14396 (ispell-minor-check): Improved html skipping support to skip across 14396 (ispell-minor-check): Improved html skipping support to skip across
14397 code, and recognize `&' commands without proper `;' syntax; 14397 code, and recognize `&' commands without proper `;' syntax.
14398 (ispell-process-line): Fix alignment error when manually 14398 (ispell-process-line): Fix alignment error when manually
14399 correcting spelling. 14399 correcting spelling.
14400 (ispell): Fix comment string. 14400 (ispell): Fix comment string.
@@ -14515,7 +14515,7 @@
14515 (goto-address-url-face, goto-address-url-mouse-face) 14515 (goto-address-url-face, goto-address-url-mouse-face)
14516 (goto-address-mail-face, goto-address-mail-mouse-face): Doc fix. 14516 (goto-address-mail-face, goto-address-mail-mouse-face): Doc fix.
14517 (goto-address-url-regexp): Use thing-at-point-url-regexp. 14517 (goto-address-url-regexp): Use thing-at-point-url-regexp.
14518 (goto-address-fontify, goto-address-at-mouse): Simplify, 14518 (goto-address-fontify, goto-address-at-mouse): Simplify.
14519 (goto-address-at-point): browse-url-url-at-point, 14519 (goto-address-at-point): browse-url-url-at-point,
14520 goto-address-find-address-at-point can return nil. 14520 goto-address-find-address-at-point can return nil.
14521 (goto-address-find-address-at-point): Return nil on failure. 14521 (goto-address-find-address-at-point): Return nil on failure.
@@ -15501,23 +15501,23 @@
15501 ada-xref.el before ada-prj.el, so that the Project menu is created 15501 ada-xref.el before ada-prj.el, so that the Project menu is created
15502 when ada-prj tries to add to it. 15502 when ada-prj tries to add to it.
15503 (ada-activate-keys-for-case): Suppress the characters that are not 15503 (ada-activate-keys-for-case): Suppress the characters that are not
15504 part of the Ada syntax. Better compatibility with else-mode 15504 part of the Ada syntax. Better compatibility with else-mode.
15505 (ada-adjust-case-interactive): When auto-casing is not active, 15505 (ada-adjust-case-interactive): When auto-casing is not active,
15506 correctly insert newlines (used to insert only ^M). Prevent the 15506 correctly insert newlines (used to insert only ^M). Prevent the
15507 syntax table from being changed in case of an error 15507 syntax table from being changed in case of an error
15508 (or '_' becomes part of a word and some commands are confused). 15508 (or '_' becomes part of a word and some commands are confused).
15509 Do nothing if ada-auto-case is nil. 15509 Do nothing if ada-auto-case is nil.
15510 (ada-after-keyword-p): Ignore keywords that are also attributes 15510 (ada-after-keyword-p): Ignore keywords that are also attributes.
15511 (ada-batch-reformat): Update usage comment 15511 (ada-batch-reformat): Update usage comment.
15512 (ada-call-from-contextual-menu): New function 15512 (ada-call-from-contextual-menu): New function.
15513 (ada-case-read-exceptions): Reinitialize the casing exception list 15513 (ada-case-read-exceptions): Reinitialize the casing exception list
15514 first to nil first, so that the casing exception file can be 15514 first to nil first, so that the casing exception file can be
15515 shared. 15515 shared.
15516 (ada-check-defun-name): Handles "configure" keyword for gnatdist 15516 (ada-check-defun-name): Handles "configure" keyword for gnatdist
15517 files. 15517 files.
15518 (ada-compile-goto-error): Fix regexp used to detect a file:line 15518 (ada-compile-goto-error): Fix regexp used to detect a file:line
15519 anywhere in the error message 15519 anywhere in the error message.
15520 (ada-contextual-menu-last-point): New variable 15520 (ada-contextual-menu-last-point): New variable.
15521 (ada-create-keymap): If the variable delete-key-deletes-forward is 15521 (ada-create-keymap): If the variable delete-key-deletes-forward is
15522 t on XEmacs, it means that DEL should delete one character 15522 t on XEmacs, it means that DEL should delete one character
15523 forward. 15523 forward.
@@ -15544,21 +15544,21 @@
15544 are not in fact seeing "end if". Ignore "when" statements except 15544 are not in fact seeing "end if". Ignore "when" statements except
15545 when initial keyword was "begin". Fix handling of nested 15545 when initial keyword was "begin". Fix handling of nested
15546 procedures. Add a recursive call to this function to skip over 15546 procedures. Add a recursive call to this function to skip over
15547 other 'end' statmts. Fix indentation for "when .. => begin" 15547 other 'end' statmts. Fix indentation for "when .. => begin".
15548 (ada-in-open-paren-p): Fix indentation for complex boolean 15548 (ada-in-open-paren-p): Fix indentation for complex boolean
15549 expressions, where 'and then', 'or else' and parenthesis 15549 expressions, where 'and then', 'or else' and parenthesis
15550 statements are mixed up. 15550 statements are mixed up.
15551 (ada-in-paramlist-p): Skip comments while searching for the 15551 (ada-in-paramlist-p): Skip comments while searching for the
15552 beginning Fix handling of operator declarations. 15552 beginning Fix handling of operator declarations.
15553 (ada-indent-align-comments): New variable 15553 (ada-indent-align-comments): New variable.
15554 (ada-indent-current): Change the syntax table only in the 15554 (ada-indent-current): Change the syntax table only in the
15555 protected section, so that we are sure it is restored correctly. 15555 protected section, so that we are sure it is restored correctly.
15556 (ada-indent-on-previous-lines): Use ada-use-indent and 15556 (ada-indent-on-previous-lines): Use ada-use-indent and
15557 ada-with-indent Correctly indent "select ... then" 15557 ada-with-indent. Correctly indent "select ... then".
15558 (ada-indent-region): Slight speedup. 15558 (ada-indent-region): Slight speedup.
15559 (ada-indent-renames): New variable. 15559 (ada-indent-renames): New variable.
15560 (ada-last-which-function-subprog, ada-last-which-function-line): 15560 (ada-last-which-function-subprog, ada-last-which-function-line):
15561 New variables 15561 New variables.
15562 (ada-looking-at-semi-private): Correctly indent the 'private' 15562 (ada-looking-at-semi-private): Correctly indent the 'private'
15563 keyword when it is the first word in a package declaration. 15563 keyword when it is the first word in a package declaration.
15564 (ada-loose-case-word): Stop searching if at the end of the buffer. 15564 (ada-loose-case-word): Stop searching if at the end of the buffer.
@@ -15568,8 +15568,8 @@
15568 (ada-mode): Add support for abbrev-mode, outline-mode and 15568 (ada-mode): Add support for abbrev-mode, outline-mode and
15569 which-func-mode Override the old find-file.el entry in 15569 which-func-mode Override the old find-file.el entry in
15570 ff-special-constructs since it is using the obsolete 15570 ff-special-constructs since it is using the obsolete
15571 ada-spec-suffix variable 15571 ada-spec-suffix variable.
15572 (ada-no-auto-case): New function 15572 (ada-no-auto-case): New function.
15573 (ada-scan-paramlist): When parsing the argument type, accept 15573 (ada-scan-paramlist): When parsing the argument type, accept
15574 spaces (as in "X 'Class", generated by Rational Rose). 15574 spaces (as in "X 'Class", generated by Rational Rose).
15575 (ada-other-file-name): No longer loads the other file. 15575 (ada-other-file-name): No longer loads the other file.
@@ -15578,41 +15578,41 @@
15578 (ada-search-ignore-complex-boolean): New function. 15578 (ada-search-ignore-complex-boolean): New function.
15579 (ada-uncomment-region): Emacs21 already knows how to delete 15579 (ada-uncomment-region): Emacs21 already knows how to delete
15580 comments not starting in the first column. 15580 comments not starting in the first column.
15581 (ada-use-indent): New variable 15581 (ada-use-indent): New variable.
15582 (ada-which-function): New function. 15582 (ada-which-function): New function.
15583 (ada-with-indent): New variable 15583 (ada-with-indent): New variable.
15584 (ada-xemacs): evaluate it at compile time too, so that ada-mode.el 15584 (ada-xemacs): Evaluate it at compile time too, so that ada-mode.el
15585 can be batch-compiled from the command line. 15585 can be batch-compiled from the command line.
15586 15586
15587 * ada-xref.el: Got rid of all byte-compiler warnings on Emacs. 15587 * ada-xref.el: Got rid of all byte-compiler warnings on Emacs.
15588 Add to the menu when the file is loaded, not in ada-mode-hook. 15588 Add to the menu when the file is loaded, not in ada-mode-hook.
15589 Add -toolbar to the default ddd command Switches moved from 15589 Add -toolbar to the default ddd command Switches moved from
15590 ada-prj-default-comp-cmd and ada-prj-default-make-cmd to 15590 ada-prj-default-comp-cmd and ada-prj-default-make-cmd to
15591 ada-prj-default-comp-opt 15591 ada-prj-default-comp-opt.
15592 (ada-add-ada-menu): Remove the map and name parameters Add the Ada 15592 (ada-add-ada-menu): Remove the map and name parameters. Add the Ada
15593 Reference Manual to the menu 15593 Reference Manual to the menu.
15594 (ada-check-current): rewritten as a call to ada-compile-current 15594 (ada-check-current): Rewritten as a call to ada-compile-current.
15595 (ada-compile): Removed. 15595 (ada-compile): Removed.
15596 (ada-compile-application, ada-compile-current, ada-check-current): 15596 (ada-compile-application, ada-compile-current, ada-check-current):
15597 Set the compilation-search-path so that compile.el automatically 15597 Set the compilation-search-path so that compile.el automatically
15598 finds the sources in src_dir. Automatic scrolling of the 15598 finds the sources in src_dir. Automatic scrolling of the
15599 compilation buffer. C-uC-cC-c asks for confirmation before 15599 compilation buffer. C-uC-cC-c asks for confirmation before
15600 compiling 15600 compiling.
15601 (ada-compile-current): New parameter, prj-field 15601 (ada-compile-current): New parameter, prj-field.
15602 (ada-complete-identifier): Load the .ali file before doing 15602 (ada-complete-identifier): Load the .ali file before doing
15603 processing 15603 processing.
15604 (ada-find-ali-file-in-dir): prepend build_dir to obj_dir to 15604 (ada-find-ali-file-in-dir): prepend build_dir to obj_dir to
15605 conform to gnatmake's behavior. 15605 conform to gnatmake's behavior.
15606 (ada-find-file-in-dir): New function 15606 (ada-find-file-in-dir): New function.
15607 (ada-find-references): Set the environment variables for gnatfind 15607 (ada-find-references): Set the environment variables for gnatfind.
15608 (ada-find-src-file-in-dir): New function. 15608 (ada-find-src-file-in-dir): New function.
15609 (ada-first-non-nil): Removed 15609 (ada-first-non-nil): Removed.
15610 (ada-gdb-application): Add support for jdb, the java debugger. 15610 (ada-gdb-application): Add support for jdb, the java debugger.
15611 (ada-get-ada-file-name): Load the original-file first if not done 15611 (ada-get-ada-file-name): Load the original-file first if not done
15612 yet. 15612 yet.
15613 (ada-get-all-references): Handles the new ali syntax (parent types 15613 (ada-get-all-references): Handles the new ali syntax (parent types
15614 are found between <>). 15614 are found between <>).
15615 (ada-initialize-runtime-library): New function 15615 (ada-initialize-runtime-library): New function.
15616 (ada-mode-hook): Always load a project file when a file is opened, 15616 (ada-mode-hook): Always load a project file when a file is opened,
15617 so that the casing exceptions are correctly read. 15617 so that the casing exceptions are correctly read.
15618 (ada-operator-re): Add all missing operators ("abs", "rem", "**"). 15618 (ada-operator-re): Add all missing operators ("abs", "rem", "**").
@@ -15623,36 +15623,36 @@
15623 src_dir to initialize ada-search-directories and 15623 src_dir to initialize ada-search-directories and
15624 compilation-search-path,... Add the standard runtime library to 15624 compilation-search-path,... Add the standard runtime library to
15625 the search path for find-file. 15625 the search path for find-file.
15626 (ada-prj-default-debugger): Was missing an opening '{' 15626 (ada-prj-default-debugger): Was missing an opening '{'.
15627 (ada-prj-default-bind-opt, ada-prj-default-link-opt): New 15627 (ada-prj-default-bind-opt, ada-prj-default-link-opt): New
15628 variables. 15628 variables.
15629 (ada-prj-default-gnatmake-opt): New variable 15629 (ada-prj-default-gnatmake-opt): New variable.
15630 (ada-prj-find-prj-file): Handles non-file buffers For non-Ada 15630 (ada-prj-find-prj-file): Handles non-file buffers For non-Ada
15631 buffers, the project file is the default one Save the windows 15631 buffers, the project file is the default one Save the windows
15632 configuration before displaying the menu. 15632 configuration before displaying the menu.
15633 (ada-prj-src-dir, ada-prj-obj-dir, ada-prj-comp-opt,...): Removed 15633 (ada-prj-src-dir, ada-prj-obj-dir, ada-prj-comp-opt,...): Removed.
15634 (ada-read-identifier): Fix xrefs on operators (for "mod", "and", 15634 (ada-read-identifier): Fix xrefs on operators (for "mod", "and",
15635 ...) regexp-quote identifiers names to support operators +, 15635 ...) regexp-quote identifiers names to support operators +,
15636 -,... in regexps. 15636 -,... in regexps.
15637 (ada-remote): New function. 15637 (ada-remote): New function.
15638 (ada-run-application): Erase the output buffer before starting the 15638 (ada-run-application): Erase the output buffer before starting the
15639 run Support remote execution of the application. Use 15639 run Support remote execution of the application. Use
15640 call-process, or the arguments are incorrectly parsed 15640 call-process, or the arguments are incorrectly parsed.
15641 (ada-set-default-project-file): Reread the content of the active 15641 (ada-set-default-project-file): Reread the content of the active
15642 project file, not the one from the current buffer When a project 15642 project file, not the one from the current buffer When a project
15643 file is set as the default project, all directories are 15643 file is set as the default project, all directories are
15644 automatically associated with it. 15644 automatically associated with it.
15645 (ada-set-environment): New function 15645 (ada-set-environment): New function.
15646 (ada-treat-cmd-string): New special variable ${current} 15646 (ada-treat-cmd-string): New special variable ${current}.
15647 (ada-treat-cmd-string): Revised. The substitution is now done for 15647 (ada-treat-cmd-string): Revised. The substitution is now done for
15648 any ${...} substring 15648 any ${...} substring.
15649 (ada-xref-current): If no body was found, compiles the spec 15649 (ada-xref-current): If no body was found, compiles the spec
15650 instead. Setup ADA_{SOURCE,OBJECTS}_PATH before running the 15650 instead. Setup ADA_{SOURCE,OBJECTS}_PATH before running the
15651 compiler to get rid of command line length limitations. 15651 compiler to get rid of command line length limitations.
15652 (ada-xref-get-project-field): New function 15652 (ada-xref-get-project-field): New function.
15653 (ada-xref-project-files): New variable 15653 (ada-xref-project-files): New variable.
15654 (ada-xref-runtime-library-specs-path) 15654 (ada-xref-runtime-library-specs-path)
15655 (ada-xref-runtime-library-ali-path): New variables 15655 (ada-xref-runtime-library-ali-path): New variables.
15656 (ada-xref-set-default-prj-values): Default run command now does a 15656 (ada-xref-set-default-prj-values): Default run command now does a
15657 cd to the build directory. New field: main_unit Provide a default 15657 cd to the build directory. New field: main_unit Provide a default
15658 file name even if the current buffer has no prj file. 15658 file name even if the current buffer has no prj file.
@@ -15661,10 +15661,10 @@
15661 Rewritten to show a tabbed-dialog. 15661 Rewritten to show a tabbed-dialog.
15662 (ada-prj-add-ada-menu): Remove the map and name parameters. 15662 (ada-prj-add-ada-menu): Remove the map and name parameters.
15663 (ada-prj-display-page, ada-prj-field, ada-prj-initialize-values): 15663 (ada-prj-display-page, ada-prj-field, ada-prj-initialize-values):
15664 New function 15664 New function.
15665 (ada-prj-load-directory, ada-prj-subdirs-of): New functions 15665 (ada-prj-load-directory, ada-prj-subdirs-of): New functions.
15666 (ada-prj-load-from-file): New function 15666 (ada-prj-load-from-file): New function.
15667 (ada-prj-save): Always save fields that depend on the current buffer 15667 (ada-prj-save): Always save fields that depend on the current buffer.
15668 (ada-prj-show-value): New function 15668 (ada-prj-show-value): New function
15669 15669
15670 * ada-stmt.el (ada-stmt-add-to-ada-menu): Hide the menu if not in 15670 * ada-stmt.el (ada-stmt-add-to-ada-menu): Hide the menu if not in
@@ -16918,7 +16918,7 @@
16918 (cyrillic-koi8-r-encode-table): Define it as a translation table 16918 (cyrillic-koi8-r-encode-table): Define it as a translation table
16919 made from the reverse map of above. 16919 made from the reverse map of above.
16920 (ccl-decode-koi8): Use translate-character. 16920 (ccl-decode-koi8): Use translate-character.
16921 (ccl-encode-koi8, ccl-encode-koi8-font): Likewize 16921 (ccl-encode-koi8, ccl-encode-koi8-font): Likewise.
16922 (cyrillic-alternativnyj-nonascii-translation-table): Define it as 16922 (cyrillic-alternativnyj-nonascii-translation-table): Define it as
16923 a translation table made from cyrillic-alternativnyj-decode-table. 16923 a translation table made from cyrillic-alternativnyj-decode-table.
16924 (cyrillic-alternativnyj-encode-table): Define it as a translation 16924 (cyrillic-alternativnyj-encode-table): Define it as a translation
@@ -17470,14 +17470,14 @@
17470 17470
17471 * speedbar.el (speedbar-easymenu-definition-base): Image toggle fix. 17471 * speedbar.el (speedbar-easymenu-definition-base): Image toggle fix.
17472 (speedbar-insert-button): Invisible text property fix. 17472 (speedbar-insert-button): Invisible text property fix.
17473 (speedbar-directory-plus): Renamed from speedbar-directory-+ 17473 (speedbar-directory-plus): Renamed from speedbar-directory-+.
17474 (speedbar-directory-minus): Renamed from speedbar-directory-- 17474 (speedbar-directory-minus): Renamed from speedbar-directory--.
17475 (speedbar-page-plus): Renamed from speedbar-file-+ 17475 (speedbar-page-plus): Renamed from speedbar-file-+.
17476 (speedbar-page-minus): Renamed from speedbar-file-- 17476 (speedbar-page-minus): Renamed from speedbar-file--.
17477 (speedbar-page): Renamed from speedbar-file- 17477 (speedbar-page): Renamed from speedbar-file-.
17478 (speedbar-tag): Renamed from speedbar-tag- 17478 (speedbar-tag): Renamed from speedbar-tag-.
17479 (speedbar-tag-plus): Renamed from speedbar-tag-+ 17479 (speedbar-tag-plus): Renamed from speedbar-tag-+.
17480 (speedbar-tag-minus): Renamed from speedbar-tag-- 17480 (speedbar-tag-minus): Renamed from speedbar-tag--.
17481 (speedbar-expand-image-button-alist): Use above renames. 17481 (speedbar-expand-image-button-alist): Use above renames.
17482 17482
17483 * sb-dir-plus.xpm: Renamed from sb-dir+.xpm 17483 * sb-dir-plus.xpm: Renamed from sb-dir+.xpm
@@ -17861,7 +17861,7 @@
17861 (speedbar-visiting-tag-hook): Set new defaults. Added options. 17861 (speedbar-visiting-tag-hook): Set new defaults. Added options.
17862 (speedbar-reconfigure-keymaps-hook): New variable. 17862 (speedbar-reconfigure-keymaps-hook): New variable.
17863 (speedbar-frame-parameters): Updated documentation. 17863 (speedbar-frame-parameters): Updated documentation.
17864 (speedbar-use-imenu-flag): Updated custom tag 17864 (speedbar-use-imenu-flag): Updated custom tag.
17865 (speedbar-dynamic-tags-function-list): New variable. 17865 (speedbar-dynamic-tags-function-list): New variable.
17866 (speedbar-tag-hierarchy-method): Updated doc & custom. 17866 (speedbar-tag-hierarchy-method): Updated doc & custom.
17867 (speedbar-indentation-width, speedbar-indentation-width) New 17867 (speedbar-indentation-width, speedbar-indentation-width) New
@@ -17877,7 +17877,7 @@
17877 `force-mode-line-update'. 17877 `force-mode-line-update'.
17878 (speedbar-mode, speedbar-quick-mouse, speedbar-click) 17878 (speedbar-mode, speedbar-quick-mouse, speedbar-click)
17879 (speedbar-double-click): Use `speedbar-mouse-set-point' instead of 17879 (speedbar-double-click): Use `speedbar-mouse-set-point' instead of
17880 `mouse-set-point' 17880 `mouse-set-point'.
17881 (speedbar-reconfigure-keymaps): Run configure keymap hooks. 17881 (speedbar-reconfigure-keymaps): Run configure keymap hooks.
17882 (speedbar-item-info-tag-helper): Revamped to handle a wider range 17882 (speedbar-item-info-tag-helper): Revamped to handle a wider range
17883 of arbitrary text, and new helper functions. 17883 of arbitrary text, and new helper functions.
@@ -17893,11 +17893,11 @@
17893 (speedbar-apply-one-tag-hierarchy-method): Deleted (and replaced). 17893 (speedbar-apply-one-tag-hierarchy-method): Deleted (and replaced).
17894 (speedbar-sort-tag-hierarchy, speedbar-prefix-group-tag-hierarchy) 17894 (speedbar-sort-tag-hierarchy, speedbar-prefix-group-tag-hierarchy)
17895 (speedbar-trim-words-tag-hierarchy) 17895 (speedbar-trim-words-tag-hierarchy)
17896 (speedbar-simple-group-tag-hierarchy): New functions 17896 (speedbar-simple-group-tag-hierarchy): New functions.
17897 (speedbar-create-tag-hierarchy): Update doc, use new tag hooks. 17897 (speedbar-create-tag-hierarchy): Update doc, use new tag hooks.
17898 (speedbar-insert-imenu-list, speedbar-insert-etags-list): New 17898 (speedbar-insert-imenu-list, speedbar-insert-etags-list): New
17899 functions. 17899 functions.
17900 (speedbar-mouse-set-point): New function 17900 (speedbar-mouse-set-point): New function.
17901 (speedbar-power-click): Updated documentation. 17901 (speedbar-power-click): Updated documentation.
17902 (speedbar-line-token, speedbar-goto-this-file): Handle more types 17902 (speedbar-line-token, speedbar-goto-this-file): Handle more types
17903 of tag prefix text. 17903 of tag prefix text.
@@ -17916,7 +17916,7 @@
17916 "Revert Buffer" menu items. 17916 "Revert Buffer" menu items.
17917 (speedbar-buffer-buttons-engine): Be smarter when creating a 17917 (speedbar-buffer-buttons-engine): Be smarter when creating a
17918 filename tag (for expansion purposes.). 17918 filename tag (for expansion purposes.).
17919 (speedbar-highlight-one-tag-line, 17919 (speedbar-highlight-one-tag-line)
17920 (speedbar-unhighlight-one-tag-line, speedbar-recenter-to-top) 17920 (speedbar-unhighlight-one-tag-line, speedbar-recenter-to-top)
17921 (speedbar-recenter): New functions. 17921 (speedbar-recenter): New functions.
17922 (defimage-speedbar): Image loading abstraction. 17922 (defimage-speedbar): Image loading abstraction.
@@ -18748,13 +18748,13 @@
187482000-03-30 Peter Breton <pbreton@ne.mediaone.net> 187482000-03-30 Peter Breton <pbreton@ne.mediaone.net>
18749 18749
18750 * net/net-utils.el: 18750 * net/net-utils.el:
18751 (network-connection-host, network-connection-service): New variables 18751 (network-connection-host, network-connection-service): New variables.
18752 (network-connection-mode): New mode, derived from comint-mode 18752 (network-connection-mode): New mode, derived from comint-mode.
18753 (network-connection-mode-setup): New function, saves host and 18753 (network-connection-mode-setup): New function, saves host and
18754 service information in local variables. 18754 service information in local variables.
18755 18755
18756 * lisp/locate.el: 18756 * lisp/locate.el:
18757 (locate-word-at-point): Added this function 18757 (locate-word-at-point): Added this function.
18758 (locate): Default to using locate-word-at-point as input 18758 (locate): Default to using locate-word-at-point as input
18759 Run dired-mode-hook 18759 Run dired-mode-hook
18760 18760
@@ -20347,7 +20347,7 @@
20347 * simple.el (eval-expression): Don't bind debug-on-error if 20347 * simple.el (eval-expression): Don't bind debug-on-error if
20348 eval-expression-debug-on-error is nil. Detect changed 20348 eval-expression-debug-on-error is nil. Detect changed
20349 debug-on-error, and propagate new value to global binding, if 20349 debug-on-error, and propagate new value to global binding, if
20350 eval-expression-debug-on-error is non-nil, 20350 eval-expression-debug-on-error is non-nil.
20351 (eval-expression-debug-on-error): Change doc string. 20351 (eval-expression-debug-on-error): Change doc string.
20352 20352
203532000-01-11 Richard M. Stallman <rms@gnu.org> 203532000-01-11 Richard M. Stallman <rms@gnu.org>
diff --git a/lisp/epa-file.el b/lisp/epa-file.el
index 5870f23bf13..af016eb20be 100644
--- a/lisp/epa-file.el
+++ b/lisp/epa-file.el
@@ -143,11 +143,12 @@ way."
143 ;; when decryption failed (bug#6568). See the place 143 ;; when decryption failed (bug#6568). See the place
144 ;; where `find-file-not-found-functions' are called in 144 ;; where `find-file-not-found-functions' are called in
145 ;; `find-file-noselect-1'. 145 ;; `find-file-noselect-1'.
146 (make-local-variable 'epa-file-error) 146 (when (file-exists-p local-file)
147 (setq epa-file-error error) 147 (make-local-variable 'epa-file-error)
148 (add-hook 'find-file-not-found-functions 148 (setq epa-file-error error)
149 'epa-file--find-file-not-found-function 149 (add-hook 'find-file-not-found-functions
150 nil t) 150 'epa-file--find-file-not-found-function
151 nil t))
151 (signal 'file-error 152 (signal 'file-error
152 (cons "Opening input file" (cdr error))))) 153 (cons "Opening input file" (cdr error)))))
153 (make-local-variable 'epa-file-encrypt-to) 154 (make-local-variable 'epa-file-encrypt-to)
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 2a2011e8843..e2af8fcdd16 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,8 @@
12010-07-24 David Engster <dengste@eml.cc>
2
3 * mml-smime.el (mml-smime-epg-verify): Also accept the older
4 x-pkcs7-signature MIME type as signature (RFC 2311, C.1).
5
12010-07-21 Daiki Ueno <ueno@unixuser.org> 62010-07-21 Daiki Ueno <ueno@unixuser.org>
2 7
3 * mml.el (mml-parse-1): Collect "certfile" attributes in "<#secure>" 8 * mml.el (mml-parse-1): Collect "certfile" attributes in "<#secure>"
@@ -5105,7 +5110,7 @@
5105 5110
51062006-11-06 Reiner Steib <Reiner.Steib@gmx.de> 51112006-11-06 Reiner Steib <Reiner.Steib@gmx.de>
5107 5112
5108 * message.el (message-strip-subject-encoded-words): New function 5113 * message.el (message-strip-subject-encoded-words): New function.
5109 (message-simplify-subject-functions): New variable. 5114 (message-simplify-subject-functions): New variable.
5110 (message-simplify-subject): Use it. Fix typo in doc string. 5115 (message-simplify-subject): Use it. Fix typo in doc string.
5111 Support message-strip-subject-encoded-words. 5116 Support message-strip-subject-encoded-words.
@@ -5308,8 +5313,9 @@
5308 5313
53092006-09-20 Maxime Edouard Robert Froumentin <max@lapin-bleu.net> 53142006-09-20 Maxime Edouard Robert Froumentin <max@lapin-bleu.net>
5310 5315
5311 (gnus-insert-mime-button, gnus-insert-mime-security-button): Apply 5316 * gnus-art.el (gnus-insert-mime-button)
5312 gnus-article-button-face to MIME and security buttons. 5317 (gnus-insert-mime-security-button):
5318 Apply gnus-article-button-face to MIME and security buttons.
5313 5319
53142006-09-20 Reiner Steib <Reiner.Steib@gmx.de> 53202006-09-20 Reiner Steib <Reiner.Steib@gmx.de>
5315 5321
@@ -5775,7 +5781,7 @@
5775 5781
5776 * gnus-agent.el: Added gnus-agent-flush* to purge agent info. 5782 * gnus-agent.el: Added gnus-agent-flush* to purge agent info.
5777 (gnus-agent-read-agentview): Fixed handling of end-of-file error. 5783 (gnus-agent-read-agentview): Fixed handling of end-of-file error.
5778 (gnus-agent-read-local): All symbols allocated in my-obarray 5784 (gnus-agent-read-local): All symbols allocated in my-obarray.
5779 (gnus-agent-set-local): Skip invalid entries (min and/or max is nil). 5785 (gnus-agent-set-local): Skip invalid entries (min and/or max is nil).
5780 (gnus-agent-regenerate-group): Check numeric names to see if they are 5786 (gnus-agent-regenerate-group): Check numeric names to see if they are
5781 messages or groups. 5787 messages or groups.
@@ -9438,7 +9444,7 @@
9438 to get all the groups a message ID is in. 9444 to get all the groups a message ID is in.
9439 9445
9440 * spam-stat.el (spam-stat-split-fancy-spam-threshold) 9446 * spam-stat.el (spam-stat-split-fancy-spam-threshold)
9441 (spam-stat-split-fancy): Change "threshhold" to "threshold" 9447 (spam-stat-split-fancy): Change "threshhold" to "threshold".
9442 (spam-stat-score-buffer-user-functions): Add :number custom type. 9448 (spam-stat-score-buffer-user-functions): Add :number custom type.
9443 9449
94442005-04-06 Katsumi Yamaoka <yamaoka@jpl.org> 94502005-04-06 Katsumi Yamaoka <yamaoka@jpl.org>
@@ -10422,21 +10428,21 @@
10422 10428
104232004-11-14 Magnus Henoch <mange@freemail.hu> 104292004-11-14 Magnus Henoch <mange@freemail.hu>
10424 10430
10425 * hashcash.el (hashcash-default-payment): Change default to 20 10431 * hashcash.el (hashcash-default-payment): Change default to 20.
10426 (hashcash-default-accept-payment): Change default to 20 10432 (hashcash-default-accept-payment): Change default to 20.
10427 (hashcash-process-alist): New variable 10433 (hashcash-process-alist): New variable.
10428 (hashcash-generate-payment-async): Add 10434 (hashcash-generate-payment-async): Add.
10429 (hashcash-already-paid-p): Add 10435 (hashcash-already-paid-p): Add.
10430 (hashcash-insert-payment): Don't generate payments twice 10436 (hashcash-insert-payment): Don't generate payments twice.
10431 (hashcash-insert-payment-async): Add 10437 (hashcash-insert-payment-async): Add.
10432 (hashcash-insert-payment-async-2): Add 10438 (hashcash-insert-payment-async-2): Add.
10433 (hashcash-cancel-async): Add 10439 (hashcash-cancel-async): Add.
10434 (hashcash-wait-async): Add 10440 (hashcash-wait-async): Add.
10435 (hashcash-processes-running-p): Add 10441 (hashcash-processes-running-p): Add.
10436 (hashcash-wait-or-cancel): Add 10442 (hashcash-wait-or-cancel): Add.
10437 (mail-add-payment): New optional argument. Conditionally start 10443 (mail-add-payment): New optional argument. Conditionally start
10438 asynchronous calculation. 10444 asynchronous calculation.
10439 (mail-add-payment-async): Add 10445 (mail-add-payment-async): Add.
10440 10446
10441 * message.el (message-send-mail): Wait for asynchronous hashcash 10447 * message.el (message-send-mail): Wait for asynchronous hashcash
10442 results. Don't clobber existing X-Hashcash headers. 10448 results. Don't clobber existing X-Hashcash headers.
@@ -10924,7 +10930,7 @@
10924 (nnsoup-unpack-packets, nnsoup-make-active): Simplify. 10930 (nnsoup-unpack-packets, nnsoup-make-active): Simplify.
10925 10931
10926 * nnspool.el (nnspool-find-id): Use with-temp-buffer. 10932 * nnspool.el (nnspool-find-id): Use with-temp-buffer.
10927 (nnspool-sift-nov-with-sed): Use last 10933 (nnspool-sift-nov-with-sed): Use last.
10928 (nnspool-retrieve-headers-with-nov): Use mapc. 10934 (nnspool-retrieve-headers-with-nov): Use mapc.
10929 (nnspool-request-newgroups): Use dolist. 10935 (nnspool-request-newgroups): Use dolist.
10930 (nnspool-request-group): Use last. 10936 (nnspool-request-group): Use last.
@@ -11625,7 +11631,7 @@
11625 * gnus-registry.el (gnus-registry-split-fancy-with-parent): Try 11631 * gnus-registry.el (gnus-registry-split-fancy-with-parent): Try
11626 to append in-reply-to: data to the references: header. 11632 to append in-reply-to: data to the references: header.
11627 11633
11628 * netrc.el: Remove old encryption support, autoload gnus-encrypt.el 11634 * netrc.el: Remove old encryption support, autoload gnus-encrypt.el.
11629 (netrc-parse): Use gnus-encrypt.el functions. 11635 (netrc-parse): Use gnus-encrypt.el functions.
11630 11636
11631 * gnus-encrypt.el: Add new file for encryption support; currently 11637 * gnus-encrypt.el: Add new file for encryption support; currently
@@ -12122,7 +12128,7 @@
12122 12128
121232004-05-26 Adam Sjøgren <asjo@koldfront.dk> (tiny change) 121292004-05-26 Adam Sjøgren <asjo@koldfront.dk> (tiny change)
12124 12130
12125 (spam-ham-copy-or-move-routine): Don't declare `todo' twice. 12131 * spam.el (spam-ham-copy-or-move-routine): Don't declare `todo' twice.
12126 12132
121272004-05-26 Katsumi Yamaoka <yamaoka@jpl.org> 121332004-05-26 Katsumi Yamaoka <yamaoka@jpl.org>
12128 12134
@@ -12837,7 +12843,7 @@
12837 12843
12838 * gnus-group.el: Require gnus-sum and autoload functions to 12844 * gnus-group.el: Require gnus-sum and autoload functions to
12839 resolve warnings when gnus-group.el compiled alone. 12845 resolve warnings when gnus-group.el compiled alone.
12840 (gnus-group-line-format): Documented new %F 12846 (gnus-group-line-format): Documented new %F.
12841 (size of Fetched data) group line format; identifies disk space 12847 (size of Fetched data) group line format; identifies disk space
12842 used by agent and cache. 12848 used by agent and cache.
12843 (gnus-group-line-format-alist): Defined new F format. 12849 (gnus-group-line-format-alist): Defined new F format.
@@ -13614,8 +13620,8 @@
13614 is "nndraft:queue". Suggested by Gaute Strokkenes 13620 is "nndraft:queue". Suggested by Gaute Strokkenes
13615 <gs234@srcf.ucam.org> 13621 <gs234@srcf.ucam.org>
13616 13622
13617 * gnus-agent.el (agent-disable-undownloaded-faces): Removed 13623 * gnus-agent.el (agent-disable-undownloaded-faces): Removed.
13618 (agent-enable-undownloaded-faces): Added 13624 (agent-enable-undownloaded-faces): Added.
13619 (gnus-agent-cat-groups): Use eval-and-compile, not 13625 (gnus-agent-cat-groups): Use eval-and-compile, not
13620 eval-when-compile, to define gnus-agent-set-cat-groups as the setf 13626 eval-when-compile, to define gnus-agent-set-cat-groups as the setf
13621 method of gnus-agent-cat-groups even when the buffer has been 13627 method of gnus-agent-cat-groups even when the buffer has been
@@ -13640,8 +13646,8 @@
13640 active file (local makes it unnecessary). 13646 active file (local makes it unnecessary).
13641 (gnus-agent-regenerate-group): Fixed XEmacs compatibility. 13647 (gnus-agent-regenerate-group): Fixed XEmacs compatibility.
13642 13648
13643 * gnus-cus.el (agent-disable-undownloaded-faces): Removed 13649 * gnus-cus.el (agent-disable-undownloaded-faces): Removed.
13644 (agent-enable-undownloaded-faces): Added 13650 (agent-enable-undownloaded-faces): Added.
13645 13651
13646 * gnus-draft.el (gnus-draft-send): Bind gnus-agent-queue-mail to 13652 * gnus-draft.el (gnus-draft-send): Bind gnus-agent-queue-mail to
13647 disable it when sending to "nndraft:queue". 13653 disable it when sending to "nndraft:queue".
@@ -13775,7 +13781,7 @@
13775 13781
137762004-01-14 Kai Grossjohann <kai@emptydomain.de> 137822004-01-14 Kai Grossjohann <kai@emptydomain.de>
13777 13783
13778 (message-kill-to-signature): Change docstring. 13784 * message.el (message-kill-to-signature): Change docstring.
13779 13785
137802004-01-14 Katsumi Yamaoka <yamaoka@jpl.org> 137862004-01-14 Katsumi Yamaoka <yamaoka@jpl.org>
13781 13787
@@ -14194,7 +14200,7 @@
14194 14200
141952004-01-05 Reiner Steib <Reiner.Steib@gmx.de> 142012004-01-05 Reiner Steib <Reiner.Steib@gmx.de>
14196 14202
14197 * gnus-art.el (gnus-treat-ansi-sequences, 14203 * gnus-art.el (gnus-treat-ansi-sequences)
14198 (article-treat-ansi-sequences): New variable and function. 14204 (article-treat-ansi-sequences): New variable and function.
14199 Suggested by Dan Jacobson <jidanni@jidanni.org>. 14205 Suggested by Dan Jacobson <jidanni@jidanni.org>.
14200 14206
@@ -14373,7 +14379,7 @@
143732004-01-04 Mario Lang <lang@zid.tugraz.at> 143792004-01-04 Mario Lang <lang@zid.tugraz.at>
14374 14380
14375 * dns.el (dns-query-types): Fix typo. 14381 * dns.el (dns-query-types): Fix typo.
14376 (dns-query-types): New function 14382 (dns-query-types): New function.
14377 (dns-read-type): Add support for AAAA records, see RFC 3596. Parse MX, 14383 (dns-read-type): Add support for AAAA records, see RFC 3596. Parse MX,
14378 PTR and SOA replies, see RFC 1035. 14384 PTR and SOA replies, see RFC 1035.
14379 14385
diff --git a/lisp/gnus/ChangeLog.1 b/lisp/gnus/ChangeLog.1
index 795df6f95a7..520b3a4b735 100644
--- a/lisp/gnus/ChangeLog.1
+++ b/lisp/gnus/ChangeLog.1
@@ -506,10 +506,10 @@
506 506
5071998-08-13 Simon Josefsson <jas@pdc.kth.se> 5071998-08-13 Simon Josefsson <jas@pdc.kth.se>
508 508
509 * gnus-msg.el (gnus-setup-message): use message-setup-hook 509 * gnus-msg.el (gnus-setup-message): Use message-setup-hook
510 instead 510 instead.
511 (gnus-configure-posting-styles): new posting-style 'body 511 (gnus-configure-posting-styles): New posting-style 'body.
512 (gnus-configure-posting-styles): insert headers immediately 512 (gnus-configure-posting-styles): Insert headers immediately
513 513
5141998-08-13 Lars Magne Ingebrigtsen <larsi@gnus.org> 5141998-08-13 Lars Magne Ingebrigtsen <larsi@gnus.org>
515 515
@@ -524,9 +524,9 @@
524 524
5251998-08-12 Simon Josefsson <jas@pdc.kth.se> 5251998-08-12 Simon Josefsson <jas@pdc.kth.se>
526 526
527 * gnus-cache.el (gnus-uncacheable-groups): doc change 527 * gnus-cache.el (gnus-uncacheable-groups): Doc change.
528 (gnus-cacheable-groups): new variable 528 (gnus-cacheable-groups): New variable.
529 (gnus-cache-possibly-enter-article): use it 529 (gnus-cache-possibly-enter-article): Use it.
530 530
5311998-08-12 Lars Magne Ingebrigtsen <larsi@gnus.org> 5311998-08-12 Lars Magne Ingebrigtsen <larsi@gnus.org>
532 532
diff --git a/lisp/gnus/ChangeLog.2 b/lisp/gnus/ChangeLog.2
index b05ff5fc8ef..6ad78d1319e 100644
--- a/lisp/gnus/ChangeLog.2
+++ b/lisp/gnus/ChangeLog.2
@@ -694,11 +694,11 @@
694 (gnus-agent-regenerate): Uses new gnus-agent-covered-methods 694 (gnus-agent-regenerate): Uses new gnus-agent-covered-methods
695 function as gnus-agent-covered-methods variable no longer provides 695 function as gnus-agent-covered-methods variable no longer provides
696 methods. 696 methods.
697 (gnus-agent-covered-methods): New function 697 (gnus-agent-covered-methods): New function.
698 (gnus-agent-expire-group, gnus-agent-expire): Final message will, 698 (gnus-agent-expire-group, gnus-agent-expire): Final message will,
699 if gnus-verbose is greater than 4, report statistics of NOV 699 if gnus-verbose is greater than 4, report statistics of NOV
700 entries and files deleted as well as total bytes recovered. 700 entries and files deleted as well as total bytes recovered.
701 (gnus-agent-expire-done-message): New function 701 (gnus-agent-expire-done-message): New function.
702 (gnus-agent-unread-articles): Bug fix. No longer drops last 702 (gnus-agent-unread-articles): Bug fix. No longer drops last
703 unread article onto read list. 703 unread article onto read list.
704 (gnus-agent-regenerate-group): Changed prompt to use typical 704 (gnus-agent-regenerate-group): Changed prompt to use typical
@@ -900,7 +900,7 @@
900 900
901 * spam.el 901 * spam.el
902 (spam-log-processing-to-registry): Improved message and comments. 902 (spam-log-processing-to-registry): Improved message and comments.
903 (spam-log-unregistration-needed-p): New function 903 (spam-log-unregistration-needed-p): New function.
904 (spam-ifile-register-spam-routine) 904 (spam-ifile-register-spam-routine)
905 (spam-ifile-register-ham-routine, spam-stat-register-spam-routine) 905 (spam-ifile-register-ham-routine, spam-stat-register-spam-routine)
906 (spam-stat-register-ham-routine) 906 (spam-stat-register-ham-routine)
@@ -1120,7 +1120,7 @@
1120 1120
1121 * message.el (message-mode-field-menu): Added 1121 * message.el (message-mode-field-menu): Added
1122 message-generate-unsubscribed-mail-followup-to. 1122 message-generate-unsubscribed-mail-followup-to.
1123 (message-forward-subject-fwd): Avoid double "Fwd: " 1123 (message-forward-subject-fwd): Avoid double "Fwd: ".
1124 (message-change-subject): Added comment. 1124 (message-change-subject): Added comment.
1125 1125
11262003-10-19 Lars Magne Ingebrigtsen <larsi@gnus.org> 11262003-10-19 Lars Magne Ingebrigtsen <larsi@gnus.org>
@@ -2084,7 +2084,7 @@
2084 (spam-spamoracle-learn-ham, spam-spamoracle-learn-spam): New functions. 2084 (spam-spamoracle-learn-ham, spam-spamoracle-learn-spam): New functions.
2085 2085
2086 * gnus.el (gnus-group-spam-exit-processor-spamoracle) 2086 * gnus.el (gnus-group-spam-exit-processor-spamoracle)
2087 (gnus-group-ham-exit-processor-spamoracle): New variables for SpamOracle 2087 (gnus-group-ham-exit-processor-spamoracle): New variables for SpamOracle.
2088 (spam-process, ham-process): Added spamoracle spam/ham processors. 2088 (spam-process, ham-process): Added spamoracle spam/ham processors.
2089 2089
20902003-06-08 Jesper Harder <harder@ifa.au.dk> 20902003-06-08 Jesper Harder <harder@ifa.au.dk>
@@ -2781,7 +2781,7 @@
2781 * gnus-registry.el (gnus-registry-split-fancy-with-parent): Added 2781 * gnus-registry.el (gnus-registry-split-fancy-with-parent): Added
2782 diagnostic message. 2782 diagnostic message.
2783 (gnus-registry-grep-in-list): Don't run when word is nil. 2783 (gnus-registry-grep-in-list): Don't run when word is nil.
2784 (gnus-registry-fetch-message-id-fast): New function 2784 (gnus-registry-fetch-message-id-fast): New function.
2785 (gnus-registry-delete-group, gnus-registry-add-group): Make sure 2785 (gnus-registry-delete-group, gnus-registry-add-group): Make sure
2786 the id and group are not nil. 2786 the id and group are not nil.
2787 (gnus-registry-register-message-ids): New function. 2787 (gnus-registry-register-message-ids): New function.
@@ -3561,7 +3561,7 @@
3561 `message-valid-fqdn-regexp' for initialization. 3561 `message-valid-fqdn-regexp' for initialization.
3562 (gnus-button-handle-info-url): Renamed and extended version of 3562 (gnus-button-handle-info-url): Renamed and extended version of
3563 `gnus-button-handle-info'. 3563 `gnus-button-handle-info'.
3564 (gnus-button-message-level): Renamed from `gnus-button-mail-level' 3564 (gnus-button-message-level): Renamed from `gnus-button-mail-level'.
3565 (gnus-button-handle-symbol, gnus-button-handle-library) 3565 (gnus-button-handle-symbol, gnus-button-handle-library)
3566 (gnus-button-handle-info-keystrokes): New functions. 3566 (gnus-button-handle-info-keystrokes): New functions.
3567 (gnus-button-browse-level): New variable. 3567 (gnus-button-browse-level): New variable.
@@ -6296,8 +6296,8 @@
6296 6296
62972003-01-02 Reiner Steib <Reiner.Steib@gmx.de> 62972003-01-02 Reiner Steib <Reiner.Steib@gmx.de>
6298 6298
6299 * gnus-art.el (gnus-button-url-regexp, 6299 * gnus-art.el (gnus-button-url-regexp)
6300 (gnus-button-mid-or-mail-regexp, gnus-button-alist, 6300 (gnus-button-mid-or-mail-regexp, gnus-button-alist)
6301 (gnus-header-button-alist): Regexps are case insensitive here. 6301 (gnus-header-button-alist): Regexps are case insensitive here.
6302 6302
63032003-01-02 Simon Josefsson <jas@extundo.com> 63032003-01-02 Simon Josefsson <jas@extundo.com>
@@ -7195,7 +7195,7 @@
7195 7195
71962002-10-31 Alex Schroeder <alex@emacswiki.org> 71962002-10-31 Alex Schroeder <alex@emacswiki.org>
7197 7197
7198 * spam-stat.el (spam-stat-process-directory): Add dir to message 7198 * spam-stat.el (spam-stat-process-directory): Add dir to message.
7199 (spam-stat-reduce-size): No longer remove words 7199 (spam-stat-reduce-size): No longer remove words
7200 with values close to 0.5, because the default value is 0.2. 7200 with values close to 0.5, because the default value is 0.2.
7201 7201
@@ -12403,7 +12403,7 @@
12403 Support "Importance:" header in Message. 12403 Support "Importance:" header in Message.
12404 12404
12405 * message.el (message-mode-map): Bind C-c C-p to 12405 * message.el (message-mode-map): Bind C-c C-p to
12406 `message-insert-or-toggle-importance' 12406 `message-insert-or-toggle-importance'.
12407 (message-mode-menu): Add message-insert-importance-{high,low}. 12407 (message-mode-menu): Add message-insert-importance-{high,low}.
12408 (message-insert-importance-high, message-insert-importance-low) 12408 (message-insert-importance-high, message-insert-importance-low)
12409 (message-insert-or-toggle-importance): New functions. 12409 (message-insert-or-toggle-importance): New functions.
@@ -12871,7 +12871,7 @@
12871 12871
128722001-10-21 Simon Josefsson <jas@extundo.com> 128722001-10-21 Simon Josefsson <jas@extundo.com>
12873 12873
12874 * nnimap.el (nnimap): Defgroup 12874 * nnimap.el (nnimap): Defgroup.
12875 (nnimap-strict-function, nnimap-strict-function-match): New 12875 (nnimap-strict-function, nnimap-strict-function-match): New
12876 widget, from Per Abrahamsen <abraham@dina.kvl.dk>. 12876 widget, from Per Abrahamsen <abraham@dina.kvl.dk>.
12877 (nnimap-split-crosspost, nnimap-split-inbox) 12877 (nnimap-split-crosspost, nnimap-split-inbox)
@@ -16689,7 +16689,7 @@
16689 * gnus-cus.el (gnus-group-customize): Use it. 16689 * gnus-cus.el (gnus-group-customize): Use it.
16690 16690
16691 * gnus.el (gnus-define-group-parameter): New macro. 16691 * gnus.el (gnus-define-group-parameter): New macro.
16692 (auto-expire): Use it 16692 (auto-expire): Use it.
16693 (total-expire): Use it. 16693 (total-expire): Use it.
16694 * gnus-art.el (banner): Use it. 16694 * gnus-art.el (banner): Use it.
16695 16695
diff --git a/lisp/gnus/mml-smime.el b/lisp/gnus/mml-smime.el
index a4541ac5dec..827003f8ec7 100644
--- a/lisp/gnus/mml-smime.el
+++ b/lisp/gnus/mml-smime.el
@@ -520,10 +520,14 @@ Content-Disposition: attachment; filename=smime.p7m
520 ctl 'protocol) 520 ctl 'protocol)
521 "application/pkcs7-signature") 521 "application/pkcs7-signature")
522 t))) 522 t)))
523 (null (setq signature (mm-find-part-by-type 523 (null (setq signature (or (mm-find-part-by-type
524 (cdr handle) 524 (cdr handle)
525 "application/pkcs7-signature" 525 "application/pkcs7-signature"
526 nil t)))) 526 nil t)
527 (mm-find-part-by-type
528 (cdr handle)
529 "application/x-pkcs7-signature"
530 nil t)))))
527 (mm-set-handle-multipart-parameter 531 (mm-set-handle-multipart-parameter
528 mm-security-handle 'gnus-info "Corrupted") 532 mm-security-handle 'gnus-info "Corrupted")
529 (throw 'error handle)) 533 (throw 'error handle))
diff --git a/lisp/mh-e/ChangeLog b/lisp/mh-e/ChangeLog
index 29a49c45a38..ad1dbc8f024 100644
--- a/lisp/mh-e/ChangeLog
+++ b/lisp/mh-e/ChangeLog
@@ -504,8 +504,8 @@
504 504
5052006-06-02 Bill Wohler <wohler@newt.com> 5052006-06-02 Bill Wohler <wohler@newt.com>
506 506
507 (mh-folder-exists-p): Change test from an empty buffer, to one 507 * mh-search.el (mh-folder-exists-p): Change test from an empty buffer,
508 that contains the actual folder, since GNU mailutils' folder 508 to one that contains the actual folder, since GNU mailutils' folder
509 command displays output if the folder doesn't exist (closes SF 509 command displays output if the folder doesn't exist (closes SF
510 #1499712). 510 #1499712).
511 511
@@ -1415,7 +1415,7 @@
1415 (mh-get-field): Delete ancient alias. 1415 (mh-get-field): Delete ancient alias.
1416 1416
1417 * mh-xface.el (mh-face-foreground-compat): Move to mh-compat.el 1417 * mh-xface.el (mh-face-foreground-compat): Move to mh-compat.el
1418 and rename to mh-face-foreground 1418 and rename to mh-face-foreground.
1419 (mh-face-background-compat): Move to mh-compat.el 1419 (mh-face-background-compat): Move to mh-compat.el
1420 and rename to mh-face-background. 1420 and rename to mh-face-background.
1421 (mh-face-display-function): Use the new names. 1421 (mh-face-display-function): Use the new names.
@@ -1732,7 +1732,7 @@
1732 (mh-identity-make-menu-no-autoload): New alias for 1732 (mh-identity-make-menu-no-autoload): New alias for
1733 mh-identity-make-menu which can be called from mh-e.el. 1733 mh-identity-make-menu which can be called from mh-e.el.
1734 (mh-identity-list-set): Move to mh-e.el. 1734 (mh-identity-list-set): Move to mh-e.el.
1735 (mh-identity-add-menu): New function 1735 (mh-identity-add-menu): New function.
1736 (mh-insert-identity): Add optional argument maybe-insert so that 1736 (mh-insert-identity): Add optional argument maybe-insert so that
1737 local variable mh-identity-local does not have to be visible. 1737 local variable mh-identity-local does not have to be visible.
1738 1738
@@ -1891,7 +1891,7 @@
1891 (mh-find-path-run, mh-find-path): Move here from deprecated file 1891 (mh-find-path-run, mh-find-path): Move here from deprecated file
1892 mh-init.el. 1892 mh-init.el.
1893 (mh-help-messages): Now an alist of modes to an alist of messages. 1893 (mh-help-messages): Now an alist of modes to an alist of messages.
1894 (mh-set-help): New function used to set mh-help-messages 1894 (mh-set-help): New function used to set mh-help-messages.
1895 (mh-help): Adjust for new format of mh-help-messages. Add 1895 (mh-help): Adjust for new format of mh-help-messages. Add
1896 help-messages argument. 1896 help-messages argument.
1897 (mh-prefix-help): Refactor to use mh-help. 1897 (mh-prefix-help): Refactor to use mh-help.
@@ -2460,7 +2460,7 @@
2460 (mh-scan-good-msg-regexp, mh-scan-deleted-msg-regexp) 2460 (mh-scan-good-msg-regexp, mh-scan-deleted-msg-regexp)
2461 (mh-scan-refiled-msg-regexp, mh-scan-cur-msg-number-regexp) 2461 (mh-scan-refiled-msg-regexp, mh-scan-cur-msg-number-regexp)
2462 (mh-scan-date-regexp, mh-scan-rcpt-regexp, mh-scan-body-regexp) 2462 (mh-scan-date-regexp, mh-scan-rcpt-regexp, mh-scan-body-regexp)
2463 (mh-scan-subject-regexp): Sync docstrings with manual 2463 (mh-scan-subject-regexp): Sync docstrings with manual.
2464 (mh-scan-format-regexp): Rename to 2464 (mh-scan-format-regexp): Rename to
2465 mh-scan-sent-to-me-sender-regexp. Drop date parenthesized 2465 mh-scan-sent-to-me-sender-regexp. Drop date parenthesized
2466 expression. Make expression more like the others (anchored at the 2466 expression. Make expression more like the others (anchored at the
@@ -2760,7 +2760,7 @@
2760 (mh-mime-save-parts-default-directory, mh-print-background-flag) 2760 (mh-mime-save-parts-default-directory, mh-print-background-flag)
2761 (mh-show-maximum-size, mh-show-use-goto-addr-flag) 2761 (mh-show-maximum-size, mh-show-use-goto-addr-flag)
2762 (mh-show-use-xface-flag, mh-store-default-directory) 2762 (mh-show-use-xface-flag, mh-store-default-directory)
2763 (mh-summary-height, mh-delete-msg-hook 2763 (mh-summary-height, mh-delete-msg-hook)
2764 (mh-show-hook, mh-show-mode-hook): Sync docstrings with manual. 2764 (mh-show-hook, mh-show-mode-hook): Sync docstrings with manual.
2765 2765
2766 * mh-e.el (mh-scan-format-mh, mh-scan-good-msg-regexp) 2766 * mh-e.el (mh-scan-format-mh, mh-scan-good-msg-regexp)
diff --git a/lisp/mh-e/ChangeLog.1 b/lisp/mh-e/ChangeLog.1
index 5d08fd73e69..54cd828e796 100644
--- a/lisp/mh-e/ChangeLog.1
+++ b/lisp/mh-e/ChangeLog.1
@@ -825,7 +825,7 @@
825 (MH-E-XEMACS-OBJ): New variable to hold XEmacs object files. 825 (MH-E-XEMACS-OBJ): New variable to hold XEmacs object files.
826 (clean): Moved XEmacs-specific code to clean-xemacs. 826 (clean): Moved XEmacs-specific code to clean-xemacs.
827 (xemacs): Added clean-xemacs prerequisite. Moved down to XEmacs 827 (xemacs): Added clean-xemacs prerequisite. Moved down to XEmacs
828 section of file. Add target to build mh-loaddefs.el in XEmacs 828 section of file. Add target to build mh-loaddefs.el in XEmacs.
829 (loaddefs-xemacs): New rule to build mh-loaddefs.el in XEmacs. 829 (loaddefs-xemacs): New rule to build mh-loaddefs.el in XEmacs.
830 (clean-xemacs): New target to remove XEmacs-specific files. 830 (clean-xemacs): New target to remove XEmacs-specific files.
831 (compile-xemacs): New. It allows for the '-no-autoloads' option 831 (compile-xemacs): New. It allows for the '-no-autoloads' option
@@ -1156,8 +1156,8 @@
1156 mh-loaddefs.el in XEmacs. 1156 mh-loaddefs.el in XEmacs.
1157 (XEMACS_LOADDEFS_COOKIE): Ditto. 1157 (XEMACS_LOADDEFS_COOKIE): Ditto.
1158 (XEMACS_LOADDEFS_PKG_NAME): Ditto. 1158 (XEMACS_LOADDEFS_PKG_NAME): Ditto.
1159 (xemacs): Add target to build mh-loaddefs.el in XEmacs 1159 (xemacs): Add target to build mh-loaddefs.el in XEmacs.
1160 (clean-xemacs): Remove `mh-loaddefs.el*' 1160 (clean-xemacs): Remove `mh-loaddefs.el*'.
1161 (loaddefs-xemacs): New rule to build mh-loaddefs.el in XEmacs. 1161 (loaddefs-xemacs): New rule to build mh-loaddefs.el in XEmacs.
1162 1162
11632003-11-02 Peter S Galbraith <psg@debian.org> 11632003-11-02 Peter S Galbraith <psg@debian.org>
@@ -1432,7 +1432,7 @@
1432 (mh-mml-secure-message-signencrypt): Ditto. 1432 (mh-mml-secure-message-signencrypt): Ditto.
1433 (mh-mml-secure-message-sign): Ditto. 1433 (mh-mml-secure-message-sign): Ditto.
1434 1434
1435 * mh-comp.el (mh-letter-menu, mh-letter-mode-help-messages, 1435 * mh-comp.el (mh-letter-menu, mh-letter-mode-help-messages)
1436 (mh-letter-mode-map): Update to use new functions. 1436 (mh-letter-mode-map): Update to use new functions.
1437 1437
14382003-09-26 Satyaki Das <satyakid@stanford.edu> 14382003-09-26 Satyaki Das <satyakid@stanford.edu>
@@ -1485,7 +1485,7 @@
1485 (mh-alias-system-aliases): Moved here from mh-customize.el. By 1485 (mh-alias-system-aliases): Moved here from mh-customize.el. By
1486 definition, "system" definitions are not user-visible, and user 1486 definition, "system" definitions are not user-visible, and user
1487 filenames are in the the Aliasfile: profile component, so this 1487 filenames are in the the Aliasfile: profile component, so this
1488 variable really shouldn't be a defcustom 1488 variable really shouldn't be a defcustom.
1489 (mh-alias-tstamp, mh-alias-filenames, mh-alias-reload) 1489 (mh-alias-tstamp, mh-alias-filenames, mh-alias-reload)
1490 (mh-alias-add-alias, mh-alias-grab-from-field) 1490 (mh-alias-add-alias, mh-alias-grab-from-field)
1491 (mh-alias-add-address-under-point, mh-alias-apropos): Merge 1491 (mh-alias-add-address-under-point, mh-alias-apropos): Merge
@@ -3988,7 +3988,7 @@
3988 fixes germaine to the change whereby we now check for MIME 3988 fixes germaine to the change whereby we now check for MIME
3989 directives before sending. 3989 directives before sending.
3990 3990
3991 * mh-xemacs-toolbar.el: Fixed copyright. Added Change Log comment 3991 * mh-xemacs-toolbar.el: Fixed copyright. Added Change Log comment.
3992 (lm-verify fix). Added standard MH-E local variables. Removed 3992 (lm-verify fix). Added standard MH-E local variables. Removed
3993 time-stamp stuff. 3993 time-stamp stuff.
3994 3994
@@ -5807,8 +5807,8 @@
5807 (mh-default-folder-prefix, mh-default-folder-must-exist-flag): In 5807 (mh-default-folder-prefix, mh-default-folder-must-exist-flag): In
5808 docstring, refer to documentation for mh-prompt-for-refile-folder 5808 docstring, refer to documentation for mh-prompt-for-refile-folder
5809 and mh-folder-from-address. 5809 and mh-folder-from-address.
5810 (mh-highlight-citation-p, mh-compose-insertion, 5810 (mh-highlight-citation-p, mh-compose-insertion)
5811 (mh-insert-mail-followup-to-list, mh-index-program, 5811 (mh-insert-mail-followup-to-list, mh-index-program)
5812 (mh-identity-default): Fixed case of tags. 5812 (mh-identity-default): Fixed case of tags.
5813 5813
5814 * mh-e.el (mh-folder-from-address): Use new variable 5814 * mh-e.el (mh-folder-from-address): Use new variable
@@ -6310,7 +6310,7 @@
6310 (mh-alias-insert-file): New function. Return the alias file to 6310 (mh-alias-insert-file): New function. Return the alias file to
6311 write a new entry in. 6311 write a new entry in.
6312 (mh-alias-address-to-alias): New function. Return the ADDRESS 6312 (mh-alias-address-to-alias): New function. Return the ADDRESS
6313 alias if defined, or nil." 6313 alias if defined, or nil.
6314 (mh-alias-from-has-no-alias-p): New function. Return t is From has 6314 (mh-alias-from-has-no-alias-p): New function. Return t is From has
6315 no current alias set. Used as tool-bar button enable function. 6315 no current alias set. Used as tool-bar button enable function.
6316 (mh-alias-add-alias-to-file): New function. Add ALIAS for ADDRESS 6316 (mh-alias-add-alias-to-file): New function. Add ALIAS for ADDRESS
@@ -6902,7 +6902,7 @@
6902 (mh-alias-translate): New function. Return translation for alias, 6902 (mh-alias-translate): New function. Return translation for alias,
6903 checking if in blind or passwd list. 6903 checking if in blind or passwd list.
6904 (mh-alias-letter-expand-alias): Rewrite using 6904 (mh-alias-letter-expand-alias): Rewrite using
6905 mail-abbrev-complete-alias from mailabbrev.el 6905 mail-abbrev-complete-alias from mailabbrev.el.
6906 (mh-alias-expand-alias-map): New variable. 6906 (mh-alias-expand-alias-map): New variable.
6907 (mh-alias-ali): New function. Return formatted string of 6907 (mh-alias-ali): New function. Return formatted string of
6908 translated ALIAS from ali. 6908 translated ALIAS from ali.
@@ -7084,7 +7084,7 @@
7084 mh-thread-generate-scan-lines. 7084 mh-thread-generate-scan-lines.
7085 7085
7086 * mh-mime.el (font-lock): Font-lock required at compile time to 7086 * mh-mime.el (font-lock): Font-lock required at compile time to
7087 avoid warning about font-lock-maximum-size 7087 avoid warning about font-lock-maximum-size.
7088 (mh-display-smileys, mh-display-emphasis): Show graphical smileys 7088 (mh-display-smileys, mh-display-emphasis): Show graphical smileys
7089 and emphasis only if message isn't too large. 7089 and emphasis only if message isn't too large.
7090 7090
@@ -7445,7 +7445,7 @@
7445 This addresses part of SF #627015. 7445 This addresses part of SF #627015.
7446 7446
7447 * mh-utils.el (mh-decode-quoted-printable-flag): Renamed from 7447 * mh-utils.el (mh-decode-quoted-printable-flag): Renamed from
7448 mh-decode-quoted-printable 7448 mh-decode-quoted-printable.
7449 (mh-display-msg, mh-decode-quoted-printable-have-mimedecode): 7449 (mh-display-msg, mh-decode-quoted-printable-have-mimedecode):
7450 Use it. 7450 Use it.
7451 This addresses part of SF #627015. 7451 This addresses part of SF #627015.
@@ -7906,7 +7906,7 @@
79062002-10-28 Peter S Galbraith <psg@debian.org> 79062002-10-28 Peter S Galbraith <psg@debian.org>
7907 7907
7908 * mh-e.el (mh-scan-subject-regexp): Add an expression to match an 7908 * mh-e.el (mh-scan-subject-regexp): Add an expression to match an
7909 optional bracketed number after "Re", such as in "Re[2]:" 7909 optional bracketed number after "Re", such as in "Re[2]:".
7910 (Patch by Satyaki; I checked it and applied). 7910 (Patch by Satyaki; I checked it and applied).
7911 (mh-folder-font-lock-subject): Adapt to new mh-scan-subject-regexp. 7911 (mh-folder-font-lock-subject): Adapt to new mh-scan-subject-regexp.
7912 * mh-seq.el (mh-subject-to-sequence): Ditto. 7912 * mh-seq.el (mh-subject-to-sequence): Ditto.
@@ -8882,7 +8882,7 @@
8882 (mh-pick-mode): Set local buffer variable mh-help-messages to 8882 (mh-pick-mode): Set local buffer variable mh-help-messages to
8883 mh-pick-mode-help-messages. 8883 mh-pick-mode-help-messages.
8884 8884
8885 * mh-index.el (mh-index-keymap): Added binding for mh-help 8885 * mh-index.el (mh-index-keymap): Added binding for mh-help.
8886 (mh-index-folder-mode-help-messages): New variable that contains 8886 (mh-index-folder-mode-help-messages): New variable that contains
8887 help messages for MH Index buffer. 8887 help messages for MH Index buffer.
8888 (mh-index-folder-mode): Set local buffer variable mh-help-messages 8888 (mh-index-folder-mode): Set local buffer variable mh-help-messages
@@ -9280,7 +9280,7 @@
92802002-09-17 Peter S Galbraith <psg@debian.org> 92802002-09-17 Peter S Galbraith <psg@debian.org>
9281 9281
9282 * mh-mime.el (mh-store-mime-parts-default-directory): Renamed from 9282 * mh-mime.el (mh-store-mime-parts-default-directory): Renamed from
9283 mh-store-mime-parts-directory 9283 mh-store-mime-parts-directory.
9284 (mh-store-mime-parts-directory): Renamed from 9284 (mh-store-mime-parts-directory): Renamed from
9285 mh-store-mime-parts-directory-default. 9285 mh-store-mime-parts-directory-default.
9286 9286
@@ -9940,7 +9940,7 @@
9940 compiler warnings. 9940 compiler warnings.
9941 9941
9942 * mh-e.el (compilation): Code rearrangement and extra autoloads to 9942 * mh-e.el (compilation): Code rearrangement and extra autoloads to
9943 remove compiler warnings 9943 remove compiler warnings.
9944 (mh-quit): Add call to mh-destroy-postponed-handles to remove 9944 (mh-quit): Add call to mh-destroy-postponed-handles to remove
9945 handles that are associated with external viewers. Also fixed a 9945 handles that are associated with external viewers. Also fixed a
9946 bug that I accidentally introduced by adding an extra line when 9946 bug that I accidentally introduced by adding an extra line when
@@ -10707,7 +10707,7 @@
107072001-11-29 Peter S Galbraith <psg@debian.org> 107072001-11-29 Peter S Galbraith <psg@debian.org>
10708 10708
10709 * mh-e.el (mh-folder-font-lock-subject): New fontifier function 10709 * mh-e.el (mh-folder-font-lock-subject): New fontifier function
10710 for subject lines in folder-mode 10710 for subject lines in folder-mode.
10711 (mh-scan-followup-regexp): Deleted obsolete regexp. Use 10711 (mh-scan-followup-regexp): Deleted obsolete regexp. Use
10712 mh-scan-subject-regexp instead. 10712 mh-scan-subject-regexp instead.
10713 (mh-folder-font-lock-keywords): Use mh-folder-font-lock-subject 10713 (mh-folder-font-lock-keywords): Use mh-folder-font-lock-subject
diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el
index 1c9a7015bf2..2a4f57e2045 100644
--- a/lisp/net/tramp.el
+++ b/lisp/net/tramp.el
@@ -599,8 +599,8 @@ detected as prompt when being sent on echoing hosts, therefore.")
599 (tramp-copy-keep-date nil) 599 (tramp-copy-keep-date nil)
600 (tramp-password-end-of-line nil)) 600 (tramp-password-end-of-line nil))
601 ("plink" (tramp-login-program "plink") 601 ("plink" (tramp-login-program "plink")
602 (tramp-login-args (("%h") ("-l" "%u") ("-P" "%p") 602 (tramp-login-args (("-l" "%u") ("-P" "%p")
603 ("-ssh"))) 603 ("-ssh") ("%h")))
604 (tramp-remote-sh "/bin/sh") 604 (tramp-remote-sh "/bin/sh")
605 (tramp-copy-program nil) 605 (tramp-copy-program nil)
606 (tramp-copy-args nil) 606 (tramp-copy-args nil)
@@ -609,8 +609,8 @@ detected as prompt when being sent on echoing hosts, therefore.")
609 (tramp-default-port 22)) 609 (tramp-default-port 22))
610 ("plink1" 610 ("plink1"
611 (tramp-login-program "plink") 611 (tramp-login-program "plink")
612 (tramp-login-args (("%h") ("-l" "%u") ("-P" "%p") 612 (tramp-login-args (("-l" "%u") ("-P" "%p")
613 ("-1" "-ssh"))) 613 ("-1" "-ssh") ("%h")))
614 (tramp-remote-sh "/bin/sh") 614 (tramp-remote-sh "/bin/sh")
615 (tramp-copy-program nil) 615 (tramp-copy-program nil)
616 (tramp-copy-args nil) 616 (tramp-copy-args nil)
@@ -633,8 +633,8 @@ detected as prompt when being sent on echoing hosts, therefore.")
633 (tramp-copy-keep-date nil) 633 (tramp-copy-keep-date nil)
634 (tramp-password-end-of-line nil)) 634 (tramp-password-end-of-line nil))
635 ("pscp" (tramp-login-program "plink") 635 ("pscp" (tramp-login-program "plink")
636 (tramp-login-args (("%h") ("-l" "%u") ("-P" "%p") 636 (tramp-login-args (("-l" "%u") ("-P" "%p")
637 ("-ssh"))) 637 ("-ssh") ("%h")))
638 (tramp-remote-sh "/bin/sh") 638 (tramp-remote-sh "/bin/sh")
639 (tramp-copy-program "pscp") 639 (tramp-copy-program "pscp")
640 (tramp-copy-args (("-P" "%p") ("-scp") ("-p" "%k"))) 640 (tramp-copy-args (("-P" "%p") ("-scp") ("-p" "%k")))
@@ -642,8 +642,8 @@ detected as prompt when being sent on echoing hosts, therefore.")
642 (tramp-password-end-of-line "xy") ;see docstring for "xy" 642 (tramp-password-end-of-line "xy") ;see docstring for "xy"
643 (tramp-default-port 22)) 643 (tramp-default-port 22))
644 ("psftp" (tramp-login-program "plink") 644 ("psftp" (tramp-login-program "plink")
645 (tramp-login-args (("%h") ("-l" "%u") ("-P" "%p") 645 (tramp-login-args (("-l" "%u") ("-P" "%p")
646 ("-ssh"))) 646 ("-ssh") ("%h")))
647 (tramp-remote-sh "/bin/sh") 647 (tramp-remote-sh "/bin/sh")
648 (tramp-copy-program "pscp") 648 (tramp-copy-program "pscp")
649 (tramp-copy-args (("-P" "%p") ("-sftp") ("-p" "%k"))) 649 (tramp-copy-args (("-P" "%p") ("-sftp") ("-p" "%k")))
@@ -1444,10 +1444,14 @@ See also `tramp-file-name-regexp'.")
1444 1444
1445;;;###autoload 1445;;;###autoload
1446(defconst tramp-file-name-regexp-unified 1446(defconst tramp-file-name-regexp-unified
1447 "\\`/\\([^[/:]+\\|[^/]+]\\):" 1447 (if (memq system-type '(cygwin windows-nt))
1448 "\\`/\\([^[/:]\\{2,\\}\\|[^/]\\{2,\\}]\\):"
1449 "\\`/\\([^[/:]+\\|[^/]+]\\):")
1448 "Value for `tramp-file-name-regexp' for unified remoting. 1450 "Value for `tramp-file-name-regexp' for unified remoting.
1449Emacs (not XEmacs) uses a unified filename syntax for Ange-FTP and 1451Emacs (not XEmacs) uses a unified filename syntax for Ange-FTP and
1450Tramp. See `tramp-file-name-structure' for more explanations.") 1452Tramp. See `tramp-file-name-structure' for more explanations.
1453
1454On W32 systems, the volume letter must be ignored.")
1451 1455
1452;;;###autoload 1456;;;###autoload
1453(defconst tramp-file-name-regexp-separate 1457(defconst tramp-file-name-regexp-separate
@@ -1494,10 +1498,14 @@ volume letter, which will be removed by `tramp-drop-volume-letter'.")
1494 1498
1495;;;###autoload 1499;;;###autoload
1496(defconst tramp-completion-file-name-regexp-unified 1500(defconst tramp-completion-file-name-regexp-unified
1497 (concat tramp-root-regexp "[^/]*\\'") 1501 (if (memq system-type '(cygwin windows-nt))
1502 (concat tramp-root-regexp "[^/]\\{2,\\}\\'")
1503 (concat tramp-root-regexp "[^/]*\\'"))
1498 "Value for `tramp-completion-file-name-regexp' for unified remoting. 1504 "Value for `tramp-completion-file-name-regexp' for unified remoting.
1499GNU Emacs uses a unified filename syntax for Tramp and Ange-FTP. 1505GNU Emacs uses a unified filename syntax for Tramp and Ange-FTP.
1500See `tramp-file-name-structure' for more explanations.") 1506See `tramp-file-name-structure' for more explanations.
1507
1508On W32 systems, the volume letter must be ignored.")
1501 1509
1502;;;###autoload 1510;;;###autoload
1503(defconst tramp-completion-file-name-regexp-separate 1511(defconst tramp-completion-file-name-regexp-separate
@@ -6590,7 +6598,29 @@ file exists and nonzero exit status otherwise."
6590 vec 'file-error "Couldn't find command to check if file exists")) 6598 vec 'file-error "Couldn't find command to check if file exists"))
6591 result)) 6599 result))
6592 6600
6593;; CCC test ksh or bash found for tilde expansion? 6601(defun tramp-open-shell (vec shell)
6602 "Opens shell SHELL."
6603 (with-progress-reporter vec 5 (format "Opening remote shell `%s'" shell)
6604 ;; Find arguments for this shell.
6605 (let ((tramp-end-of-output tramp-initial-end-of-output)
6606 (alist tramp-sh-extra-args)
6607 item extra-args)
6608 (while (and alist (null extra-args))
6609 (setq item (pop alist))
6610 (when (string-match (car item) shell)
6611 (setq extra-args (cdr item))))
6612 (when extra-args (setq shell (concat shell " " extra-args)))
6613 (tramp-send-command
6614 vec (format "exec env ENV='' PROMPT_COMMAND='' PS1=%s PS2='' PS3='' %s"
6615 (shell-quote-argument tramp-end-of-output) shell)
6616 t))
6617 ;; Setting prompts.
6618 (tramp-send-command
6619 vec (format "PS1=%s" (shell-quote-argument tramp-end-of-output)) t)
6620 (tramp-send-command vec "PS2=''" t)
6621 (tramp-send-command vec "PS3=''" t)
6622 (tramp-send-command vec "PROMPT_COMMAND=''" t)))
6623
6594(defun tramp-find-shell (vec) 6624(defun tramp-find-shell (vec)
6595 "Opens a shell on the remote host which groks tilde expansion." 6625 "Opens a shell on the remote host which groks tilde expansion."
6596 (unless (tramp-get-connection-property vec "remote-shell" nil) 6626 (unless (tramp-get-connection-property vec "remote-shell" nil)
@@ -6611,29 +6641,9 @@ file exists and nonzero exit status otherwise."
6611 (tramp-error 6641 (tramp-error
6612 vec 'file-error 6642 vec 'file-error
6613 "Couldn't find a shell which groks tilde expansion")) 6643 "Couldn't find a shell which groks tilde expansion"))
6614 ;; Find arguments for this shell.
6615 (let ((alist tramp-sh-extra-args)
6616 item extra-args)
6617 (while (and alist (null extra-args))
6618 (setq item (pop alist))
6619 (when (string-match (car item) shell)
6620 (setq extra-args (cdr item))))
6621 (when extra-args (setq shell (concat shell " " extra-args))))
6622 (tramp-message 6644 (tramp-message
6623 vec 5 "Starting remote shell `%s' for tilde expansion" shell) 6645 vec 5 "Starting remote shell `%s' for tilde expansion" shell)
6624 (let ((tramp-end-of-output tramp-initial-end-of-output)) 6646 (tramp-open-shell vec shell))
6625 (tramp-send-command
6626 vec
6627 (format "PROMPT_COMMAND='' PS1=%s PS2='' PS3='' exec %s"
6628 (shell-quote-argument tramp-end-of-output) shell)
6629 t))
6630 ;; Setting prompts.
6631 (with-progress-reporter vec 5 (format "Setting remote shell prompt")
6632 (tramp-send-command
6633 vec (format "PS1=%s" (shell-quote-argument tramp-end-of-output)) t)
6634 (tramp-send-command vec "PS2=''" t)
6635 (tramp-send-command vec "PS3=''" t)
6636 (tramp-send-command vec "PROMPT_COMMAND=''" t)))
6637 6647
6638 (t (tramp-message 6648 (t (tramp-message
6639 vec 5 "Remote `%s' groks tilde expansion, good" 6649 vec 5 "Remote `%s' groks tilde expansion, good"
@@ -6914,14 +6924,9 @@ process to set up. VEC specifies the connection."
6914 ;; way, we avoid the startup file clobbering $PS1. $PROMP_COMMAND 6924 ;; way, we avoid the startup file clobbering $PS1. $PROMP_COMMAND
6915 ;; is another way to set the prompt in /bin/bash, it must be 6925 ;; is another way to set the prompt in /bin/bash, it must be
6916 ;; discarded as well. 6926 ;; discarded as well.
6917 (tramp-send-command 6927 (tramp-open-shell
6918 vec 6928 vec
6919 (format 6929 (tramp-get-method-parameter (tramp-file-name-method vec) 'tramp-remote-sh))
6920 "exec env ENV='' PROMPT_COMMAND='' PS1=%s PS2='' PS3='' %s"
6921 (shell-quote-argument tramp-end-of-output)
6922 (tramp-get-method-parameter
6923 (tramp-file-name-method vec) 'tramp-remote-sh))
6924 t)
6925 6930
6926 ;; Disable echo. 6931 ;; Disable echo.
6927 (tramp-message vec 5 "Setting up remote shell environment") 6932 (tramp-message vec 5 "Setting up remote shell environment")
@@ -7037,7 +7042,7 @@ process to set up. VEC specifies the connection."
7037 ;; "echo $?" part if the "test" part has an error. In particular, 7042 ;; "echo $?" part if the "test" part has an error. In particular,
7038 ;; the OpenSolaris /bin/sh is a problem. There are also other 7043 ;; the OpenSolaris /bin/sh is a problem. There are also other
7039 ;; problems with /bin/sh of OpenSolaris, like redirection of stderr 7044 ;; problems with /bin/sh of OpenSolaris, like redirection of stderr
7040 ;; in in function declarations, or changing HISTFILE in place. 7045 ;; in function declarations, or changing HISTFILE in place.
7041 ;; Therefore, OpenSolaris' /bin/sh is replaced by bash, when 7046 ;; Therefore, OpenSolaris' /bin/sh is replaced by bash, when
7042 ;; detected. 7047 ;; detected.
7043 (tramp-find-shell vec) 7048 (tramp-find-shell vec)
@@ -8882,7 +8887,6 @@ Only works for Bourne-like shells."
8882;; likely to produce long command lines, and some shells choke on 8887;; likely to produce long command lines, and some shells choke on
8883;; long command lines. 8888;; long command lines.
8884;; * How to deal with MULE in `insert-file-contents' and `write-region'? 8889;; * How to deal with MULE in `insert-file-contents' and `write-region'?
8885;; * Test remote ksh or bash for tilde expansion in `tramp-find-shell'?
8886;; * abbreviate-file-name 8890;; * abbreviate-file-name
8887;; * Better error checking. At least whenever we see something 8891;; * Better error checking. At least whenever we see something
8888;; strange when doing zerop, we should kill the process and start 8892;; strange when doing zerop, we should kill the process and start
@@ -8953,7 +8957,6 @@ Only works for Bourne-like shells."
8953;; expects English? Or just to set LC_MESSAGES to "C" if Tramp 8957;; expects English? Or just to set LC_MESSAGES to "C" if Tramp
8954;; expects only English messages? (Juri Linkov) 8958;; expects only English messages? (Juri Linkov)
8955;; * Make shadowfile.el grok Tramp filenames. (Bug#4526, Bug#4846) 8959;; * Make shadowfile.el grok Tramp filenames. (Bug#4526, Bug#4846)
8956;; * Do not handle files with drive letter as remote. (Bug#5447)
8957;; * Load Tramp subpackages only when needed. (Bug#1529, Bug#5448, Bug#5705) 8960;; * Load Tramp subpackages only when needed. (Bug#1529, Bug#5448, Bug#5705)
8958;; * Try telnet+curl as new method. It might be useful for busybox, 8961;; * Try telnet+curl as new method. It might be useful for busybox,
8959;; without built-in uuencode/uudecode. 8962;; without built-in uuencode/uudecode.
diff --git a/lisp/org/ChangeLog b/lisp/org/ChangeLog
index 436cdbd846f..9fb48e00ed7 100644
--- a/lisp/org/ChangeLog
+++ b/lisp/org/ChangeLog
@@ -1375,20 +1375,20 @@
1375 1375
1376 * org.el (org-appearance): Change Customize group variable name 1376 * org.el (org-appearance): Change Customize group variable name
1377 from org-font-lock to org-appearance, and change tag from "Org 1377 from org-font-lock to org-appearance, and change tag from "Org
1378 Font Lock" to "Org Appearance" 1378 Font Lock" to "Org Appearance".
1379 (org-odd-levels-only): Change Customize group variable name 1379 (org-odd-levels-only): Change Customize group variable name.
1380 (org-level-color-stars-only): Change Customize group variable name 1380 (org-level-color-stars-only): Change Customize group variable name.
1381 (org-hide-leading-stars): Change Customize group variable name 1381 (org-hide-leading-stars): Change Customize group variable name.
1382 (org-hidden-keywords): Change Customize group variable name 1382 (org-hidden-keywords): Change Customize group variable name.
1383 (org-fontify-done-headline): Change Customize group variable name 1383 (org-fontify-done-headline): Change Customize group variable name.
1384 (org-fontify-emphasized-text): Change Customize group variable name 1384 (org-fontify-emphasized-text): Change Customize group variable name.
1385 (org-fontify-whole-heading-line): Change Customize group variable name 1385 (org-fontify-whole-heading-line): Change Customize group variable name.
1386 (org-highlight-latex-fragments-and-specials): Change Customize 1386 (org-highlight-latex-fragments-and-specials): Change Customize
1387 group variable name 1387 group variable name.
1388 (org-hide-emphasis-markers): Change Customize group variable name 1388 (org-hide-emphasis-markers): Change Customize group variable name.
1389 (org-emphasis-alist): Change Customize group variable name 1389 (org-emphasis-alist): Change Customize group variable name.
1390 (org-emphasis-regexp-components): Change Customize group variable 1390 (org-emphasis-regexp-components): Change Customize group variable
1391 name 1391 name.
1392 (org-modules): Remove mention of org-R. 1392 (org-modules): Remove mention of org-R.
1393 1393
1394 * org-faces.el (org-faces): Change Customize group variable name. 1394 * org-faces.el (org-faces): Change Customize group variable name.
@@ -1420,8 +1420,8 @@
1420 (org-fontify-meta-lines-and-blocks): Changes to font-lock code 1420 (org-fontify-meta-lines-and-blocks): Changes to font-lock code
1421 implementing new faces and hiding behaviour. 1421 implementing new faces and hiding behaviour.
1422 1422
1423 * org-faces.el (org-document-title): New face for #+TITLE lines 1423 * org-faces.el (org-document-title): New face for #+TITLE lines.
1424 (org-document-info): New face for #+DATE, #+AUTHOR, #+EMAIL lines 1424 (org-document-info): New face for #+DATE, #+AUTHOR, #+EMAIL lines.
1425 (org-document-info-keyword): New face for #+DATE, #+AUTHOR, #+EMAIL 1425 (org-document-info-keyword): New face for #+DATE, #+AUTHOR, #+EMAIL
1426 keywords. 1426 keywords.
1427 1427
@@ -3096,12 +3096,12 @@
3096 point. 3096 point.
3097 (org-columns-compile-map): There is now an extra position in each 3097 (org-columns-compile-map): There is now an extra position in each
3098 entry specifying the function to use to calculate the displayed 3098 entry specifying the function to use to calculate the displayed
3099 value for the non-calculated properties in the column, 3099 value for the non-calculated properties in the column.
3100 (org-columns-compute-all): Set `org-columns-time' to the current 3100 (org-columns-compute-all): Set `org-columns-time' to the current
3101 time so time difference calculations will work. 3101 time so time difference calculations will work.
3102 (org-columns-compute): Handle column operators where the values 3102 (org-columns-compute): Handle column operators where the values
3103 used are calculated from the underlying property. 3103 used are calculated from the underlying property.
3104 (org-columns-number-to-string): Handle the 'age' column format 3104 (org-columns-number-to-string): Handle the 'age' column format.
3105 (org-columns-string-to-number): Correct the function name (was 3105 (org-columns-string-to-number): Correct the function name (was
3106 org-column...). Add support for the 'age' column format. 3106 org-column...). Add support for the 'age' column format.
3107 (org-columns-compile-format): Support the additional parameter in 3107 (org-columns-compile-format): Support the additional parameter in
@@ -3348,7 +3348,7 @@
3348 currently active clock if the user has exceeded the time returned 3348 currently active clock if the user has exceeded the time returned
3349 by `org-user-idle-seconds', based on the value of 3349 by `org-user-idle-seconds', based on the value of
3350 `org-clock-idle-time'. 3350 `org-clock-idle-time'.
3351 (org-clock-in): If, after resolving clocks, 3351 (org-clock-in): If, after resolving clocks, (???)
3352 (org-clock-out): Cancel the `org-clock-idle-timer' on clock out. 3352 (org-clock-out): Cancel the `org-clock-idle-timer' on clock out.
3353 3353
3354 * org-clock.el (org-clock-resolve-clock): New function that 3354 * org-clock.el (org-clock-resolve-clock): New function that
@@ -4157,7 +4157,7 @@
4157 * org-exp.el (org-export-format-source-code-or-example): Translate 4157 * org-exp.el (org-export-format-source-code-or-example): Translate
4158 language. 4158 language.
4159 4159
4160 * org-src.el (org-src-lang-modes): New variable 4160 * org-src.el (org-src-lang-modes): New variable.
4161 (org-edit-src-code): Translate language. 4161 (org-edit-src-code): Translate language.
4162 4162
4163 * org-exp.el (org-export-format-source-code-or-example): Deal wit 4163 * org-exp.el (org-export-format-source-code-or-example): Deal wit
@@ -4285,7 +4285,7 @@
4285 the markup is src or example. 4285 the markup is src or example.
4286 4286
4287 * org-agenda.el (org-agenda-skip-scheduled-if-deadline-is-shown): 4287 * org-agenda.el (org-agenda-skip-scheduled-if-deadline-is-shown):
4288 New option 4288 New option.
4289 (org-agenda-get-day-entries): Remember deadline results and pass 4289 (org-agenda-get-day-entries): Remember deadline results and pass
4290 them on into the function getting the scheduling information. 4290 them on into the function getting the scheduling information.
4291 (org-agenda-get-scheduled): Accept deadline results as parameters 4291 (org-agenda-get-scheduled): Accept deadline results as parameters
@@ -4296,7 +4296,7 @@
4296 convert current line to headline. 4296 convert current line to headline.
4297 4297
4298 * org-clock.el (org-clock-save-markers-for-cut-and-paste): Also 4298 * org-clock.el (org-clock-save-markers-for-cut-and-paste): Also
4299 cheeeeeck the hd marker 4299 cheeeeeck the hd marker.
4300 (org-clock-in): Also set the hd marker. 4300 (org-clock-in): Also set the hd marker.
4301 (org-clock-out): Also set the hd marker. 4301 (org-clock-out): Also set the hd marker.
4302 (org-clock-cancel): Reset markers. 4302 (org-clock-cancel): Reset markers.
@@ -4518,9 +4518,9 @@
45182009-08-06 Bastien Guerry <bzg@altern.org> 45182009-08-06 Bastien Guerry <bzg@altern.org>
4519 4519
4520 * org.el (org-make-link-regexps): Don't exclude parentheses from 4520 * org.el (org-make-link-regexps): Don't exclude parentheses from
4521 `org-plain-link-re' 4521 `org-plain-link-re'.
4522 (org-cycle-internal-local): When locally cycling, switch directly 4522 (org-cycle-internal-local): When locally cycling, switch directly
4523 from CHILDREN to FOLDED if there is no subtree 4523 from CHILDREN to FOLDED if there is no subtree.
4524 (org-cycle): Update the docstring to document the new behavior of 4524 (org-cycle): Update the docstring to document the new behavior of
4525 `org-cycle-internal-local'. 4525 `org-cycle-internal-local'.
4526 4526
@@ -5111,7 +5111,7 @@
5111 (org-set-font-lock-defaults): Call the new fontification 5111 (org-set-font-lock-defaults): Call the new fontification
5112 function. 5112 function.
5113 5113
5114 * org-faces.el (org-meta-line): New face 5114 * org-faces.el (org-meta-line): New face.
5115 (org-block): New face. 5115 (org-block): New face.
5116 5116
51172009-08-06 Carsten Dominik <carsten.dominik@gmail.com> 51172009-08-06 Carsten Dominik <carsten.dominik@gmail.com>
@@ -5341,7 +5341,7 @@
53412009-08-06 Carsten Dominik <carsten.dominik@gmail.com> 53412009-08-06 Carsten Dominik <carsten.dominik@gmail.com>
5342 5342
5343 * org-exp.el (org-export, org-export-visible): Support ASCII 5343 * org-exp.el (org-export, org-export-visible): Support ASCII
5344 export to buffer 5344 export to buffer.
5345 (org-export-normalize-links): Do not protect the description if it 5345 (org-export-normalize-links): Do not protect the description if it
5346 is explicitly given. 5346 is explicitly given.
5347 5347
@@ -5696,7 +5696,7 @@
5696 5696
5697 * org-mouse.el: XEmacs compatibility fixes. 5697 * org-mouse.el: XEmacs compatibility fixes.
5698 5698
5699 * org.el (org-modules): Add org-inlinetasks.el 5699 * org.el (org-modules): Add org-inlinetasks.el.
5700 (org-cycle): Implement limiting level on cycling. 5700 (org-cycle): Implement limiting level on cycling.
5701 (org-move-subtree-down): Fix bug with swapping subtrees at end of 5701 (org-move-subtree-down): Fix bug with swapping subtrees at end of
5702 buffer. 5702 buffer.
@@ -5788,7 +5788,7 @@
5788 (org-mouse-context-menu): Use `org-mouse-todo-menu'. 5788 (org-mouse-context-menu): Use `org-mouse-todo-menu'.
5789 5789
5790 * org-table.el (org-table-beginning-of-field) 5790 * org-table.el (org-table-beginning-of-field)
5791 (org-table-end-of-field): New commands 5791 (org-table-end-of-field): New commands.
5792 (org-table-previous-field, org-table-beginning-of-field): Better 5792 (org-table-previous-field, org-table-beginning-of-field): Better
5793 error messages. 5793 error messages.
5794 (orgtbl-setup): Include `M-a' and `M-e'. 5794 (orgtbl-setup): Include `M-a' and `M-e'.
@@ -5954,7 +5954,7 @@
5954 (org-export-plist-vars): Add entries for :keywords and 5954 (org-export-plist-vars): Add entries for :keywords and
5955 :description. 5955 :description.
5956 (org-infile-export-plist): Parse for new keywords. 5956 (org-infile-export-plist): Parse for new keywords.
5957 (org-get-current-options): Add new keywords 5957 (org-get-current-options): Add new keywords.
5958 (org-export-as-html): Publish description and keywords. 5958 (org-export-as-html): Publish description and keywords.
5959 5959
5960 * org-agenda.el (org-agenda-add-entry-text-descriptive-links): New 5960 * org-agenda.el (org-agenda-add-entry-text-descriptive-links): New
@@ -7770,7 +7770,7 @@
7770 immediately after the scheduling keywords. 7770 immediately after the scheduling keywords.
7771 7771
7772 * org-clock.el (org-clock-in-switch-to-state): Allow this to be a 7772 * org-clock.el (org-clock-in-switch-to-state): Allow this to be a
7773 function 7773 function.
7774 (org-clock-in): If `org-clock-in-switch-to-state' is a function, 7774 (org-clock-in): If `org-clock-in-switch-to-state' is a function,
7775 call it with the current todo state to get the state to switch to 7775 call it with the current todo state to get the state to switch to
7776 when clocking in. 7776 when clocking in.
@@ -7973,7 +7973,7 @@
7973 line. 7973 line.
7974 7974
7975 * org.el (org-get-refile-targets): Replace links with their 7975 * org.el (org-get-refile-targets): Replace links with their
7976 descriptions 7976 descriptions.
7977 (org-imenu-get-tree): Replace links with their descriptions. 7977 (org-imenu-get-tree): Replace links with their descriptions.
7978 7978
7979 * org-remember.el (org-remember-apply-template): Add a new 7979 * org-remember.el (org-remember-apply-template): Add a new
@@ -8017,7 +8017,7 @@
8017 (org-quote-chars): Remove. 8017 (org-quote-chars): Remove.
8018 (org-export-latex-keywords-maybe): Use `replace-regexp-in-string'. 8018 (org-export-latex-keywords-maybe): Use `replace-regexp-in-string'.
8019 (org-export-latex-list-beginning-re): Rename to 8019 (org-export-latex-list-beginning-re): Rename to
8020 `org-list-beginning-re' 8020 `org-list-beginning-re'.
8021 (org-list-item-begin): Rename to `org-list-item-beginning'. 8021 (org-list-item-begin): Rename to `org-list-item-beginning'.
8022 8022
80232008-10-12 Eric Schulte <schulte.eric@gmail.com> 80232008-10-12 Eric Schulte <schulte.eric@gmail.com>
@@ -8352,7 +8352,7 @@
8352 (org-map-entries): Make sure org-agenda-archives-mode is nil. 8352 (org-map-entries): Make sure org-agenda-archives-mode is nil.
8353 (org-agenda-files): Functionality of second arg changed. 8353 (org-agenda-files): Functionality of second arg changed.
8354 8354
8355 * org-agenda.el (org-agenda-archives-mode): New variable 8355 * org-agenda.el (org-agenda-archives-mode): New variable.
8356 (org-write-agenda, org-prepare-agenda, org-agenda-list) 8356 (org-write-agenda, org-prepare-agenda, org-agenda-list)
8357 (org-search-view, org-todo-list, org-tags-view) 8357 (org-search-view, org-todo-list, org-tags-view)
8358 (org-agenda-list-stuck-projects): Call `org-agenda-files' with 8358 (org-agenda-list-stuck-projects): Call `org-agenda-files' with
diff --git a/lisp/play/tetris.el b/lisp/play/tetris.el
index 00ebbae2814..68d1590e571 100644
--- a/lisp/play/tetris.el
+++ b/lisp/play/tetris.el
@@ -76,13 +76,12 @@ If the return value is a number, it is used as the timer period."
76 :type 'hook) 76 :type 'hook)
77 77
78(defcustom tetris-tty-colors 78(defcustom tetris-tty-colors
79 [nil "blue" "white" "yellow" "magenta" "cyan" "green" "red"] 79 ["blue" "white" "yellow" "magenta" "cyan" "green" "red"]
80 "Vector of colors of the various shapes in text mode. 80 "Vector of colors of the various shapes in text mode."
81Element 0 is ignored."
82 :group 'tetris 81 :group 'tetris
83 :type (let ((names `("Shape 1" "Shape 2" "Shape 3" 82 :type (let ((names `("Shape 1" "Shape 2" "Shape 3"
84 "Shape 4" "Shape 5" "Shape 6" "Shape 7")) 83 "Shape 4" "Shape 5" "Shape 6" "Shape 7"))
85 (result `(vector (const nil)))) 84 (result nil))
86 (while names 85 (while names
87 (add-to-list 'result 86 (add-to-list 'result
88 (cons 'choice 87 (cons 'choice
@@ -96,9 +95,8 @@ Element 0 is ignored."
96 result)) 95 result))
97 96
98(defcustom tetris-x-colors 97(defcustom tetris-x-colors
99 [nil [0 0 1] [0.7 0 1] [1 1 0] [1 0 1] [0 1 1] [0 1 0] [1 0 0]] 98 [[0 0 1] [0.7 0 1] [1 1 0] [1 0 1] [0 1 1] [0 1 0] [1 0 0]]
100 "Vector of colors of the various shapes. 99 "Vector of colors of the various shapes."
101Element 0 is ignored."
102 :group 'tetris 100 :group 'tetris
103 :type 'sexp) 101 :type 'sexp)
104 102
@@ -196,51 +194,44 @@ Element 0 is ignored."
196;; ;;;;;;;;;;;;; constants ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 194;; ;;;;;;;;;;;;; constants ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
197 195
198(defconst tetris-shapes 196(defconst tetris-shapes
199 [[[[1 1 0 0] [1 1 0 0] [1 1 0 0] [1 1 0 0]] 197 [[[[0 0] [1 0] [0 1] [1 1]]]
200 [[1 1 0 0] [1 1 0 0] [1 1 0 0] [1 1 0 0]] 198
201 [[0 0 0 0] [0 0 0 0] [0 0 0 0] [0 0 0 0]] 199 [[[0 0] [1 0] [2 0] [2 1]]
202 [[0 0 0 0] [0 0 0 0] [0 0 0 0] [0 0 0 0]]] 200 [[1 -1] [1 0] [1 1] [0 1]]
203 201 [[0 -1] [0 0] [1 0] [2 0]]
204 [[[2 2 2 0] [0 2 0 0] [2 0 0 0] [2 2 0 0]] 202 [[1 -1] [2 -1] [1 0] [1 1]]]
205 [[0 0 2 0] [0 2 0 0] [2 2 2 0] [2 0 0 0]] 203
206 [[0 0 0 0] [2 2 0 0] [0 0 0 0] [2 0 0 0]] 204 [[[0 0] [1 0] [2 0] [0 1]]
207 [[0 0 0 0] [0 0 0 0] [0 0 0 0] [0 0 0 0]]] 205 [[0 -1] [1 -1] [1 0] [1 1]]
208 206 [[2 -1] [0 0] [1 0] [2 0]]
209 [[[3 3 3 0] [3 3 0 0] [0 0 3 0] [3 0 0 0]] 207 [[1 -1] [1 0] [1 1] [2 1]]]
210 [[3 0 0 0] [0 3 0 0] [3 3 3 0] [3 0 0 0]] 208
211 [[0 0 0 0] [0 3 0 0] [0 0 0 0] [3 3 0 0]] 209 [[[0 0] [1 0] [1 1] [2 1]]
212 [[0 0 0 0] [0 0 0 0] [0 0 0 0] [0 0 0 0]]] 210 [[1 0] [0 1] [1 1] [0 2]]]
213 211
214 [[[4 4 0 0] [0 4 0 0] [4 4 0 0] [0 4 0 0]] 212 [[[1 0] [2 0] [0 1] [1 1]]
215 [[0 4 4 0] [4 4 0 0] [0 4 4 0] [4 4 0 0]] 213 [[0 0] [0 1] [1 1] [1 2]]]
216 [[0 0 0 0] [4 0 0 0] [0 0 0 0] [4 0 0 0]] 214
217 [[0 0 0 0] [0 0 0 0] [0 0 0 0] [0 0 0 0]]] 215 [[[1 0] [0 1] [1 1] [2 1]]
218 216 [[1 0] [1 1] [2 1] [1 2]]
219 [[[0 5 5 0] [5 0 0 0] [0 5 5 0] [5 0 0 0]] 217 [[0 1] [1 1] [2 1] [1 2]]
220 [[5 5 0 0] [5 5 0 0] [5 5 0 0] [5 5 0 0]] 218 [[1 0] [0 1] [1 1] [1 2]]]
221 [[0 0 0 0] [0 5 0 0] [0 0 0 0] [0 5 0 0]] 219
222 [[0 0 0 0] [0 0 0 0] [0 0 0 0] [0 0 0 0]]] 220 [[[0 0] [1 0] [2 0] [3 0]]
223 221 [[1 -1] [1 0] [1 1] [1 2]]]]
224 [[[0 6 0 0] [6 0 0 0] [6 6 6 0] [0 6 0 0]] 222 "Each shape is described by a vector that contains the coordinates of
225 [[6 6 6 0] [6 6 0 0] [0 6 0 0] [6 6 0 0]] 223each one of its four blocks.")
226 [[0 0 0 0] [6 0 0 0] [0 0 0 0] [0 6 0 0]]
227 [[0 0 0 0] [0 0 0 0] [0 0 0 0] [0 0 0 0]]]
228
229 [[[7 7 7 7] [7 0 0 0] [7 7 7 7] [7 0 0 0]]
230 [[0 0 0 0] [7 0 0 0] [0 0 0 0] [7 0 0 0]]
231 [[0 0 0 0] [7 0 0 0] [0 0 0 0] [7 0 0 0]]
232 [[0 0 0 0] [7 0 0 0] [0 0 0 0] [7 0 0 0]]]])
233 224
234;;the scoring rules were taken from "xtetris". Blocks score differently 225;;the scoring rules were taken from "xtetris". Blocks score differently
235;;depending on their rotation 226;;depending on their rotation
236 227
237(defconst tetris-shape-scores 228(defconst tetris-shape-scores
238 [ [6 6 6 6] [6 7 6 7] [6 7 6 7] [6 7 6 7] [6 7 6 7] [5 5 6 5] [5 8 5 8]] ) 229 [[6] [6 7 6 7] [6 7 6 7] [6 7] [6 7] [5 5 6 5] [5 8]] )
239 230
240(defconst tetris-shape-dimensions 231(defconst tetris-shape-dimensions
241 [[2 2] [3 2] [3 2] [3 2] [3 2] [3 2] [4 1]]) 232 [[2 2] [3 2] [3 2] [3 2] [3 2] [3 2] [4 1]])
242 233
243(defconst tetris-blank 0) 234(defconst tetris-blank 7)
244 235
245(defconst tetris-border 8) 236(defconst tetris-border 8)
246 237
@@ -299,7 +290,7 @@ Element 0 is ignored."
299 (aset options c 290 (aset options c
300 (cond ((= c tetris-blank) 291 (cond ((= c tetris-blank)
301 tetris-blank-options) 292 tetris-blank-options)
302 ((and (>= c 1) (<= c 7)) 293 ((and (>= c 0) (<= c 6))
303 (append 294 (append
304 tetris-cell-options 295 tetris-cell-options
305 `((((glyph color-x) ,(aref tetris-x-colors c)) 296 `((((glyph color-x) ,(aref tetris-x-colors c))
@@ -320,20 +311,16 @@ Element 0 is ignored."
320 tetris-n-rows nil))) 311 tetris-n-rows nil)))
321 (and (numberp period) period)))) 312 (and (numberp period) period))))
322 313
323(defun tetris-get-shape-cell (x y) 314(defun tetris-get-shape-cell (block)
324 (aref (aref (aref (aref tetris-shapes 315 (aref (aref (aref tetris-shapes
325 tetris-shape) 316 tetris-shape) tetris-rot)
326 y) 317 block))
327 tetris-rot)
328 x))
329 318
330(defun tetris-shape-width () 319(defun tetris-shape-width ()
331 (aref (aref tetris-shape-dimensions tetris-shape) 320 (aref (aref tetris-shape-dimensions tetris-shape) 0))
332 (% tetris-rot 2)))
333 321
334(defun tetris-shape-height () 322(defun tetris-shape-rotations ()
335 (aref (aref tetris-shape-dimensions tetris-shape) 323 (length (aref tetris-shapes tetris-shape)))
336 (- 1 (% tetris-rot 2))))
337 324
338(defun tetris-draw-score () 325(defun tetris-draw-score ()
339 (let ((strings (vector (format "Shapes: %05d" tetris-n-shapes) 326 (let ((strings (vector (format "Shapes: %05d" tetris-n-shapes)
@@ -365,52 +352,58 @@ Element 0 is ignored."
365 (tetris-update-score))) 352 (tetris-update-score)))
366 353
367(defun tetris-draw-next-shape () 354(defun tetris-draw-next-shape ()
368 (loop for y from 0 to 3 do 355 (loop for x from 0 to 3 do
369 (loop for x from 0 to 3 do 356 (loop for y from 0 to 3 do
370 (gamegrid-set-cell (+ tetris-next-x x) 357 (gamegrid-set-cell (+ tetris-next-x x)
371 (+ tetris-next-y y) 358 (+ tetris-next-y y)
372 (let ((tetris-shape tetris-next-shape) 359 tetris-blank)))
373 (tetris-rot 0)) 360 (loop for i from 0 to 3 do
374 (tetris-get-shape-cell x y)))))) 361 (let ((tetris-shape tetris-next-shape)
362 (tetris-rot 0))
363 (gamegrid-set-cell (+ tetris-next-x
364 (aref (tetris-get-shape-cell i) 0))
365 (+ tetris-next-y
366 (aref (tetris-get-shape-cell i) 1))
367 tetris-shape))))
375 368
376(defun tetris-draw-shape () 369(defun tetris-draw-shape ()
377 (loop for y from 0 to (1- (tetris-shape-height)) do 370 (loop for i from 0 to 3 do
378 (loop for x from 0 to (1- (tetris-shape-width)) do 371 (let ((c (tetris-get-shape-cell i)))
379 (let ((c (tetris-get-shape-cell x y))) 372 (gamegrid-set-cell (+ tetris-top-left-x
380 (if (/= c tetris-blank) 373 tetris-pos-x
381 (gamegrid-set-cell (+ tetris-top-left-x 374 (aref c 0))
382 tetris-pos-x 375 (+ tetris-top-left-y
383 x) 376 tetris-pos-y
384 (+ tetris-top-left-y 377 (aref c 1))
385 tetris-pos-y 378 tetris-shape))))
386 y)
387 c))))))
388 379
389(defun tetris-erase-shape () 380(defun tetris-erase-shape ()
390 (loop for y from 0 to (1- (tetris-shape-height)) do 381 (loop for i from 0 to 3 do
391 (loop for x from 0 to (1- (tetris-shape-width)) do 382 (let ((c (tetris-get-shape-cell i)))
392 (let ((c (tetris-get-shape-cell x y)) 383 (gamegrid-set-cell (+ tetris-top-left-x
393 (px (+ tetris-top-left-x tetris-pos-x x)) 384 tetris-pos-x
394 (py (+ tetris-top-left-y tetris-pos-y y))) 385 (aref c 0))
395 (if (/= c tetris-blank) 386 (+ tetris-top-left-y
396 (gamegrid-set-cell px py tetris-blank)))))) 387 tetris-pos-y
388 (aref c 1))
389 tetris-blank))))
397 390
398(defun tetris-test-shape () 391(defun tetris-test-shape ()
399 (let ((hit nil)) 392 (let ((hit nil))
400 (loop for y from 0 to (1- (tetris-shape-height)) do 393 (loop for i from 0 to 3 do
401 (loop for x from 0 to (1- (tetris-shape-width)) do 394 (unless hit
402 (unless hit 395 (setq hit
403 (setq hit 396 (let* ((c (tetris-get-shape-cell i))
404 (let* ((c (tetris-get-shape-cell x y)) 397 (xx (+ tetris-pos-x
405 (xx (+ tetris-pos-x x)) 398 (aref c 0)))
406 (yy (+ tetris-pos-y y)) 399 (yy (+ tetris-pos-y
407 (px (+ tetris-top-left-x xx)) 400 (aref c 1))))
408 (py (+ tetris-top-left-y yy))) 401 (or (>= xx tetris-width)
409 (and (/= c tetris-blank) 402 (>= yy tetris-height)
410 (or (>= xx tetris-width) 403 (/= (gamegrid-get-cell
411 (>= yy tetris-height) 404 (+ xx tetris-top-left-x)
412 (/= (gamegrid-get-cell px py) 405 (+ yy tetris-top-left-y))
413 tetris-blank)))))))) 406 tetris-blank))))))
414 hit)) 407 hit))
415 408
416(defun tetris-full-row (y) 409(defun tetris-full-row (y)
@@ -510,33 +503,30 @@ Drops the shape one square, testing for collision."
510(defun tetris-move-bottom () 503(defun tetris-move-bottom ()
511 "Drop the shape to the bottom of the playing area." 504 "Drop the shape to the bottom of the playing area."
512 (interactive) 505 (interactive)
513 (if (not tetris-paused) 506 (unless tetris-paused
514 (let ((hit nil)) 507 (let ((hit nil))
515 (tetris-erase-shape) 508 (tetris-erase-shape)
516 (while (not hit) 509 (while (not hit)
517 (setq tetris-pos-y (1+ tetris-pos-y)) 510 (setq tetris-pos-y (1+ tetris-pos-y))
518 (setq hit (tetris-test-shape))) 511 (setq hit (tetris-test-shape)))
519 (setq tetris-pos-y (1- tetris-pos-y)) 512 (setq tetris-pos-y (1- tetris-pos-y))
520 (tetris-draw-shape) 513 (tetris-draw-shape)
521 (tetris-shape-done)))) 514 (tetris-shape-done))))
522 515
523(defun tetris-move-left () 516(defun tetris-move-left ()
524 "Move the shape one square to the left." 517 "Move the shape one square to the left."
525 (interactive) 518 (interactive)
526 (unless (or (= tetris-pos-x 0) 519 (unless tetris-paused
527 tetris-paused)
528 (tetris-erase-shape) 520 (tetris-erase-shape)
529 (setq tetris-pos-x (1- tetris-pos-x)) 521 (setq tetris-pos-x (1- tetris-pos-x))
530 (if (tetris-test-shape) 522 (if (tetris-test-shape)
531 (setq tetris-pos-x (1+ tetris-pos-x))) 523 (setq tetris-pos-x (1+ tetris-pos-x)))
532 (tetris-draw-shape))) 524 (tetris-draw-shape)))
533 525
534(defun tetris-move-right () 526(defun tetris-move-right ()
535 "Move the shape one square to the right." 527 "Move the shape one square to the right."
536 (interactive) 528 (interactive)
537 (unless (or (= (+ tetris-pos-x (tetris-shape-width)) 529 (unless tetris-paused
538 tetris-width)
539 tetris-paused)
540 (tetris-erase-shape) 530 (tetris-erase-shape)
541 (setq tetris-pos-x (1+ tetris-pos-x)) 531 (setq tetris-pos-x (1+ tetris-pos-x))
542 (if (tetris-test-shape) 532 (if (tetris-test-shape)
@@ -546,23 +536,26 @@ Drops the shape one square, testing for collision."
546(defun tetris-rotate-prev () 536(defun tetris-rotate-prev ()
547 "Rotate the shape clockwise." 537 "Rotate the shape clockwise."
548 (interactive) 538 (interactive)
549 (if (not tetris-paused) 539 (unless tetris-paused
550 (progn (tetris-erase-shape) 540 (tetris-erase-shape)
551 (setq tetris-rot (% (+ 1 tetris-rot) 4)) 541 (setq tetris-rot (% (+ 1 tetris-rot)
552 (if (tetris-test-shape) 542 (tetris-shape-rotations)))
553 (setq tetris-rot (% (+ 3 tetris-rot) 4))) 543 (if (tetris-test-shape)
554 (tetris-draw-shape)))) 544 (setq tetris-rot (% (+ 3 tetris-rot)
545 (tetris-shape-rotations))))
546 (tetris-draw-shape)))
555 547
556(defun tetris-rotate-next () 548(defun tetris-rotate-next ()
557 "Rotate the shape anticlockwise." 549 "Rotate the shape anticlockwise."
558 (interactive) 550 (interactive)
559 (if (not tetris-paused) 551 (unless tetris-paused
560 (progn
561 (tetris-erase-shape) 552 (tetris-erase-shape)
562 (setq tetris-rot (% (+ 3 tetris-rot) 4)) 553 (setq tetris-rot (% (+ 3 tetris-rot)
554 (tetris-shape-rotations)))
563 (if (tetris-test-shape) 555 (if (tetris-test-shape)
564 (setq tetris-rot (% (+ 1 tetris-rot) 4))) 556 (setq tetris-rot (% (+ 1 tetris-rot)
565 (tetris-draw-shape)))) 557 (tetris-shape-rotations))))
558 (tetris-draw-shape)))
566 559
567(defun tetris-end-game () 560(defun tetris-end-game ()
568 "Terminate the current game." 561 "Terminate the current game."
diff --git a/lisp/progmodes/ps-mode.el b/lisp/progmodes/ps-mode.el
index 7b235bc3b68..387a0cb6e00 100644
--- a/lisp/progmodes/ps-mode.el
+++ b/lisp/progmodes/ps-mode.el
@@ -39,6 +39,7 @@
39(defconst ps-mode-version "1.1h, 16 Jun 2005") 39(defconst ps-mode-version "1.1h, 16 Jun 2005")
40(defconst ps-mode-maintainer-address "Peter Kleiweg <p.c.j.kleiweg@rug.nl>") 40(defconst ps-mode-maintainer-address "Peter Kleiweg <p.c.j.kleiweg@rug.nl>")
41 41
42(require 'comint)
42(require 'easymenu) 43(require 'easymenu)
43 44
44;; Define core `PostScript' group. 45;; Define core `PostScript' group.
@@ -431,12 +432,11 @@ If nil, use `temporary-file-directory'."
431 432
432(unless ps-run-mode-map 433(unless ps-run-mode-map
433 (setq ps-run-mode-map (make-sparse-keymap)) 434 (setq ps-run-mode-map (make-sparse-keymap))
435 (set-keymap-parent ps-run-mode-map comint-mode-map)
434 (define-key ps-run-mode-map "\C-c\C-q" 'ps-run-quit) 436 (define-key ps-run-mode-map "\C-c\C-q" 'ps-run-quit)
435 (define-key ps-run-mode-map "\C-c\C-k" 'ps-run-kill) 437 (define-key ps-run-mode-map "\C-c\C-k" 'ps-run-kill)
436 (define-key ps-run-mode-map "\C-c\C-e" 'ps-run-goto-error) 438 (define-key ps-run-mode-map "\C-c\C-e" 'ps-run-goto-error)
437 (define-key ps-run-mode-map [mouse-2] 'ps-run-mouse-goto-error) 439 (define-key ps-run-mode-map [mouse-2] 'ps-run-mouse-goto-error))
438 (define-key ps-run-mode-map "\r" 'ps-run-newline)
439 (define-key ps-run-mode-map [return] 'ps-run-newline))
440 440
441 441
442;; Syntax table. 442;; Syntax table.
@@ -718,12 +718,9 @@ defines the beginning of a group. These tokens are: { [ <<"
718 (blink-matching-open)) 718 (blink-matching-open))
719 719
720(defun ps-mode-other-newline () 720(defun ps-mode-other-newline ()
721 "Perform newline in `*ps run*' buffer." 721 "Perform newline in `*ps-run*' buffer."
722 (interactive) 722 (interactive)
723 (let ((buf (current-buffer))) 723 (ps-run-send-string ""))
724 (set-buffer "*ps run*")
725 (ps-run-newline)
726 (set-buffer buf)))
727 724
728 725
729;; Print PostScript. 726;; Print PostScript.
@@ -980,7 +977,7 @@ plus the usually uncoded characters inserted on positions 1 through 28."
980 977
981;; Interactive PostScript interpreter. 978;; Interactive PostScript interpreter.
982 979
983(define-derived-mode ps-run-mode fundamental-mode "Interactive PS" 980(define-derived-mode ps-run-mode comint-mode "Interactive PS"
984 "Major mode in interactive PostScript window. 981 "Major mode in interactive PostScript window.
985This mode is invoked from `ps-mode' and should not be called directly. 982This mode is invoked from `ps-mode' and should not be called directly.
986 983
@@ -1014,20 +1011,23 @@ This mode is invoked from `ps-mode' and should not be called directly.
1014 (setq init-file (ps-run-make-tmp-filename)) 1011 (setq init-file (ps-run-make-tmp-filename))
1015 (write-region (concat ps-run-init "\n") 0 init-file) 1012 (write-region (concat ps-run-init "\n") 0 init-file)
1016 (setq init-file (list init-file))) 1013 (setq init-file (list init-file)))
1017 (pop-to-buffer "*ps run*") 1014 (pop-to-buffer "*ps-run*")
1018 (ps-run-mode) 1015 (ps-run-mode)
1019 (when (process-status "ps-run") 1016 (when (process-status "ps-run")
1020 (delete-process "ps-run")) 1017 (delete-process "ps-run"))
1021 (erase-buffer) 1018 (erase-buffer)
1022 (setq command (append command init-file)) 1019 (setq command (append command init-file))
1023 (insert (mapconcat 'identity command " ") "\n") 1020 (insert (mapconcat 'identity command " ") "\n")
1024 (apply 'start-process "ps-run" "*ps run*" command) 1021 (apply 'make-comint "ps-run" (car command) nil (cdr command))
1022 (with-current-buffer "*ps-run*"
1023 (use-local-map ps-run-mode-map)
1024 (setq comint-prompt-regexp ps-run-prompt))
1025 (select-window oldwin))) 1025 (select-window oldwin)))
1026 1026
1027(defun ps-run-quit () 1027(defun ps-run-quit ()
1028 "Quit interactive PostScript." 1028 "Quit interactive PostScript."
1029 (interactive) 1029 (interactive)
1030 (ps-run-send-string "quit" t) 1030 (ps-run-send-string "quit")
1031 (ps-run-cleanup)) 1031 (ps-run-cleanup))
1032 1032
1033(defun ps-run-kill () 1033(defun ps-run-kill ()
@@ -1039,9 +1039,9 @@ This mode is invoked from `ps-mode' and should not be called directly.
1039(defun ps-run-clear () 1039(defun ps-run-clear ()
1040 "Clear/reset PostScript graphics." 1040 "Clear/reset PostScript graphics."
1041 (interactive) 1041 (interactive)
1042 (ps-run-send-string "showpage" t) 1042 (ps-run-send-string "showpage")
1043 (sit-for 1) 1043 (sit-for 1)
1044 (ps-run-send-string "" t)) 1044 (ps-run-send-string ""))
1045 1045
1046(defun ps-run-buffer () 1046(defun ps-run-buffer ()
1047 "Send buffer to PostScript interpreter." 1047 "Send buffer to PostScript interpreter."
@@ -1056,7 +1056,7 @@ This mode is invoked from `ps-mode' and should not be called directly.
1056 (let ((f (ps-run-make-tmp-filename))) 1056 (let ((f (ps-run-make-tmp-filename)))
1057 (set-marker ps-run-mark begin) 1057 (set-marker ps-run-mark begin)
1058 (write-region begin end f) 1058 (write-region begin end f)
1059 (ps-run-send-string (format "(%s) run" f) t))) 1059 (ps-run-send-string (format "(%s) run" f))))
1060 1060
1061(defun ps-run-boundingbox () 1061(defun ps-run-boundingbox ()
1062 "View BoundingBox." 1062 "View BoundingBox."
@@ -1104,17 +1104,15 @@ grestore
1104" x1 y1 x2 y1 x2 y2 x1 y2) 1104" x1 y1 x2 y1 x2 y2 x1 y2)
1105 0 1105 0
1106 f) 1106 f)
1107 (ps-run-send-string (format "(%s) run" f) t) 1107 (ps-run-send-string (format "(%s) run" f))
1108 (set-buffer buf))) 1108 (set-buffer buf)))
1109 1109
1110(defun ps-run-send-string (string &optional echo) 1110(defun ps-run-send-string (string)
1111 (let ((oldwin (selected-window))) 1111 (let ((oldwin (selected-window)))
1112 (pop-to-buffer "*ps run*") 1112 (pop-to-buffer "*ps-run*")
1113 (goto-char (point-max)) 1113 (comint-goto-process-mark)
1114 (when echo 1114 (insert string)
1115 (insert string "\n")) 1115 (comint-send-input)
1116 (set-marker (process-mark (get-process "ps-run")) (point))
1117 (process-send-string "ps-run" (concat string "\n"))
1118 (select-window oldwin))) 1116 (select-window oldwin)))
1119 1117
1120(defun ps-run-make-tmp-filename () 1118(defun ps-run-make-tmp-filename ()
@@ -1140,18 +1138,6 @@ grestore
1140 (mouse-set-point event) 1138 (mouse-set-point event)
1141 (ps-run-goto-error)) 1139 (ps-run-goto-error))
1142 1140
1143(defun ps-run-newline ()
1144 "Process newline in PostScript interpreter window."
1145 (interactive)
1146 (end-of-line)
1147 (insert "\n")
1148 (forward-line -1)
1149 (when (looking-at ps-run-prompt)
1150 (goto-char (match-end 0)))
1151 (looking-at ".*")
1152 (goto-char (1+ (match-end 0)))
1153 (ps-run-send-string (buffer-substring (match-beginning 0) (match-end 0))))
1154
1155(defun ps-run-goto-error () 1141(defun ps-run-goto-error ()
1156 "Jump to buffer position read as integer at point. 1142 "Jump to buffer position read as integer at point.
1157Use line numbers if `ps-run-error-line-numbers' is not nil" 1143Use line numbers if `ps-run-error-line-numbers' is not nil"
diff --git a/lwlib/ChangeLog b/lwlib/ChangeLog
index d591b93e50b..bf41caa8311 100644
--- a/lwlib/ChangeLog
+++ b/lwlib/ChangeLog
@@ -381,7 +381,7 @@
381 381
382 * xlwmenu.c (xlwMenuResources) [HAVE_X_I18N]: Use a fontset for the 382 * xlwmenu.c (xlwMenuResources) [HAVE_X_I18N]: Use a fontset for the
383 `font' resource. 383 `font' resource.
384 (string_width) [HAVE_X_I18N]: Use XmbTextExtents; 384 (string_width) [HAVE_X_I18N]: Use XmbTextExtents.
385 (MENU_FONT_HEIGHT, MENU_FONT_ASCENT): New macros. 385 (MENU_FONT_HEIGHT, MENU_FONT_ASCENT): New macros.
386 (arrow_width, toggle_button_width, size_menu_item, draw_arrow) 386 (arrow_width, toggle_button_width, size_menu_item, draw_arrow)
387 (draw_toggle, draw_radio, display_menu_item): Use them. 387 (draw_toggle, draw_radio, display_menu_item): Use them.
diff --git a/msdos/ChangeLog b/msdos/ChangeLog
index a7a72d233d5..77286687db0 100644
--- a/msdos/ChangeLog
+++ b/msdos/ChangeLog
@@ -173,7 +173,7 @@
173 (FONTCONFIG_CFLAGS, FONTCONFIG_LIBS, FREETYPE_CFLAGS, FREETYPE_LIBS) 173 (FONTCONFIG_CFLAGS, FONTCONFIG_LIBS, FREETYPE_CFLAGS, FREETYPE_LIBS)
174 (LIBOTF_CFLAGS, LIBOTF_LIBS, M17N_FLT_CFLAGS, M17N_FLT_LIBS) 174 (LIBOTF_CFLAGS, LIBOTF_LIBS, M17N_FLT_CFLAGS, M17N_FLT_LIBS)
175 (GNU_OBJC_CFLAGS, GNUSTEP_SYSTEM_LIBRARIES, LIBRESOLV, LIBGPM): 175 (GNU_OBJC_CFLAGS, GNUSTEP_SYSTEM_LIBRARIES, LIBRESOLV, LIBGPM):
176 Edit to empty, 176 Edit to empty.
177 (LIB_MATH): Edit to -lm. 177 (LIB_MATH): Edit to -lm.
178 (UNEXEC_OBJ): Edit to unexec.o. 178 (UNEXEC_OBJ): Edit to unexec.o.
179 179
@@ -908,7 +908,7 @@
9081994-10-17 Morten Welinder <terra@mole.gnu.ai.mit.edu> 9081994-10-17 Morten Welinder <terra@mole.gnu.ai.mit.edu>
909 909
910 * sed1.inp: Handle "\t#"-style comments. 910 * sed1.inp: Handle "\t#"-style comments.
911 (obj): Don't add any files -- now done in src/makefile.in.in 911 (obj): Don't add any files -- now done in src/makefile.in.in.
912 (temacs): Don't depend on prefix-args. 912 (temacs): Don't depend on prefix-args.
913 (DOC): Reflect makefile changes regarding two-batch run. 913 (DOC): Reflect makefile changes regarding two-batch run.
914 914
diff --git a/nt/ChangeLog b/nt/ChangeLog
index 08f12203ec1..4dfdd16fd32 100644
--- a/nt/ChangeLog
+++ b/nt/ChangeLog
@@ -1,3 +1,30 @@
12010-07-25 Christoph Scholtes <cschol2112@gmail.com>
2
3 Build binary distros on Windows using emacs-VERSION as root dir name.
4
5 * makefile.w32-in: Copy README.W32 to installation directory
6 during `make install'. Remove README.W32 with `distclean' (in
7 case Emacs was installed in place). Use temporary directory to
8 create distribution zip files in `dist' target.
9 * zipdist.bat: Simplify code using temporary directory.
10
112010-07-25 Juanma Barranquero <lekktu@gmail.com>
12
13 * runemacs.c (set_user_model_id): Fix prototype.
14
152010-07-24 Christoph Scholtes <cschol2112@gmail.com>
16
17 New make target for Windows platform: make dist (bug#6602)
18
19 * INSTALL: Document new dist target and add section about
20 creating binary distributions.
21 * README.W32: Relocate from admin/nt/ directory.
22 * configure.bat: New parameter `--distfiles'.
23 * makefile.w32-in: Add version number, new target `dist'.
24 Add new target `install-shortcuts'.
25 * zipdist.bat: New file; create zipped binary distribution,
26 replaces admin/nt/makedist.bat.
27
12010-07-21 Juanma Barranquero <lekktu@gmail.com> 282010-07-21 Juanma Barranquero <lekktu@gmail.com>
2 29
3 * INSTALL: Add note about backslashes in Windows paths. 30 * INSTALL: Add note about backslashes in Windows paths.
diff --git a/nt/INSTALL b/nt/INSTALL
index 1f1f75395f7..8af8e3020de 100644
--- a/nt/INSTALL
+++ b/nt/INSTALL
@@ -406,6 +406,9 @@
406 Removes the installed files in the bin subdirectory in addition to 406 Removes the installed files in the bin subdirectory in addition to
407 the files removed by make cleanall. 407 the files removed by make cleanall.
408 408
409 make dist
410 Builds Emacs from the available sources and pre-compiled lisp files.
411 Packages Emacs binaries as full distribution and barebin distribution.
409 412
410 The following targets are intended only for use with the Bazaar sources. 413 The following targets are intended only for use with the Bazaar sources.
411 414
@@ -428,6 +431,32 @@
428 bootstrap to rebuild. Occasionally it may be necessary to run this 431 bootstrap to rebuild. Occasionally it may be necessary to run this
429 target after an update. 432 target after an update.
430 433
434* Creating binary distributions
435
436 Binary distributions (full and barebin distributions) can be
437 automatically built and packaged from source tarballs or a bzr
438 checkout.
439
440 When building Emacs binary distributions, the --distfiles argument
441 to configure.bat specifies files to be included in the bin directory
442 of the binary distributions. This is intended for libraries that are
443 not built as part of Emacs, e.g. image libraries.
444
445 For example, specifying
446
447 --distfiles D:\distfiles\libXpm.dll
448
449 results in libXpm.dll being copied from D:\distfiles to the
450 bin directory before packaging starts.
451
452 Multiple files can be specified using multiple --distfiles arguments:
453
454 --distfiles D:\distfiles\libXpm.dll --distfiles C:\jpeglib\jpeg.dll
455
456 For packaging the binary distributions, the 'dist' make target uses
457 7-Zip (http://www.7-zip.org), which must be installed and available
458 on the Windows Path.
459
431 460
432* Trouble-shooting 461* Trouble-shooting
433 462
diff --git a/admin/nt/README.W32 b/nt/README.W32
index 9f1df8abd3a..9f1df8abd3a 100644
--- a/admin/nt/README.W32
+++ b/nt/README.W32
diff --git a/nt/configure.bat b/nt/configure.bat
index 705d4e92717..c7bfad35189 100755
--- a/nt/configure.bat
+++ b/nt/configure.bat
@@ -90,6 +90,8 @@ set userldflags=
90set doldflags= 90set doldflags=
91set sep1= 91set sep1=
92set sep2= 92set sep2=
93set sep3=
94set distfiles=
93 95
94rem ---------------------------------------------------------------------- 96rem ----------------------------------------------------------------------
95rem Handle arguments. 97rem Handle arguments.
@@ -112,6 +114,7 @@ if "%1" == "--without-gif" goto withoutgif
112if "%1" == "--without-tiff" goto withouttiff 114if "%1" == "--without-tiff" goto withouttiff
113if "%1" == "--without-xpm" goto withoutxpm 115if "%1" == "--without-xpm" goto withoutxpm
114if "%1" == "--with-svg" goto withsvg 116if "%1" == "--with-svg" goto withsvg
117if "%1" == "--distfiles" goto distfiles
115if "%1" == "" goto checkutils 118if "%1" == "" goto checkutils
116:usage 119:usage
117echo Usage: configure [options] 120echo Usage: configure [options]
@@ -132,6 +135,7 @@ echo. --without-gif do not use GIF library even if it is installed
132echo. --without-tiff do not use TIFF library even if it is installed 135echo. --without-tiff do not use TIFF library even if it is installed
133echo. --without-xpm do not use XPM library even if it is installed 136echo. --without-xpm do not use XPM library even if it is installed
134echo. --with-svg use the RSVG library (experimental) 137echo. --with-svg use the RSVG library (experimental)
138echo. --distfiles path to files for make dist, e.g. libXpm.dll
135goto end 139goto end
136rem ---------------------------------------------------------------------- 140rem ----------------------------------------------------------------------
137:setprefix 141:setprefix
@@ -234,6 +238,16 @@ set svgsupport=Y
234goto again 238goto again
235 239
236rem ---------------------------------------------------------------------- 240rem ----------------------------------------------------------------------
241
242:distfiles
243set HAVE_DISTFILES=1
244shift
245set distfiles=%distfiles%%sep3%%1
246set sep3= %nothing%
247shift
248goto again
249
250rem ----------------------------------------------------------------------
237rem Check that necessary utilities (cp and rm) are present. 251rem Check that necessary utilities (cp and rm) are present.
238:checkutils 252:checkutils
239echo Checking for 'cp'... 253echo Checking for 'cp'...
@@ -521,6 +535,35 @@ set HAVE_RSVG=1
521:svgDone 535:svgDone
522rm -f junk.c junk.obj junk.err junk.out 536rm -f junk.c junk.obj junk.err junk.out
523 537
538rem Any distfiles provided for building distribution? If no, we're done.
539if "(%HAVE_DISTFILES%)"=="()" goto :distFilesDone
540
541rem Any arguments to --distfiles specified? If no, we're done.
542if not "%distfiles%"=="" goto :checkDistFiles
543set distFilesOk=0
544echo No arguments specified for option --distfiles!
545goto distfilesDone
546
547:checkDistFiles
548echo Checking for distfiles...
549rem Check if all specified distfiles exist
550set fileNotFound=
551for %%d in (%distfiles%) do if not exist %%d set fileNotFound=%%d
552if not "%fileNotFound%"=="" goto distFilesNotFound
553
554set distFilesOK=1
555echo ...all distfiles found.
556goto :distFilesDone
557
558:distFilesNotFound
559set distFilesOk=0
560echo ...%fileNotFound% not found.
561set distfiles=
562goto :distfilesDone
563
564:distFilesDone
565set fileNotFound=
566
524rem ---------------------------------------------------------------------- 567rem ----------------------------------------------------------------------
525:genmakefiles 568:genmakefiles
526echo Generating makefiles 569echo Generating makefiles
@@ -541,6 +584,7 @@ if (%enablechecking%) == (Y) echo ENABLECHECKS=1 >>config.settings
541if (%profile%) == (Y) echo PROFILE=1 >>config.settings 584if (%profile%) == (Y) echo PROFILE=1 >>config.settings
542if (%nocygwin%) == (Y) echo NOCYGWIN=1 >>config.settings 585if (%nocygwin%) == (Y) echo NOCYGWIN=1 >>config.settings
543if not "(%prefix%)" == "()" echo INSTALL_DIR=%prefix%>>config.settings 586if not "(%prefix%)" == "()" echo INSTALL_DIR=%prefix%>>config.settings
587if not "(%distfiles%)" == "()" echo DIST_FILES=%distfiles%>>config.settings
544rem We go thru docflags because usercflags could be "-DFOO=bar" -something 588rem We go thru docflags because usercflags could be "-DFOO=bar" -something
545rem and the if command cannot cope with this 589rem and the if command cannot cope with this
546for %%v in (%usercflags%) do if not (%%v)==() set docflags=Y 590for %%v in (%usercflags%) do if not (%%v)==() set docflags=Y
@@ -642,12 +686,19 @@ if (%tiffsupport%) == (N) goto checkgif
642 echo Install libtiff development files or use --without-tiff 686 echo Install libtiff development files or use --without-tiff
643 687
644:checkgif 688:checkgif
645if not "(%HAVE_GIF%)" == "()" goto donelibchecks 689if not "(%HAVE_GIF%)" == "()" goto checkdistfiles
646if (%gifsupport%) == (N) goto donelibchecks 690if (%gifsupport%) == (N) goto checkdistfiles
647 set libsOK=0 691 set libsOK=0
648 echo GIF support is missing. 692 echo GIF support is missing.
649 echo Install giflib or libungif development files or use --without-gif 693 echo Install giflib or libungif development files or use --without-gif
650 694
695:checkdistfiles
696if "(%HAVE_DISTFILES%)" == "()" goto donelibchecks
697if (%distFilesOk%) == (1) goto donelibchecks
698echo.
699echo Files specified with option --distfiles could not be found.
700echo Fix these issues before running make dist
701
651:donelibchecks 702:donelibchecks
652if (%libsOK%) == (1) goto success 703if (%libsOK%) == (1) goto success
653echo. 704echo.
@@ -680,6 +731,9 @@ set userldflags=
680set doldflags= 731set doldflags=
681set mingwflag= 732set mingwflag=
682set mf= 733set mf=
734set distfiles=
735set HAVE_DISTFILES=
736set distFilesOk=
683 737
684goto skipArchTag 738goto skipArchTag
685 arch-tag: 300d20a4-1675-4e75-b615-7ce1a8c5376c 739 arch-tag: 300d20a4-1675-4e75-b615-7ce1a8c5376c
diff --git a/nt/makefile.w32-in b/nt/makefile.w32-in
index 48b3ab14056..b0f5edb28a2 100644
--- a/nt/makefile.w32-in
+++ b/nt/makefile.w32-in
@@ -23,6 +23,10 @@
23# FIXME: This file uses DOS EOLs. Convert to Unix after 22.1 is out 23# FIXME: This file uses DOS EOLs. Convert to Unix after 22.1 is out
24# (and remove or replace this comment). 24# (and remove or replace this comment).
25 25
26VERSION = 24.0.50
27
28TMP_DIST_DIR = emacs-$(VERSION)
29
26TRES = $(BLD)/emacs.res 30TRES = $(BLD)/emacs.res
27CLIENTRES = $(BLD)/emacsclient.res 31CLIENTRES = $(BLD)/emacsclient.res
28 32
@@ -197,12 +201,16 @@ $(INSTALL_DIR)/bin: $(INSTALL_DIR)
197# 201#
198# Build and install emacs in INSTALL_DIR 202# Build and install emacs in INSTALL_DIR
199# 203#
200install: all $(INSTALL_DIR)/bin install-other-dirs-$(MAKETYPE) 204.PHONY: install-bin install-shortcuts
205
206install: install-bin install-shortcuts
207
208install-bin: all $(INSTALL_DIR)/bin install-other-dirs-$(MAKETYPE)
201 - $(CP) $(BLD)/addpm.exe $(INSTALL_DIR)/bin 209 - $(CP) $(BLD)/addpm.exe $(INSTALL_DIR)/bin
202 - $(CP) $(BLD)/ddeclient.exe $(INSTALL_DIR)/bin 210 - $(CP) $(BLD)/ddeclient.exe $(INSTALL_DIR)/bin
203 - $(CP) $(BLD)/cmdproxy.exe $(INSTALL_DIR)/bin 211 - $(CP) $(BLD)/cmdproxy.exe $(INSTALL_DIR)/bin
204 - $(CP) $(BLD)/runemacs.exe $(INSTALL_DIR)/bin 212 - $(CP) $(BLD)/runemacs.exe $(INSTALL_DIR)/bin
205 - "$(INSTALL_DIR)/bin/addpm" -q 213 - $(CP) README.W32 $(INSTALL_DIR)
206 - $(DEL) ../same-dir.tst 214 - $(DEL) ../same-dir.tst
207 - $(DEL) $(INSTALL_DIR)/same-dir.tst 215 - $(DEL) $(INSTALL_DIR)/same-dir.tst
208 echo SameDirTest > "$(INSTALL_DIR)/same-dir.tst" 216 echo SameDirTest > "$(INSTALL_DIR)/same-dir.tst"
@@ -238,6 +246,26 @@ install-other-dirs-gmake:
238 $(MAKE) $(MFLAGS) $(XMFLAGS) -C ../lisp install 246 $(MAKE) $(MFLAGS) $(XMFLAGS) -C ../lisp install
239 $(MAKE) $(MFLAGS) $(XMFLAGS) -C ../leim install 247 $(MAKE) $(MFLAGS) $(XMFLAGS) -C ../leim install
240 248
249install-shortcuts:
250 "$(INSTALL_DIR)/bin/addpm" -q
251
252dist: install-bin
253 mkdir $(TMP_DIST_DIR)
254 $(CP) "$(INSTALL_DIR)/BUGS" $(TMP_DIST_DIR)
255 $(CP) "$(INSTALL_DIR)/COPYING" $(TMP_DIST_DIR)
256 $(CP) "$(INSTALL_DIR)/README" $(TMP_DIST_DIR)
257 $(CP) "$(INSTALL_DIR)/README.W32" $(TMP_DIST_DIR)
258 $(CP) "$(INSTALL_DIR)/INSTALL" $(TMP_DIST_DIR)
259 $(CP_DIR) "$(INSTALL_DIR)/bin" $(TMP_DIST_DIR)
260 $(CP_DIR) "$(INSTALL_DIR)/etc" $(TMP_DIST_DIR)
261 $(CP_DIR) "$(INSTALL_DIR)/info" $(TMP_DIST_DIR)
262 $(CP_DIR) "$(INSTALL_DIR)/lisp" $(TMP_DIST_DIR)
263 $(CP_DIR) "$(INSTALL_DIR)/leim" $(TMP_DIST_DIR)
264 $(CP_DIR) "$(INSTALL_DIR)/site-lisp" $(TMP_DIST_DIR)
265 $(CP_DIR) $(DIST_FILES) $(TMP_DIST_DIR)/bin
266 $(COMSPEC)$(ComSpec) /c $(ARGQUOTE)zipdist.bat $(VERSION)$(ARGQUOTE)
267 $(DEL_TREE) $(TMP_DIST_DIR)
268
241force-info: 269force-info:
242# Note that doc/emacs/makefile knows how to 270# Note that doc/emacs/makefile knows how to
243# put the info files in $(infodir), 271# put the info files in $(infodir),
@@ -323,6 +351,7 @@ top-distclean:
323 - $(DEL) stamp_BLD 351 - $(DEL) stamp_BLD
324 - $(DEL) ../etc/DOC ../etc/DOC-X 352 - $(DEL) ../etc/DOC ../etc/DOC-X
325 - $(DEL) config.log Makefile 353 - $(DEL) config.log Makefile
354 - $(DEL) ../README.W32
326 355
327distclean: distclean-other-dirs-$(MAKETYPE) top-distclean 356distclean: distclean-other-dirs-$(MAKETYPE) top-distclean
328 357
diff --git a/nt/runemacs.c b/nt/runemacs.c
index d28d677dca8..f4d72062620 100644
--- a/nt/runemacs.c
+++ b/nt/runemacs.c
@@ -43,7 +43,7 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
43#include <string.h> 43#include <string.h>
44#include <malloc.h> 44#include <malloc.h>
45 45
46static void set_user_model_id (); 46static void set_user_model_id (void);
47 47
48int WINAPI 48int WINAPI
49WinMain (HINSTANCE hSelf, HINSTANCE hPrev, LPSTR cmdline, int nShow) 49WinMain (HINSTANCE hSelf, HINSTANCE hPrev, LPSTR cmdline, int nShow)
diff --git a/nt/zipdist.bat b/nt/zipdist.bat
new file mode 100644
index 00000000000..af90f6173b9
--- /dev/null
+++ b/nt/zipdist.bat
@@ -0,0 +1,49 @@
1@echo off
2rem Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010
3rem Free Software Foundation, Inc.
4
5rem Author: Christoph Scholtes cschol2112 at gmail.com
6
7rem This file is part of GNU Emacs.
8
9rem GNU Emacs is free software: you can redistribute it and/or modify
10rem it under the terms of the GNU General Public License as published by
11rem the Free Software Foundation, either version 3 of the License, or
12rem (at your option) any later version.
13
14rem GNU Emacs is distributed in the hope that it will be useful,
15rem but WITHOUT ANY WARRANTY; without even the implied warranty of
16rem MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17rem GNU General Public License for more details.
18
19rem You should have received a copy of the GNU General Public License
20rem along with GNU Emacs. If not, see http://www.gnu.org/licenses/.
21
22SETLOCAL
23rem arg 1: Emacs version number
24set EMACS_VER=%1
25
26set TMP_DIST_DIR=emacs-%EMACS_VER%
27
28rem Check, if 7zip is installed and available on path
29:ZIP_CHECK
307z
31if %ERRORLEVEL% NEQ 0 goto :ZIP_ERROR
32goto ZIP_DIST
33
34:ZIP_ERROR
35echo.
36echo ERROR: Make sure 7zip is installed and available on the Windows Path!
37goto EXIT
38
39rem Build distributions
40:ZIP_DIST
41rem Build and verify full distribution
427z a -bd -tZIP -mx=9 -x!.bzrignore -x!.gitignore -xr!emacs.mdp -xr!*.pdb -xr!*.opt -xr!*~ -xr!CVS -xr!.arch-inventory emacs-%EMACS_VER%-bin-i386.zip %TMP_DIST_DIR%
437z t emacs-%EMACS_VER%-bin-i386.zip
44rem Build and verify binary only distribution
457z a -bd -tZIP -mx=9 -x!.bzrignore -x!.gitignore -xr!emacs.mdp -xr!*.pdb -xr!*.opt -xr!*~ -xr!CVS -xr!.arch-inventory emacs-%EMACS_VER%-barebin-i386.zip %TMP_DIST_DIR%/README.W32 %TMP_DIST_DIR%/bin %TMP_DIST_DIR%/etc/DOC-X %TMP_DIST_DIR%/COPYING
467z t emacs-%EMACS_VER%-barebin-i386.zip
47goto EXIT
48
49:EXIT
diff --git a/oldXMenu/ChangeLog b/oldXMenu/ChangeLog
index cc6bcc92727..f05553a38b3 100644
--- a/oldXMenu/ChangeLog
+++ b/oldXMenu/ChangeLog
@@ -137,8 +137,8 @@
137 * Activate.c: Add calls to GrabKeyboard to remove strange 137 * Activate.c: Add calls to GrabKeyboard to remove strange
138 interactions with window managers that steal keypresses. 138 interactions with window managers that steal keypresses.
139 Call ungrab_all instead of XtUngrabPointer. 139 Call ungrab_all instead of XtUngrabPointer.
140 (XMenuActivate): Add call to XGrabKeyboard 140 (XMenuActivate): Add call to XGrabKeyboard.
141 (XMenuActivate): Add call to XUngrabKeyboard 141 (XMenuActivate): Add call to XUngrabKeyboard.
142 142
1432001-10-20 Gerd Moellmann <gerd@gnu.org> 1432001-10-20 Gerd Moellmann <gerd@gnu.org>
144 144
diff --git a/src/ChangeLog b/src/ChangeLog
index 7e79e65b0c9..3e750aed54b 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -3,6 +3,94 @@
3 * font.c (Ffont_shape_gstring): Terminate GSTRING by nil if the 3 * font.c (Ffont_shape_gstring): Terminate GSTRING by nil if the
4 number of glyphs gets smaller than the original length. 4 number of glyphs gets smaller than the original length.
5 5
62010-07-26 Juanma Barranquero <lekktu@gmail.com>
7
8 * lread.c (unreadpure, mapatoms_1): Make static.
9
102010-07-25 Juanma Barranquero <lekktu@gmail.com>
11
12 * terminfo.c (tparam): Fix prototype of tparm.
13
142010-07-25 Andreas Schwab <schwab@linux-m68k.org>
15
16 * emacs.c (main) [PROFILING]: Use __executable_start if defined to
17 find start of text segment.
18 * dispnew.c (safe_bcopy): Don't define if HAVE___EXECUTABLE_START
19 is defined.
20
21 * callproc.c (set_initial_environment): Avoid unbalanced braces.
22
232010-07-25 Ken Brown <kbrown@cornell.edu>
24
25 * vm-limit.c (check_memory_limits): Fix previous change;
26 accidentally reverted an earlier change.
27
282010-07-25 Ken Brown <kbrown@cornell.edu>
29
30 * mem-limits.h (BSD4_2) [cygwin]: Don't define here; instead...
31 * vm-limit.c: ...add 'defined (CYGWIN)' here (Bug#6715).
32
332010-07-25 Juanma Barranquero <lekktu@gmail.com>
34
35 * callproc.c (relocate_fd): Set inside #ifndef WINDOWSNT.
36 * dired.c (opendir, readdir): Fix prototypes.
37 * editfns.c (w32_get_internal_run_time): Fix prototypes.
38 * keyboard.c (input_available_signal): Declare inside #ifdef SIGIO.
39 * ndir.h (opendir, readdir, seekdir, closedir): Fix prototypes.
40 (telldir): Remove declaration.
41 * ralloc.c (real_morecore, __morecore): Fix prototypes.
42 * sound.c (alsa_sound_perror): Declare inside #ifdef HAVE_ALSA.
43 * syssignal.h (strsignal): Fix prototype.
44 * term.c (tparam): Fix prototype.
45 (term_get_fkeys_address, term_get_fkeys_kboard, term_get_fkeys_1)
46 (term_get_fkeys): Set inside "#ifndef DOS_NT".
47 * vm-limit.c (check_memory_limits): Fix prototypes of real_morecore
48 and __morecore.
49 * w32gui.h (XParseGeometry): Fix prototype.
50 * w32heap.h (get_data_start, get_data_end, init_heap): Fix prototypes.
51 * w32term.c (my_set_focus): Declare inside #if 0.
52 * w32term.h (x_window_to_frame, x_display_info_for_name, w32_term_init)
53 (w32_fill_rect, w32_clear_window, init_crit, delete_crit, signal_quit)
54 (drain_message_queue, get_next_msg, post_msg, parse_button)
55 (ClipboardSequence_Proc): Fix prototypes.
56 (wait_for_sync): Remove declaration.
57
582010-07-24 Juanma Barranquero <lekktu@gmail.com>
59
60 * w32fns.c (w32_to_x_color): Remove, unused.
61
622010-07-24 Andreas Schwab <schwab@linux-m68k.org>
63
64 * lisp.h: Remove leftover P_.
65
662010-07-24 Dan Nicolaescu <dann@ics.uci.edu>
67
68 * ecrt0.c, unexalpha.c: Remove files, unused.
69
702010-07-24 Andreas Schwab <schwab@linux-m68k.org>
71
72 * cmds.c (internal_self_insert): Make static.
73 * lisp.h (internal_self_insert): Remove declaration.
74
752010-07-23 Juanma Barranquero <lekktu@gmail.com>
76
77 * alloc.c (free_float):
78 * font.c [ENABLE_CHECKING] (font_match_xlfd, font_check_xlfd_parse):
79 * frame.c (delete_frame_handler):
80 * ralloc.c (reorder_bloc):
81 * w32menu.c (menubar_id_to_frame, add_left_right_boundary):
82 Remove unused static functions.
83
84 * menu.c (cleanup_popup_menu): Set inside "#ifdef HAVE_NS";
85 it is called only from NS code.
86
87 * w32term.c (my_set_focus): #ifdef away; it is called only from
88 "#ifdef 0" code.
89
90 * w32fns.c (x_edge_detection):
91 * xfaces.c (may_use_scalable_font_p):
92 Remove obsolete static declarations.
93
62010-07-20 Juanma Barranquero <lekktu@gmail.com> 942010-07-20 Juanma Barranquero <lekktu@gmail.com>
7 95
8 * alloc.c (emacs_blocked_free, emacs_blocked_malloc) 96 * alloc.c (emacs_blocked_free, emacs_blocked_malloc)
@@ -2732,7 +2820,7 @@
2732 (struct xsettings): Add font and tb_style, set xft stuff inside #ifdef 2820 (struct xsettings): Add font and tb_style, set xft stuff inside #ifdef
2733 HAVE_XFT. 2821 HAVE_XFT.
2734 (something_changedCB): store_font_changed_event is now 2822 (something_changedCB): store_font_changed_event is now
2735 store_config_changed_event 2823 store_config_changed_event.
2736 (parse_settings): Rename from parse_xft_settings. Read 2824 (parse_settings): Rename from parse_xft_settings. Read
2737 non-xft xsettings outside #ifdef HAVE_XFT. 2825 non-xft xsettings outside #ifdef HAVE_XFT.
2738 (read_settings): Renamed from read_xft_settings. 2826 (read_settings): Renamed from read_xft_settings.
@@ -4481,7 +4569,7 @@
4481 (scroll_end_callback): Remove. 4569 (scroll_end_callback): Remove.
4482 (xg_create_scroll_bar): Add parameter end_callback, bind it to 4570 (xg_create_scroll_bar): Add parameter end_callback, bind it to
4483 button-release-event. Replace value-changed event with change-value, 4571 button-release-event. Replace value-changed event with change-value,
4484 bug #5177, 4572 bug #5177.
4485 (xg_event_is_for_scrollbar): Only return true if button is less than 4, 4573 (xg_event_is_for_scrollbar): Only return true if button is less than 4,
4486 bug #5177. 4574 bug #5177.
4487 4575
@@ -4502,7 +4590,7 @@
4502 4590
45032009-12-12 Eli Zaretskii <eliz@gnu.org> 45912009-12-12 Eli Zaretskii <eliz@gnu.org>
4504 4592
4505 * dispextern.h (struct text_pos): Use EMACS_INT; 4593 * dispextern.h (struct text_pos): Use EMACS_INT.
4506 (struct glyph): Use EMACS_INT for charpos. 4594 (struct glyph): Use EMACS_INT for charpos.
4507 (struct it): Use EMACS_INT for stop_charpos, end_charpos, 4595 (struct it): Use EMACS_INT for stop_charpos, end_charpos,
4508 region_beg_charpos, region_end_charpos, 4596 region_beg_charpos, region_end_charpos,
@@ -12068,8 +12156,8 @@
120682008-07-15 Chris Hall <chris@web.workinglinux.com> (tiny change) 121562008-07-15 Chris Hall <chris@web.workinglinux.com> (tiny change)
12069 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp> 12157 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
12070 12158
12071 (make_initial_frame): Call init_frame_faces(f) in CANNOT_DUMP case -- 12159 * frame.c (make_initial_frame): Call init_frame_faces(f) in
12072 fix crash due to different init order. 12160 CANNOT_DUMP case -- fix crash due to different init order.
12073 12161
120742008-07-15 Adrian Robert <Adrian.B.Robert@gmail.com> 121622008-07-15 Adrian Robert <Adrian.B.Robert@gmail.com>
12075 12163
@@ -12266,7 +12354,7 @@
12266 * m/macppc.h: 12354 * m/macppc.h:
12267 * m/alpha.h: Use GNU_LINUX instead of LINUX. Reorganize conditionals. 12355 * m/alpha.h: Use GNU_LINUX instead of LINUX. Reorganize conditionals.
12268 12356
12269 * m/ibms390x.h (XINT, XUINT): Don't define, same as the default 12357 * m/ibms390x.h (XINT, XUINT): Don't define, same as the default.
12270 (SPECIAL_EMACS_INT): 12358 (SPECIAL_EMACS_INT):
12271 * m/ia64.h (SPECIAL_EMACS_INT): 12359 * m/ia64.h (SPECIAL_EMACS_INT):
12272 * m/amdx86-64.h (SPECIAL_EMACS_INT): 12360 * m/amdx86-64.h (SPECIAL_EMACS_INT):
diff --git a/src/ChangeLog.10 b/src/ChangeLog.10
index 24818e6770f..dd847f8a64e 100644
--- a/src/ChangeLog.10
+++ b/src/ChangeLog.10
@@ -3252,7 +3252,7 @@
32522006-07-02 Kim F. Storm <storm@cua.dk> 32522006-07-02 Kim F. Storm <storm@cua.dk>
3253 3253
3254 * xdisp.c (display_tool_bar_line): Skip glyphs which are too big 3254 * xdisp.c (display_tool_bar_line): Skip glyphs which are too big
3255 to ever fit the tool-bar, 3255 to ever fit the tool-bar.
3256 (MAX_FRAME_TOOL_BAR_HEIGHT): New macro. 3256 (MAX_FRAME_TOOL_BAR_HEIGHT): New macro.
3257 (tool_bar_lines_needed): Use unused mode-line row as temp_row. 3257 (tool_bar_lines_needed): Use unused mode-line row as temp_row.
3258 (redisplay_tool_bar): Only clear desired matrix if we actually 3258 (redisplay_tool_bar): Only clear desired matrix if we actually
@@ -7869,7 +7869,7 @@
7869 7869
78702005-07-19 Juanma Barranquero <lekktu@gmail.com> 78702005-07-19 Juanma Barranquero <lekktu@gmail.com>
7871 7871
7872 * eval.c (Fprog2, Fcalled_interactively_p), 7872 * eval.c (Fprog2, Fcalled_interactively_p)
7873 (syms_of_eval) <debug-on-quit>: Doc fixes. 7873 (syms_of_eval) <debug-on-quit>: Doc fixes.
7874 (syms_of_eval) <max-specpdl-size>: 7874 (syms_of_eval) <max-specpdl-size>:
7875 (Finteractive_p): Fix typos in docstrings. 7875 (Finteractive_p): Fix typos in docstrings.
@@ -11250,7 +11250,7 @@
112502004-12-18 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp> 112502004-12-18 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
11251 11251
11252 * macterm.c (endif, x_font_name_to_mac_font_name): 11252 * macterm.c (endif, x_font_name_to_mac_font_name):
11253 Use maccentraleurroman instead of maccentraleuropean 11253 Use maccentraleurroman instead of maccentraleuropean.
11254 (mac_c_string_match, mac_do_list_fonts): Speed up font search by 11254 (mac_c_string_match, mac_do_list_fonts): Speed up font search by
11255 quickly finding a specific font without needing regexps. 11255 quickly finding a specific font without needing regexps.
11256 11256
@@ -12477,7 +12477,7 @@
12477 12477
12478 * gtkutil.h (xg_frame_cleared): Remove. 12478 * gtkutil.h (xg_frame_cleared): Remove.
12479 12479
12480 * xterm.c (x_clear_frame): Remove call to xg_frame_cleared 12480 * xterm.c (x_clear_frame): Remove call to xg_frame_cleared.
12481 (x_scroll_bar_create, XTset_vertical_scroll_bar): 12481 (x_scroll_bar_create, XTset_vertical_scroll_bar):
12482 Remove arguments left and width to xg_update_scrollbar_pos. 12482 Remove arguments left and width to xg_update_scrollbar_pos.
12483 (XTset_vertical_scroll_bar): Do x_clear_area for USE_GTK also. 12483 (XTset_vertical_scroll_bar): Do x_clear_area for USE_GTK also.
@@ -13017,9 +13017,9 @@
13017 13017
13018 * macmenu.c (ENCODE_MENU_STRING): Added to handle multibyte 13018 * macmenu.c (ENCODE_MENU_STRING): Added to handle multibyte
13019 strings in menu items. 13019 strings in menu items.
13020 (single_submenu): Use ENCODE_MENU_STRING 13020 (single_submenu): Use ENCODE_MENU_STRING.
13021 (mac_menu_show): Use ENCODE_MENU_STRING. Reset grabbed because 13021 (mac_menu_show): Use ENCODE_MENU_STRING. Reset grabbed because
13022 button release isn't passed to event loop 13022 button release isn't passed to event loop.
13023 (add_menu_item): Use SetMenuItemWithCFString. 13023 (add_menu_item): Use SetMenuItemWithCFString.
13024 13024
130252004-08-26 Steven Tamm <steventamm@mac.com> 130252004-08-26 Steven Tamm <steventamm@mac.com>
@@ -15407,7 +15407,7 @@
15407 (Fxw_display_color_p): Use dpyinfo->color_p. 15407 (Fxw_display_color_p): Use dpyinfo->color_p.
15408 (Fx_display_grayscale_p, Fx_display_planes): Don't use 15408 (Fx_display_grayscale_p, Fx_display_planes): Don't use
15409 dpyinfo->n_cbits. 15409 dpyinfo->n_cbits.
15410 (Fx_display_color_cells): Use dpyinfo->n_planes; 15410 (Fx_display_color_cells): Use dpyinfo->n_planes.
15411 (QCmatrix, QCcolor_adjustment, QCmask, Qemboss, Qedge_detection) 15411 (QCmatrix, QCcolor_adjustment, QCmask, Qemboss, Qedge_detection)
15412 (Qheuristic, cross_disabled_images, emboss_matrix) 15412 (Qheuristic, cross_disabled_images, emboss_matrix)
15413 (laplace_matrix): New variables (from xfns.c). 15413 (laplace_matrix): New variables (from xfns.c).
@@ -16414,7 +16414,7 @@
16414 (append_glyph, append_composite_glyph, produce_image_glyph) 16414 (append_glyph, append_composite_glyph, produce_image_glyph)
16415 (append_stretch_glyph): Set glyph's ascent and descent. 16415 (append_stretch_glyph): Set glyph's ascent and descent.
16416 (on_hot_spot_p): New function to check if position is inside an 16416 (on_hot_spot_p): New function to check if position is inside an
16417 rectangular, circular, or polygon-shaped image hot-spot, 16417 rectangular, circular, or polygon-shaped image hot-spot.
16418 (find_hot_spot): New function to search for image hot-spot. 16418 (find_hot_spot): New function to search for image hot-spot.
16419 (Flookup_image_map): New defun to search for image hot-spot. 16419 (Flookup_image_map): New defun to search for image hot-spot.
16420 (define_frame_cursor1): New aux function to determine frame 16420 (define_frame_cursor1): New aux function to determine frame
@@ -18570,7 +18570,7 @@
18570 change/simplify relevant callers. 18570 change/simplify relevant callers.
18571 (x_y_to_hpos_vpos): Adapt to per-window fringes and scroll bars, 18571 (x_y_to_hpos_vpos): Adapt to per-window fringes and scroll bars,
18572 and new fringe vs. display margin position. 18572 and new fringe vs. display margin position.
18573 Use window_box_left_offset and window_box_right_offset 18573 Use window_box_left_offset and window_box_right_offset.
18574 (get_glyph_string_clip_rect): Adapt to per-window fringes and 18574 (get_glyph_string_clip_rect): Adapt to per-window fringes and
18575 scroll bars, and new fringe vs. display margin position. 18575 scroll bars, and new fringe vs. display margin position.
18576 Use WINDOW_LEFT_EDGE_X and WINDOW_TOTAL_WIDTH. 18576 Use WINDOW_LEFT_EDGE_X and WINDOW_TOTAL_WIDTH.
diff --git a/src/ChangeLog.2 b/src/ChangeLog.2
index 7313f56ae8e..41e280a71b3 100644
--- a/src/ChangeLog.2
+++ b/src/ChangeLog.2
@@ -3102,9 +3102,9 @@
3102 [So (-259 . (259 . x)) means to format x -exactly- 259 chars wide.] 3102 [So (-259 . (259 . x)) means to format x -exactly- 259 chars wide.]
3103 3103
3104 * dispnew.c (Fding): 3104 * dispnew.c (Fding):
3105 Do not terminate macro-definition if given an argument 3105 Do not terminate macro-definition if given an argument.
3106 (This is so things like asynchronous process notifications 3106 (This is so things like asynchronous process notifications
3107 can beep but not screw) 3107 can beep but not screw.)
3108 3108
31091986-11-10 Richard M. Stallman (rms@prep) 31091986-11-10 Richard M. Stallman (rms@prep)
3110 3110
diff --git a/src/ChangeLog.3 b/src/ChangeLog.3
index 241019b51c7..e3c5ab70f66 100644
--- a/src/ChangeLog.3
+++ b/src/ChangeLog.3
@@ -6993,7 +6993,7 @@
6993 6993
6994 * keyboard.c (Qvertical_split): Renamed to `vertical-line', 6994 * keyboard.c (Qvertical_split): Renamed to `vertical-line',
6995 since the window arrangement is actually referred to as a 6995 since the window arrangement is actually referred to as a
6996 `horizontal split.' 6996 `horizontal split'.
6997 (make_lispy_event, make_lispy_movement, syms_of_keyboard): Uses 6997 (make_lispy_event, make_lispy_movement, syms_of_keyboard): Uses
6998 renamed here. 6998 renamed here.
6999 * keyboard.h (Qvertical_split): Extern declaration changed here. 6999 * keyboard.h (Qvertical_split): Extern declaration changed here.
diff --git a/src/ChangeLog.5 b/src/ChangeLog.5
index e4991971461..f27186079ac 100644
--- a/src/ChangeLog.5
+++ b/src/ChangeLog.5
@@ -387,7 +387,7 @@
387 based on frame name and icon_name fields. 387 based on frame name and icon_name fields.
388 (x_set_icon_name): New function. 388 (x_set_icon_name): New function.
389 (x_icon): Call x_text_icon. 389 (x_icon): Call x_text_icon.
390 (x_set_name): Look at icon_name field when setting the icon name, 390 (x_set_name): Look at icon_name field when setting the icon name.
391 (x_frame_parms): Add icon-name. 391 (x_frame_parms): Add icon-name.
392 (syms_of_xfns): Set up Qicon_name. 392 (syms_of_xfns): Set up Qicon_name.
393 393
@@ -903,7 +903,7 @@
903 903
9041995-05-04 Richard Stallman <rms@mole.gnu.ai.mit.edu> 9041995-05-04 Richard Stallman <rms@mole.gnu.ai.mit.edu>
905 905
906 * s/freebsd.h: (GETPGRP_NO_ARG): Defined 906 * s/freebsd.h (GETPGRP_NO_ARG): Define.
907 (HAVE_GETPAGESIZE): Definition deleted. 907 (HAVE_GETPAGESIZE): Definition deleted.
908 908
909 * data.c (store_symval_forwarding): Error if value out of range 909 * data.c (store_symval_forwarding): Error if value out of range
@@ -1308,7 +1308,7 @@
1308 1308
1309 * ntinevt.c (do_mouse_event): Use XSETFASTINT. 1309 * ntinevt.c (do_mouse_event): Use XSETFASTINT.
1310 (SET_FRAME): Undefined. 1310 (SET_FRAME): Undefined.
1311 (select): Renamed to sys_select to correspond to routine in sysdep.c 1311 (select): Renamed to sys_select to correspond to routine in sysdep.c.
1312 (sys_select): Support struct timeval. 1312 (sys_select): Support struct timeval.
1313 (key_event): Support German keyboard. 1313 (key_event): Support German keyboard.
1314 Replace SET_FRAME with XSETFRAME. 1314 Replace SET_FRAME with XSETFRAME.
@@ -4217,7 +4217,7 @@
4217 4217
4218 * process.c: Handle multiple keyboard input descriptors. 4218 * process.c: Handle multiple keyboard input descriptors.
4219 (non_keyboard_wait_mask): New variable. 4219 (non_keyboard_wait_mask): New variable.
4220 (Fset_process_filter): Update non_keyboard_wait_mask 4220 (Fset_process_filter): Update non_keyboard_wait_mask.
4221 (create_process, Fopen_network_stream, deactivate_process): 4221 (create_process, Fopen_network_stream, deactivate_process):
4222 (init_process, sigchld_handler): Likewise. 4222 (init_process, sigchld_handler): Likewise.
4223 (wait_reading_process_input): Maybe use non_keyboard_wait_mask. 4223 (wait_reading_process_input): Maybe use non_keyboard_wait_mask.
@@ -4456,7 +4456,7 @@
4456 4456
4457 * xfns.c: Use FRAME_X_DISPLAY instead of x_current_display 4457 * xfns.c: Use FRAME_X_DISPLAY instead of x_current_display
4458 and XDISPLAY. 4458 and XDISPLAY.
4459 (x_in_use): New variable, 4459 (x_in_use): New variable.
4460 (check_x, using_x_p): Test x_in_use. 4460 (check_x, using_x_p): Test x_in_use.
4461 (Fx_open_connection): Set x_in_use. 4461 (Fx_open_connection): Set x_in_use.
4462 (check_x_frame): New function. 4462 (check_x_frame): New function.
@@ -5953,7 +5953,7 @@
59531994-09-03 Kaveh R. Ghazi (ghazi@noc.rutgers.edu) 59531994-09-03 Kaveh R. Ghazi (ghazi@noc.rutgers.edu)
5954 5954
5955 * m/delta88k.h [__GNUC__] (HAVE_ALLOCA): Defined. 5955 * m/delta88k.h [__GNUC__] (HAVE_ALLOCA): Defined.
5956 [__GNUC__] (C_ALLOCA): Add #undef 5956 [__GNUC__] (C_ALLOCA): Add #undef.
5957 (LIB_X11_LIB): Add #undef. 5957 (LIB_X11_LIB): Add #undef.
5958 (HAVE_TERMIOS): Defined. 5958 (HAVE_TERMIOS): Defined.
5959 (HAVE_TERMIO): Add #undef. 5959 (HAVE_TERMIO): Add #undef.
diff --git a/src/ChangeLog.6 b/src/ChangeLog.6
index 6c7d04a531e..3b1bdbffabc 100644
--- a/src/ChangeLog.6
+++ b/src/ChangeLog.6
@@ -2830,7 +2830,7 @@
2830 * dosfns.c (Fint86, Fdos_memget, Fdos_memput, Fmsdos_set_keyboard): 2830 * dosfns.c (Fint86, Fdos_memget, Fdos_memput, Fmsdos_set_keyboard):
2831 Harmonize arguments with documentation. 2831 Harmonize arguments with documentation.
2832 2832
2833 * editfns.c (Fchar_to_string, Fstring_to_char, Fgoto_char, Fencode_time, 2833 * editfns.c (Fchar_to_string, Fstring_to_char, Fgoto_char, Fencode_time)
2834 (Finsert_char, Fbuffer_substring, Fbuffer_substring_no_properties) 2834 (Finsert_char, Fbuffer_substring, Fbuffer_substring_no_properties)
2835 (Finsert_buffer_substring, Fdelete_region, Fnarrow_to_region): 2835 (Finsert_buffer_substring, Fdelete_region, Fnarrow_to_region):
2836 Harmonize arguments with documentation. 2836 Harmonize arguments with documentation.
diff --git a/src/ChangeLog.9 b/src/ChangeLog.9
index 6e53a39ac93..9146a6465a8 100644
--- a/src/ChangeLog.9
+++ b/src/ChangeLog.9
@@ -1126,7 +1126,7 @@
1126 1126
1127 * xterm.c (note_mouse_highlight) <help-echo>: When looking for 1127 * xterm.c (note_mouse_highlight) <help-echo>: When looking for
1128 help-echo for a string which doesn't have help-echo itself, use 1128 help-echo for a string which doesn't have help-echo itself, use
1129 get-char-property to obtain the help-echo from the string's buffer 1129 get-char-property to obtain the help-echo from the string's buffer.
1130 (note_mouse_highlight) <mouse-face>: When on a string that doesn't 1130 (note_mouse_highlight) <mouse-face>: When on a string that doesn't
1131 have mouse-face, look ``under'' the string for mouse-face from an 1131 have mouse-face, look ``under'' the string for mouse-face from an
1132 overlay. 1132 overlay.
@@ -3119,7 +3119,7 @@
3119 * w32fns.c (Fx_show_tip): Fix calls to make_number. 3119 * w32fns.c (Fx_show_tip): Fix calls to make_number.
3120 (x_set_font): If font hasn't changed, avoid recomputing 3120 (x_set_font): If font hasn't changed, avoid recomputing
3121 faces and other things. 3121 faces and other things.
3122 (x_set_tool_bar_lines): Do nothing if frame is minibuffer-only, 3122 (x_set_tool_bar_lines): Do nothing if frame is minibuffer-only.
3123 (Fx_create_frame): Add the tool bar height to the frame height. 3123 (Fx_create_frame): Add the tool bar height to the frame height.
3124 (x_create_tip_frame): Prevent changing the tooltip's 3124 (x_create_tip_frame): Prevent changing the tooltip's
3125 background color by specifying a color for the default font 3125 background color by specifying a color for the default font
@@ -4887,7 +4887,7 @@
4887 4887
4888 * md5.c: Delay include of md5.h until after namespace cleaning. 4888 * md5.c: Delay include of md5.h until after namespace cleaning.
4889 4889
4890 * makefile.w32-in (fns.o): Depend on md5.h 4890 * makefile.w32-in (fns.o): Depend on md5.h.
4891 (md5.o): New target. 4891 (md5.o): New target.
4892 (sunfns.o): Remove. 4892 (sunfns.o): Remove.
4893 4893
@@ -7254,7 +7254,7 @@
7254 7254
7255 * charset.h (MAKE_CHAR): Be sure to set MSB of C1 to 0. 7255 * charset.h (MAKE_CHAR): Be sure to set MSB of C1 to 0.
7256 7256
7257 * charset.c: Include composite.h 7257 * charset.c: Include composite.h.
7258 (lisp_string_width): New function. 7258 (lisp_string_width): New function.
7259 (Fstring_width): Call lisp_string_width instead of strwidth. 7259 (Fstring_width): Call lisp_string_width instead of strwidth.
7260 7260
@@ -7333,7 +7333,7 @@
7333 7333
7334 * s/ms-w32.h (ORDINARY_LINK): New define. 7334 * s/ms-w32.h (ORDINARY_LINK): New define.
7335 7335
7336 * w32.c (_ANONYMOUS_UNION) [__GNUC__]: New define 7336 * w32.c (_ANONYMOUS_UNION) [__GNUC__]: New define.
7337 (_ANONYMOUS_STRUCT) [__GNUC__]: New define. 7337 (_ANONYMOUS_STRUCT) [__GNUC__]: New define.
7338 7338
7339 * makefile.w32-in (clean): Don't delete config.h and epaths.h. 7339 * makefile.w32-in (clean): Don't delete config.h and epaths.h.
@@ -8409,7 +8409,7 @@
8409 (encode_coding_iso2022): New local variable safe_chars. Check 8409 (encode_coding_iso2022): New local variable safe_chars. Check
8410 unsafe chars. 8410 unsafe chars.
8411 (setup_coding_system): Delete the code to initialize 8411 (setup_coding_system): Delete the code to initialize
8412 coding->safe_charses 8412 coding->safe_charses.
8413 (intersection, find_safe_codings): New functions. 8413 (intersection, find_safe_codings): New functions.
8414 (Ffind_coding_systems_region_internal): New function. 8414 (Ffind_coding_systems_region_internal): New function.
8415 (syms_of_coding): Defsubr it. Initialize Qsafe_chars, 8415 (syms_of_coding): Defsubr it. Initialize Qsafe_chars,
@@ -8729,7 +8729,7 @@
8729 * w32term.c (help_echo_object, help_echo_pos): New variables. 8729 * w32term.c (help_echo_object, help_echo_pos): New variables.
8730 (note_mode_line_highlight): Store additional information about the 8730 (note_mode_line_highlight): Store additional information about the
8731 help-echo in help_echo_object and help_echo_pos. Check both 8731 help-echo in help_echo_object and help_echo_pos. Check both
8732 `local-map' and `keymap' properties for changing the cursor 8732 `local-map' and `keymap' properties for changing the cursor.
8733 (note_mouse_highlight): Store additional information about the 8733 (note_mouse_highlight): Store additional information about the
8734 help-echo in help_echo_object and help_echo_pos. 8734 help-echo in help_echo_object and help_echo_pos.
8735 (note_tool_bar_highlight): Set help_echo_object to nil and 8735 (note_tool_bar_highlight): Set help_echo_object to nil and
@@ -8797,7 +8797,7 @@
8797 * xterm.c (help_echo_object, help_echo_pos): New variables. 8797 * xterm.c (help_echo_object, help_echo_pos): New variables.
8798 (note_mode_line_highlight): Store additional information about the 8798 (note_mode_line_highlight): Store additional information about the
8799 help-echo in help_echo_object and help_echo_pos. Check both 8799 help-echo in help_echo_object and help_echo_pos. Check both
8800 `local-map' and `keymap' properties for changing the cursor 8800 `local-map' and `keymap' properties for changing the cursor.
8801 (note_mouse_highlight): Store additional information about the 8801 (note_mouse_highlight): Store additional information about the
8802 help-echo in help_echo_object and help_echo_pos. 8802 help-echo in help_echo_object and help_echo_pos.
8803 (note_tool_bar_highlight): Set help_echo_object to nil and 8803 (note_tool_bar_highlight): Set help_echo_object to nil and
@@ -11979,7 +11979,7 @@
11979 (detect_coding_utf_8): New function. 11979 (detect_coding_utf_8): New function.
11980 (UTF_16_INVALID_P, UTF_16_HIGH_SURROGATE_P 11980 (UTF_16_INVALID_P, UTF_16_HIGH_SURROGATE_P
11981 UTF_16_LOW_SURROGATE_P): New macros. 11981 UTF_16_LOW_SURROGATE_P): New macros.
11982 (detect_coding_utf_16): New function 11982 (detect_coding_utf_16): New function.
11983 (detect_coding_mask): When priorities are specified, skip any 11983 (detect_coding_mask): When priorities are specified, skip any
11984 categories that have `nil' coding-system. Fix bug of returning 11984 categories that have `nil' coding-system. Fix bug of returning
11985 wrong mask when PRIORITIES is specified and detect_coding_XXX() 11985 wrong mask when PRIORITIES is specified and detect_coding_XXX()
@@ -12222,7 +12222,7 @@
12222 12222
12223 * makefile.nt: Add atimer.h to dependencies. 12223 * makefile.nt: Add atimer.h to dependencies.
12224 * w32.c (init_environment): Set Vw32_num_mouse_buttons here. 12224 * w32.c (init_environment): Set Vw32_num_mouse_buttons here.
12225 * w32console.c: Only disable window system features for dispextern.h 12225 * w32console.c: Only disable window system features for dispextern.h.
12226 (initialize_w32_display): Build a display info for the console. 12226 (initialize_w32_display): Build a display info for the console.
12227 * w32faces.c (tty_defined_color): Apply xfaces.c change from 02-17. 12227 * w32faces.c (tty_defined_color): Apply xfaces.c change from 02-17.
12228 * w32fns.c (w32_wnd_proc) [WM_LBUTTON_DOWN, WM_RBUTTON_DOWN, 12228 * w32fns.c (w32_wnd_proc) [WM_LBUTTON_DOWN, WM_RBUTTON_DOWN,
@@ -12825,7 +12825,7 @@
12825 (FRAME_XIM): Removed. 12825 (FRAME_XIM): Removed.
12826 12826
12827 * xfns.c (supported_styles): New variable. 12827 * xfns.c (supported_styles): New variable.
12828 (DEFAULT_STYLE, DEFAULT_FONT): New macros 12828 (DEFAULT_STYLE, DEFAULT_FONT): New macros.
12829 (xic_create_xfontset, best_style, xic_create_frame) 12829 (xic_create_xfontset, best_style, xic_create_frame)
12830 (xic_destroy_frame, xic_set_preeditarea, xic_set_statusarea) 12830 (xic_destroy_frame, xic_set_preeditarea, xic_set_statusarea)
12831 (xic_set_xfontset): New functions. 12831 (xic_set_xfontset): New functions.
@@ -13156,7 +13156,7 @@
13156 (GC_STRING_BYTES, GC_STRING_CHARS): New macros. 13156 (GC_STRING_BYTES, GC_STRING_CHARS): New macros.
13157 (DONT_COPY_FLAG): Removed. 13157 (DONT_COPY_FLAG): Removed.
13158 (SBLOCK_SIZE, LARGE_STRING_BYTES): New macros. 13158 (SBLOCK_SIZE, LARGE_STRING_BYTES): New macros.
13159 (struct sdata, struct sblock): New 13159 (struct sdata, struct sblock): New.
13160 (struct string_block): Rewritten. 13160 (struct string_block): Rewritten.
13161 (STRINGS_IN_STRING_BLOCK): New macro. 13161 (STRINGS_IN_STRING_BLOCK): New macro.
13162 (oldest_sblock, current_sblock, total_strings, total_free_strings) 13162 (oldest_sblock, current_sblock, total_strings, total_free_strings)
diff --git a/src/alloc.c b/src/alloc.c
index 2ce74f97ff7..2ddec3dbe48 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -2538,16 +2538,6 @@ init_float (void)
2538} 2538}
2539 2539
2540 2540
2541/* Explicitly free a float cell by putting it on the free-list. */
2542
2543static void
2544free_float (struct Lisp_Float *ptr)
2545{
2546 ptr->u.chain = float_free_list;
2547 float_free_list = ptr;
2548}
2549
2550
2551/* Return a new float object with value FLOAT_VALUE. */ 2541/* Return a new float object with value FLOAT_VALUE. */
2552 2542
2553Lisp_Object 2543Lisp_Object
diff --git a/src/callproc.c b/src/callproc.c
index 4286ab1ae29..7019d741b34 100644
--- a/src/callproc.c
+++ b/src/callproc.c
@@ -984,7 +984,9 @@ usage: (call-process-region START END PROGRAM &optional DELETE BUFFER DISPLAY &r
984 RETURN_UNGCPRO (unbind_to (count, Fcall_process (nargs, args))); 984 RETURN_UNGCPRO (unbind_to (count, Fcall_process (nargs, args)));
985} 985}
986 986
987#ifndef WINDOWSNT
987static int relocate_fd (int fd, int minfd); 988static int relocate_fd (int fd, int minfd);
989#endif
988 990
989static char ** 991static char **
990add_env (char **env, char **new_env, char *string) 992add_env (char **env, char **new_env, char *string)
@@ -1113,7 +1115,7 @@ child_setup (int in, int out, int err, register char **new_argv, int set_pgrp, L
1113 char **p, **q; 1115 char **p, **q;
1114 register int new_length; 1116 register int new_length;
1115 Lisp_Object display = Qnil; 1117 Lisp_Object display = Qnil;
1116 1118
1117 new_length = 0; 1119 new_length = 0;
1118 1120
1119 for (tem = Vprocess_environment; 1121 for (tem = Vprocess_environment;
@@ -1149,7 +1151,7 @@ child_setup (int in, int out, int err, register char **new_argv, int set_pgrp, L
1149 but with corrected value. */ 1151 but with corrected value. */
1150 if (egetenv ("PWD")) 1152 if (egetenv ("PWD"))
1151 *new_env++ = pwd_var; 1153 *new_env++ = pwd_var;
1152 1154
1153 if (STRINGP (display)) 1155 if (STRINGP (display))
1154 { 1156 {
1155 int vlen = strlen ("DISPLAY=") + strlen (SDATA (display)) + 1; 1157 int vlen = strlen ("DISPLAY=") + strlen (SDATA (display)) + 1;
@@ -1179,7 +1181,7 @@ child_setup (int in, int out, int err, register char **new_argv, int set_pgrp, L
1179 } 1181 }
1180 } 1182 }
1181 1183
1182 1184
1183#ifdef WINDOWSNT 1185#ifdef WINDOWSNT
1184 prepare_standard_handles (in, out, err, handles); 1186 prepare_standard_handles (in, out, err, handles);
1185 set_process_dir (SDATA (current_dir)); 1187 set_process_dir (SDATA (current_dir));
@@ -1265,6 +1267,7 @@ child_setup (int in, int out, int err, register char **new_argv, int set_pgrp, L
1265#endif /* not MSDOS */ 1267#endif /* not MSDOS */
1266} 1268}
1267 1269
1270#ifndef WINDOWSNT
1268/* Move the file descriptor FD so that its number is not less than MINFD. 1271/* Move the file descriptor FD so that its number is not less than MINFD.
1269 If the file descriptor is moved at all, the original is freed. */ 1272 If the file descriptor is moved at all, the original is freed. */
1270static int 1273static int
@@ -1298,6 +1301,7 @@ relocate_fd (int fd, int minfd)
1298 return new; 1301 return new;
1299 } 1302 }
1300} 1303}
1304#endif /* not WINDOWSNT */
1301 1305
1302static int 1306static int
1303getenv_internal_1 (const char *var, int varlen, char **value, int *valuelen, 1307getenv_internal_1 (const char *var, int varlen, char **value, int *valuelen,
@@ -1526,13 +1530,12 @@ void
1526set_initial_environment (void) 1530set_initial_environment (void)
1527{ 1531{
1528 register char **envp; 1532 register char **envp;
1529#ifndef CANNOT_DUMP 1533#ifdef CANNOT_DUMP
1530 if (initialized) 1534 Vprocess_environment = Qnil;
1531 {
1532#else 1535#else
1533 { 1536 if (initialized)
1534 Vprocess_environment = Qnil;
1535#endif 1537#endif
1538 {
1536 for (envp = environ; *envp; envp++) 1539 for (envp = environ; *envp; envp++)
1537 Vprocess_environment = Fcons (build_string (*envp), 1540 Vprocess_environment = Fcons (build_string (*envp),
1538 Vprocess_environment); 1541 Vprocess_environment);
diff --git a/src/cmds.c b/src/cmds.c
index 81f975a9885..2b686a44d87 100644
--- a/src/cmds.c
+++ b/src/cmds.c
@@ -45,6 +45,8 @@ Lisp_Object Vself_insert_face_command;
45 45
46extern Lisp_Object Qface; 46extern Lisp_Object Qface;
47extern Lisp_Object Vtranslation_table_for_input; 47extern Lisp_Object Vtranslation_table_for_input;
48
49static int internal_self_insert (int, int);
48 50
49DEFUN ("forward-point", Fforward_point, Sforward_point, 1, 1, 0, 51DEFUN ("forward-point", Fforward_point, Sforward_point, 1, 1, 0,
50 doc: /* Return buffer position N characters after (before if N negative) point. */) 52 doc: /* Return buffer position N characters after (before if N negative) point. */)
@@ -347,7 +349,7 @@ After insertion, the value of `auto-fill-function' is called if the
347 349
348static Lisp_Object Qexpand_abbrev; 350static Lisp_Object Qexpand_abbrev;
349 351
350int 352static int
351internal_self_insert (int c, int noautofill) 353internal_self_insert (int c, int noautofill)
352{ 354{
353 int hairy = 0; 355 int hairy = 0;
diff --git a/src/config.in b/src/config.in
index 40b62633446..647c8804dff 100644
--- a/src/config.in
+++ b/src/config.in
@@ -801,6 +801,9 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
801/* Define to 1 if you want to use the X window system. */ 801/* Define to 1 if you want to use the X window system. */
802#undef HAVE_X_WINDOWS 802#undef HAVE_X_WINDOWS
803 803
804/* Define to 1 if you have the `__executable_start' function. */
805#undef HAVE___EXECUTABLE_START
806
804/* Define to 1 if you have the `__fpending' function. */ 807/* Define to 1 if you have the `__fpending' function. */
805#undef HAVE___FPENDING 808#undef HAVE___FPENDING
806 809
diff --git a/src/dired.c b/src/dired.c
index cdb4545e81c..8f360e8879f 100644
--- a/src/dired.c
+++ b/src/dired.c
@@ -66,8 +66,8 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
66#ifndef MSDOS 66#ifndef MSDOS
67#define DIRENTRY struct direct 67#define DIRENTRY struct direct
68 68
69extern DIR *opendir (); 69extern DIR *opendir (char *);
70extern struct direct *readdir (); 70extern struct direct *readdir (DIR *);
71 71
72#endif /* not MSDOS */ 72#endif /* not MSDOS */
73#endif /* not SYSV_SYSTEM_DIR */ 73#endif /* not SYSV_SYSTEM_DIR */
diff --git a/src/dispnew.c b/src/dispnew.c
index fe64143ec07..73aafe07d94 100644
--- a/src/dispnew.c
+++ b/src/dispnew.c
@@ -436,7 +436,7 @@ DEFUN ("dump-redisplay-history", Fdump_redisplay_history,
436#endif /* GLYPH_DEBUG == 0 */ 436#endif /* GLYPH_DEBUG == 0 */
437 437
438 438
439#ifdef PROFILING 439#if defined PROFILING && !HAVE___EXECUTABLE_START
440/* FIXME: only used to find text start for profiling. */ 440/* FIXME: only used to find text start for profiling. */
441 441
442void 442void
diff --git a/src/ecrt0.c b/src/ecrt0.c
deleted file mode 100644
index 458771319c7..00000000000
--- a/src/ecrt0.c
+++ /dev/null
@@ -1,95 +0,0 @@
1/* C code startup routine.
2 Copyright (C) 1985, 1986, 1992, 2001, 2002, 2003, 2004,
3 2005, 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc.
4
5This file is part of GNU Emacs.
6
7GNU Emacs is free software: you can redistribute it and/or modify
8it under the terms of the GNU General Public License as published by
9the Free Software Foundation, either version 3 of the License, or
10(at your option) any later version.
11
12GNU Emacs is distributed in the hope that it will be useful,
13but WITHOUT ANY WARRANTY; without even the implied warranty of
14MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15GNU General Public License for more details.
16
17You should have received a copy of the GNU General Public License
18along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
19
20
21/* The standard Vax 4.2 Unix crt0.c cannot be used for Emacs
22 because it makes `environ' an initialized variable.
23 It is easiest to have a special crt0.c on all machines
24 though I don't know whether other machines actually need it. */
25
26/* On the vax and 68000, in BSD4.2 and USG5.2,
27 this is the data format on startup:
28 (vax) ap and fp are unpredictable as far as I know; don't use them.
29 sp -> word containing argc
30 word pointing to first arg string
31 [word pointing to next arg string]... 0 or more times
32 0
33Optionally:
34 [word pointing to environment variable]... 1 or more times
35 ...
36 0
37And always:
38 first arg string
39 [next arg string]... 0 or more times
40*/
41
42#ifdef emacs
43#include <config.h>
44#endif
45
46/* ******** WARNING ********
47 Do not insert any data definitions before data_start!
48 Since this is the first file linked, the address of the following
49 variable should correspond to the start of initialized data space.
50 On some systems this is a constant that is independent of the text
51 size for shared executables. On others, it is a function of the
52 text size. In short, this seems to be the most portable way to
53 discover the start of initialized data space dynamically at runtime,
54 for either shared or unshared executables, on either swapping or
55 virtual systems. It only requires that the linker allocate objects
56 in the order encountered, a reasonable model for most Unix systems.
57 Similarly, note that the address of _start() should be the start
58 of text space. Fred Fish, UniSoft Systems Inc. */
59
60int data_start = 0;
61
62char **environ;
63
64static start1 ();
65
66/* Define symbol "start": here; some systems want that symbol. */
67asm(" .text ");
68asm(" .globl start ");
69asm(" start: ");
70
71_start ()
72{
73/* On vax, nothing is pushed here */
74 start1 ();
75}
76
77static
78start1 (bogus_fp, argc, xargv)
79 int argc;
80 char *xargv;
81{
82 register char **argv = &xargv;
83 environ = argv + argc + 1;
84
85 if ((char *)environ == xargv)
86 environ--;
87 exit (main (argc, argv, environ));
88
89 /* Refer to `start1' so GCC will not think it is never called
90 and optimize it out. */
91 (void) &start1;
92}
93
94/* arch-tag: 4025c2fb-d6b1-4d29-b1b6-8100b6bd1e74
95 (do not change this comment) */
diff --git a/src/editfns.c b/src/editfns.c
index 805dba60446..96ae1766e04 100644
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -90,7 +90,7 @@ extern size_t emacs_strftimeu (char *, size_t, const char *,
90 const struct tm *, int); 90 const struct tm *, int);
91 91
92#ifdef WINDOWSNT 92#ifdef WINDOWSNT
93extern Lisp_Object w32_get_internal_run_time (); 93extern Lisp_Object w32_get_internal_run_time (void);
94#endif 94#endif
95 95
96static int tm_diff (struct tm *, struct tm *); 96static int tm_diff (struct tm *, struct tm *);
diff --git a/src/emacs.c b/src/emacs.c
index fbae7763877..a5d57116c4f 100644
--- a/src/emacs.c
+++ b/src/emacs.c
@@ -1747,9 +1747,18 @@ main (int argc, char **argv)
1747#else 1747#else
1748 extern char etext; 1748 extern char etext;
1749#endif 1749#endif
1750#ifdef HAVE___EXECUTABLE_START
1751 /* This symbol is defined by GNU ld to the start of the text
1752 segment. */
1753 extern char __executable_start[];
1754#else
1750 extern void safe_bcopy (); 1755 extern void safe_bcopy ();
1756#endif
1751 1757
1752 atexit (_mcleanup); 1758 atexit (_mcleanup);
1759#ifdef HAVE___EXECUTABLE_START
1760 monstartup (__executable_start, &etext);
1761#else
1753 /* This uses safe_bcopy because that function comes first in the 1762 /* This uses safe_bcopy because that function comes first in the
1754 Emacs executable. It might be better to use something that 1763 Emacs executable. It might be better to use something that
1755 gives the start of the text segment, but start_of_text is not 1764 gives the start of the text segment, but start_of_text is not
@@ -1757,6 +1766,7 @@ main (int argc, char **argv)
1757 /* FIXME: Does not work on architectures with function 1766 /* FIXME: Does not work on architectures with function
1758 descriptors. */ 1767 descriptors. */
1759 monstartup (safe_bcopy, &etext); 1768 monstartup (safe_bcopy, &etext);
1769#endif
1760 } 1770 }
1761 else 1771 else
1762 moncontrol (0); 1772 moncontrol (0);
diff --git a/src/font.c b/src/font.c
index ed4da9c75ac..c35716c7c67 100644
--- a/src/font.c
+++ b/src/font.c
@@ -980,39 +980,6 @@ font_expand_wildcards (Lisp_Object *field, int n)
980} 980}
981 981
982 982
983#ifdef ENABLE_CHECKING
984/* Match a 14-field XLFD pattern against a full XLFD font name. */
985static int
986font_match_xlfd (char *pattern, char *name)
987{
988 while (*pattern && *name)
989 {
990 if (*pattern == *name)
991 pattern++;
992 else if (*pattern == '*')
993 if (*name == pattern[1])
994 pattern += 2;
995 else
996 ;
997 else
998 return 0;
999 name++;
1000 }
1001 return 1;
1002}
1003
1004/* Make sure the font object matches the XLFD font name. */
1005static int
1006font_check_xlfd_parse (Lisp_Object font, char *name)
1007{
1008 char name_check[256];
1009 font_unparse_xlfd (font, 0, name_check, 255);
1010 return font_match_xlfd (name_check, name);
1011}
1012
1013#endif
1014
1015
1016/* Parse NAME (null terminated) as XLFD and store information in FONT 983/* Parse NAME (null terminated) as XLFD and store information in FONT
1017 (font-spec or font-entity). Size property of FONT is set as 984 (font-spec or font-entity). Size property of FONT is set as
1018 follows: 985 follows:
diff --git a/src/frame.c b/src/frame.c
index 69a640cdc96..0cd7377ece1 100644
--- a/src/frame.c
+++ b/src/frame.c
@@ -1280,14 +1280,6 @@ other_visible_frames (FRAME_PTR f)
1280 return 1; 1280 return 1;
1281} 1281}
1282 1282
1283/* Error handler for `delete-frame-functions'. */
1284static Lisp_Object
1285delete_frame_handler (Lisp_Object arg)
1286{
1287 add_to_log ("Error during `delete-frame': %s", arg, Qnil);
1288 return Qnil;
1289}
1290
1291extern Lisp_Object Qrun_hook_with_args; 1283extern Lisp_Object Qrun_hook_with_args;
1292 1284
1293/* Delete FRAME. When FORCE equals Qnoelisp, delete FRAME 1285/* Delete FRAME. When FORCE equals Qnoelisp, delete FRAME
@@ -1299,7 +1291,7 @@ delete_frame (Lisp_Object frame, Lisp_Object force)
1299 /* If we use `register' here, gcc-4.0.2 on amd64 using 1291 /* If we use `register' here, gcc-4.0.2 on amd64 using
1300 -DUSE_LISP_UNION_TYPE complains further down that we're getting the 1292 -DUSE_LISP_UNION_TYPE complains further down that we're getting the
1301 address of `force'. Go figure. */ 1293 address of `force'. Go figure. */
1302 1294
1303{ 1295{
1304 struct frame *f; 1296 struct frame *f;
1305 struct frame *sf = SELECTED_FRAME (); 1297 struct frame *sf = SELECTED_FRAME ();
diff --git a/src/keyboard.c b/src/keyboard.c
index c2f010cf4e7..1cc24f95bdc 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -635,7 +635,9 @@ static Lisp_Object apply_modifiers (int, Lisp_Object);
635static void clear_event (struct input_event *); 635static void clear_event (struct input_event *);
636static Lisp_Object restore_kboard_configuration (Lisp_Object); 636static Lisp_Object restore_kboard_configuration (Lisp_Object);
637static SIGTYPE interrupt_signal (int signalnum); 637static SIGTYPE interrupt_signal (int signalnum);
638#ifdef SIGIO
638static SIGTYPE input_available_signal (int signo); 639static SIGTYPE input_available_signal (int signo);
640#endif
639static void handle_interrupt (void); 641static void handle_interrupt (void);
640static void timer_start_idle (void); 642static void timer_start_idle (void);
641static void timer_stop_idle (void); 643static void timer_stop_idle (void);
@@ -3895,7 +3897,7 @@ kbd_buffer_get_event (KBOARD **kbp,
3895{ 3897{
3896 register int c; 3898 register int c;
3897 Lisp_Object obj; 3899 Lisp_Object obj;
3898 3900
3899 if (kbd_on_hold_p () && kbd_buffer_nr_stored () < KBD_BUFFER_SIZE/4) 3901 if (kbd_on_hold_p () && kbd_buffer_nr_stored () < KBD_BUFFER_SIZE/4)
3900 { 3902 {
3901 /* Start reading input again, we have processed enough so we can 3903 /* Start reading input again, we have processed enough so we can
diff --git a/src/lisp.h b/src/lisp.h
index d1a14fcd894..6b5de400c06 100644
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -2393,7 +2393,6 @@ extern void swap_in_global_binding (struct Lisp_Symbol *);
2393EXFUN (Fend_of_line, 1); 2393EXFUN (Fend_of_line, 1);
2394EXFUN (Fforward_char, 1); 2394EXFUN (Fforward_char, 1);
2395EXFUN (Fforward_line, 1); 2395EXFUN (Fforward_line, 1);
2396extern int internal_self_insert (int, int);
2397extern void syms_of_cmds (void); 2396extern void syms_of_cmds (void);
2398extern void keys_of_cmds (void); 2397extern void keys_of_cmds (void);
2399 2398
@@ -3400,16 +3399,16 @@ extern int emacs_close (int);
3400extern int emacs_read (int, char *, unsigned int); 3399extern int emacs_read (int, char *, unsigned int);
3401extern int emacs_write (int, const char *, unsigned int); 3400extern int emacs_write (int, const char *, unsigned int);
3402#ifndef HAVE_MEMSET 3401#ifndef HAVE_MEMSET
3403extern void *memset P_ ((void *, int, size_t)); 3402extern void *memset (void *, int, size_t);
3404#endif 3403#endif
3405#ifndef HAVE_MEMCPY 3404#ifndef HAVE_MEMCPY
3406extern void *memcpy P_ ((void *, void *, size_t)); 3405extern void *memcpy (void *, void *, size_t);
3407#endif 3406#endif
3408#ifndef HAVE_MEMMOVE 3407#ifndef HAVE_MEMMOVE
3409extern void *memmove P_ ((void *, void *, size_t)); 3408extern void *memmove (void *, void *, size_t);
3410#endif 3409#endif
3411#ifndef HAVE_MEMCMP 3410#ifndef HAVE_MEMCMP
3412extern int memcmp P_ ((void *, void *, size_t)); 3411extern int memcmp (void *, void *, size_t);
3413#endif 3412#endif
3414 3413
3415/* Defined in filelock.c */ 3414/* Defined in filelock.c */
diff --git a/src/lread.c b/src/lread.c
index 96108ec4a72..b29971a5f88 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -1276,7 +1276,6 @@ Return t if the file exists and loads successfully. */)
1276 1276
1277static Lisp_Object 1277static Lisp_Object
1278load_unwind (Lisp_Object arg) /* used as unwind-protect function in load */ 1278load_unwind (Lisp_Object arg) /* used as unwind-protect function in load */
1279
1280{ 1279{
1281 FILE *stream = (FILE *) XSAVE_VALUE (arg)->pointer; 1280 FILE *stream = (FILE *) XSAVE_VALUE (arg)->pointer;
1282 if (stream != NULL) 1281 if (stream != NULL)
@@ -1567,9 +1566,8 @@ build_load_history (Lisp_Object filename, int entire)
1567 Vload_history); 1566 Vload_history);
1568} 1567}
1569 1568
1570Lisp_Object 1569static Lisp_Object
1571unreadpure (Lisp_Object junk) /* Used as unwind-protect function in readevalloop */ 1570unreadpure (Lisp_Object junk) /* Used as unwind-protect function in readevalloop */
1572
1573{ 1571{
1574 read_pure = 0; 1572 read_pure = 0;
1575 return Qnil; 1573 return Qnil;
@@ -3818,7 +3816,7 @@ map_obarray (Lisp_Object obarray, void (*fn) (Lisp_Object, Lisp_Object), Lisp_Ob
3818 } 3816 }
3819} 3817}
3820 3818
3821void 3819static void
3822mapatoms_1 (Lisp_Object sym, Lisp_Object function) 3820mapatoms_1 (Lisp_Object sym, Lisp_Object function)
3823{ 3821{
3824 call1 (function, sym); 3822 call1 (function, sym);
diff --git a/src/mem-limits.h b/src/mem-limits.h
index a550e1464b8..8827c458c02 100644
--- a/src/mem-limits.h
+++ b/src/mem-limits.h
@@ -34,10 +34,6 @@ extern int etext;
34# endif 34# endif
35#endif 35#endif
36 36
37#ifdef CYGWIN
38#define BSD4_2
39#endif
40
41#ifdef BSD4_2 37#ifdef BSD4_2
42#include <sys/time.h> 38#include <sys/time.h>
43#include <sys/resource.h> 39#include <sys/resource.h>
diff --git a/src/menu.c b/src/menu.c
index a424200fb3e..321dc2677a1 100644
--- a/src/menu.c
+++ b/src/menu.c
@@ -133,12 +133,14 @@ discard_menu_items (void)
133 xassert (NILP (menu_items_inuse)); 133 xassert (NILP (menu_items_inuse));
134} 134}
135 135
136#ifdef HAVE_NS
136static Lisp_Object 137static Lisp_Object
137cleanup_popup_menu (Lisp_Object arg) 138cleanup_popup_menu (Lisp_Object arg)
138{ 139{
139 discard_menu_items (); 140 discard_menu_items ();
140 return Qnil; 141 return Qnil;
141} 142}
143#endif
142 144
143/* This undoes save_menu_items, and it is called by the specpdl unwind 145/* This undoes save_menu_items, and it is called by the specpdl unwind
144 mechanism. */ 146 mechanism. */
diff --git a/src/ndir.h b/src/ndir.h
index d7bac9d3fae..92d198334b7 100644
--- a/src/ndir.h
+++ b/src/ndir.h
@@ -32,11 +32,10 @@ typedef struct
32 char dd_buf[DIRBLKSIZ]; /* directory block */ 32 char dd_buf[DIRBLKSIZ]; /* directory block */
33 } DIR; /* stream data from opendir() */ 33 } DIR; /* stream data from opendir() */
34 34
35extern DIR *opendir(); 35extern DIR *opendir (char *);
36extern struct direct *readdir(); 36extern struct direct *readdir (DIR *);
37extern long telldir(); 37extern void seekdir (DIR *, long);
38extern void seekdir(); 38extern void closedir (DIR *);
39extern void closedir();
40 39
41#define rewinddir( dirp ) seekdir( dirp, 0L ) 40#define rewinddir( dirp ) seekdir( dirp, 0L )
42 41
diff --git a/src/ralloc.c b/src/ralloc.c
index 0a2b156e393..5f2b52fcc4b 100644
--- a/src/ralloc.c
+++ b/src/ralloc.c
@@ -79,7 +79,7 @@ static void r_alloc_init (void);
79/* Declarations for working with the malloc, ralloc, and system breaks. */ 79/* Declarations for working with the malloc, ralloc, and system breaks. */
80 80
81/* Function to set the real break value. */ 81/* Function to set the real break value. */
82POINTER (*real_morecore) (); 82POINTER (*real_morecore) (long int);
83 83
84/* The break value, as seen by malloc. */ 84/* The break value, as seen by malloc. */
85static POINTER virtual_break_value; 85static POINTER virtual_break_value;
@@ -111,7 +111,7 @@ static int extra_bytes;
111 from the system. */ 111 from the system. */
112 112
113#ifndef SYSTEM_MALLOC 113#ifndef SYSTEM_MALLOC
114extern POINTER (*__morecore) (); 114extern POINTER (*__morecore) (long int);
115#endif 115#endif
116 116
117 117
@@ -519,35 +519,6 @@ relocate_blocs (bloc_ptr bloc, heap_ptr heap, POINTER address)
519 519
520 return 1; 520 return 1;
521} 521}
522
523/* Reorder the bloc BLOC to go before bloc BEFORE in the doubly linked list.
524 This is necessary if we put the memory of space of BLOC
525 before that of BEFORE. */
526
527static void
528reorder_bloc (bloc_ptr bloc, bloc_ptr before)
529{
530 bloc_ptr prev, next;
531
532 /* Splice BLOC out from where it is. */
533 prev = bloc->prev;
534 next = bloc->next;
535
536 if (prev)
537 prev->next = next;
538 if (next)
539 next->prev = prev;
540
541 /* Splice it in before BEFORE. */
542 prev = before->prev;
543
544 if (prev)
545 prev->next = bloc;
546 bloc->prev = prev;
547
548 before->prev = bloc;
549 bloc->next = before;
550}
551 522
552/* Update the records of which heaps contain which blocs, starting 523/* Update the records of which heaps contain which blocs, starting
553 with heap HEAP and bloc BLOC. */ 524 with heap HEAP and bloc BLOC. */
diff --git a/src/sound.c b/src/sound.c
index e0ebd565151..4e3d583ccf0 100644
--- a/src/sound.c
+++ b/src/sound.c
@@ -115,7 +115,9 @@ enum sound_attr
115 SOUND_ATTR_SENTINEL 115 SOUND_ATTR_SENTINEL
116}; 116};
117 117
118#ifdef HAVE_ALSA
118static void alsa_sound_perror (char *, int) NO_RETURN; 119static void alsa_sound_perror (char *, int) NO_RETURN;
120#endif
119static void sound_perror (char *) NO_RETURN; 121static void sound_perror (char *) NO_RETURN;
120static void sound_warning (char *); 122static void sound_warning (char *);
121static int parse_sound (Lisp_Object, Lisp_Object *); 123static int parse_sound (Lisp_Object, Lisp_Object *);
diff --git a/src/syssignal.h b/src/syssignal.h
index e3765add425..f034e9e0761 100644
--- a/src/syssignal.h
+++ b/src/syssignal.h
@@ -160,7 +160,7 @@ sigset_t sys_sigsetmask (sigset_t new_mask);
160 160
161#ifndef HAVE_STRSIGNAL 161#ifndef HAVE_STRSIGNAL
162/* strsignal is in sysdep.c */ 162/* strsignal is in sysdep.c */
163char *strsignal (); 163char *strsignal (int);
164#endif 164#endif
165 165
166#ifdef FORWARD_SIGNAL_TO_MAIN_THREAD 166#ifdef FORWARD_SIGNAL_TO_MAIN_THREAD
diff --git a/src/term.c b/src/term.c
index 3233db84cf7..25501370cdf 100644
--- a/src/term.c
+++ b/src/term.c
@@ -183,7 +183,7 @@ static int no_controlling_tty;
183 183
184static int system_uses_terminfo; 184static int system_uses_terminfo;
185 185
186char *tparam (); 186char *tparam (char *, char *, int, int, ...);
187 187
188extern char *tgetstr (char *, char **); 188extern char *tgetstr (char *, char **);
189 189
@@ -1363,6 +1363,7 @@ static struct fkey_table keys[] =
1363 {"!3", "S-undo"} /*shifted undo key*/ 1363 {"!3", "S-undo"} /*shifted undo key*/
1364 }; 1364 };
1365 1365
1366#ifndef DOS_NT
1366static char **term_get_fkeys_address; 1367static char **term_get_fkeys_address;
1367static KBOARD *term_get_fkeys_kboard; 1368static KBOARD *term_get_fkeys_kboard;
1368static Lisp_Object term_get_fkeys_1 (void); 1369static Lisp_Object term_get_fkeys_1 (void);
@@ -1500,6 +1501,7 @@ term_get_fkeys_1 (void)
1500 1501
1501 return Qnil; 1502 return Qnil;
1502} 1503}
1504#endif /* not DOS_NT */
1503 1505
1504 1506
1505/*********************************************************************** 1507/***********************************************************************
diff --git a/src/terminfo.c b/src/terminfo.c
index 89d7426e8f4..50749492cfe 100644
--- a/src/terminfo.c
+++ b/src/terminfo.c
@@ -35,10 +35,12 @@ char *UP, *BC, PC;
35*/ 35*/
36 36
37char * 37char *
38tparam (char *string, char *outstring, int len, int arg1, int arg2, int arg3, int arg4, int arg5, int arg6, int arg7, int arg8, int arg9) 38tparam (char *string, char *outstring,
39 int len, int arg1, int arg2, int arg3, int arg4,
40 int arg5, int arg6, int arg7, int arg8, int arg9)
39{ 41{
40 char *temp; 42 char *temp;
41 extern char *tparm(/* ??? */); 43 extern char *tparm (char *str, ...);
42 44
43 temp = tparm (string, arg1, arg2, arg3, arg4, arg5, arg6, arg7, arg8, arg9); 45 temp = tparm (string, arg1, arg2, arg3, arg4, arg5, arg6, arg7, arg8, arg9);
44 if (outstring == 0) 46 if (outstring == 0)
diff --git a/src/unexalpha.c b/src/unexalpha.c
deleted file mode 100644
index d0faa179931..00000000000
--- a/src/unexalpha.c
+++ /dev/null
@@ -1,539 +0,0 @@
1/* Unexec for DEC alpha.
2
3 Copyright (C) 1994, 2000, 2001, 2002, 2003, 2004,
4 2005, 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc.
5
6Author: Rainer Schoepf <schoepf@sc.ZIB-Berlin.DE>
7
8This file is part of GNU Emacs.
9
10GNU Emacs is free software: you can redistribute it and/or modify
11it under the terms of the GNU General Public License as published by
12the Free Software Foundation, either version 3 of the License, or
13(at your option) any later version.
14
15GNU Emacs is distributed in the hope that it will be useful,
16but WITHOUT ANY WARRANTY; without even the implied warranty of
17MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18GNU General Public License for more details.
19
20You should have received a copy of the GNU General Public License
21along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
22
23
24#include <config.h>
25#include <sys/types.h>
26#include <sys/file.h>
27#include <sys/stat.h>
28#include <sys/mman.h>
29#include <stdio.h>
30#include <errno.h>
31#include <string.h>
32#if !defined (__NetBSD__) && !defined (__OpenBSD__)
33#include <filehdr.h>
34#include <aouthdr.h>
35#include <scnhdr.h>
36#include <syms.h>
37#ifndef __linux__
38# include <reloc.h>
39# include <elf_abi.h>
40#endif
41#else /* __NetBSD__ or __OpenBSD__ */
42/*
43 * NetBSD/Alpha does not have 'normal' user-land ECOFF support because
44 * there's no desire to support ECOFF as the executable format in the
45 * long term.
46 */
47#include <sys/exec_ecoff.h>
48
49/* Structures, constants, etc., that NetBSD defines strangely. */
50#define filehdr ecoff_filehdr
51#define aouthdr ecoff_aouthdr
52#define scnhdr ecoff_scnhdr
53#define HDRR struct ecoff_symhdr
54#define pHDRR HDRR *
55#define cbHDRR sizeof(HDRR)
56#ifdef __OpenBSD__
57#define ALPHAMAGIC ECOFF_MAGIC_NATIVE_ALPHA
58#else
59#define ALPHAMAGIC ECOFF_MAGIC_NETBSD_ALPHA
60#endif
61#define ZMAGIC ECOFF_ZMAGIC
62
63/* Misc. constants that NetBSD doesn't define at all. */
64#define ALPHAUMAGIC 0617
65#define _MIPS_NSCNS_MAX 35
66#define STYP_TEXT 0x00000020
67#define STYP_DATA 0x00000040
68#define STYP_BSS 0x00000080
69#define STYP_RDATA 0x00000100
70#define STYP_SDATA 0x00000200
71#define STYP_SBSS 0x00000400
72#define STYP_INIT 0x80000000
73#define _TEXT ".text"
74#define _DATA ".data"
75#define _BSS ".bss"
76#define _INIT ".init"
77#define _RDATA ".rdata"
78#define _SDATA ".sdata"
79#define _SBSS ".sbss"
80#define TEXT_START 0x120000000
81#endif /* __NetBSD__ || __OpenBSD__ */
82
83
84static void fatal_unexec (char *, char *);
85static void mark_x (char *);
86
87static void update_dynamic_symbols (char *, char *, int, struct aouthdr);
88
89#define READ(_fd, _buffer, _size, _error_message, _error_arg) \
90 errno = EEOF; \
91 if (read (_fd, _buffer, _size) != _size) \
92 fatal_unexec (_error_message, _error_arg);
93
94#define WRITE(_fd, _buffer, _size, _error_message, _error_arg) \
95 if (write (_fd, _buffer, _size) != _size) \
96 fatal_unexec (_error_message, _error_arg);
97
98#define SEEK(_fd, _position, _error_message, _error_arg) \
99 errno = EEOF; \
100 if (lseek (_fd, _position, L_SET) != _position) \
101 fatal_unexec (_error_message, _error_arg);
102
103#ifdef HAVE_UNISTD_H
104#include <unistd.h>
105#else
106void *sbrk ();
107#endif
108
109#define EEOF -1
110
111static struct scnhdr *text_section;
112static struct scnhdr *rel_dyn_section;
113static struct scnhdr *dynstr_section;
114static struct scnhdr *dynsym_section;
115static struct scnhdr *init_section;
116static struct scnhdr *finit_section;
117static struct scnhdr *rdata_section;
118static struct scnhdr *rconst_section;
119static struct scnhdr *data_section;
120static struct scnhdr *pdata_section;
121static struct scnhdr *xdata_section;
122static struct scnhdr *got_section;
123static struct scnhdr *lit8_section;
124static struct scnhdr *lit4_section;
125static struct scnhdr *sdata_section;
126static struct scnhdr *sbss_section;
127static struct scnhdr *bss_section;
128
129static struct scnhdr old_data_scnhdr;
130
131static unsigned long Brk;
132
133struct headers {
134 struct filehdr fhdr;
135 struct aouthdr aout;
136 struct scnhdr section[_MIPS_NSCNS_MAX];
137};
138
139
140void
141unexec (new_name, a_name, data_start, bss_start, entry_address)
142 char *new_name, *a_name;
143 unsigned long data_start, bss_start, entry_address;
144{
145 int new, old;
146 char * oldptr;
147 struct headers ohdr, nhdr;
148 struct stat stat;
149 long pagesize, brk;
150 long newsyms, symrel;
151 int nread;
152 int i;
153 long vaddr, scnptr;
154#define BUFSIZE 8192
155 char buffer[BUFSIZE];
156
157 if ((old = open (a_name, O_RDONLY)) < 0)
158 fatal_unexec ("opening %s", a_name);
159
160 new = creat (new_name, 0666);
161 if (new < 0) fatal_unexec ("creating %s", new_name);
162
163 if ((fstat (old, &stat) == -1))
164 fatal_unexec ("fstat %s", a_name);
165
166 oldptr = (char *)mmap (0, stat.st_size, PROT_READ, MAP_FILE|MAP_SHARED, old, 0);
167
168 if (oldptr == (char *)-1)
169 fatal_unexec ("mmap %s", a_name);
170
171 close (old);
172
173 /* This is a copy of the a.out header of the original executable */
174
175 ohdr = (*(struct headers *)oldptr);
176
177 /* This is where we build the new header from the in-memory copy */
178
179 nhdr = *((struct headers *)TEXT_START);
180
181 /* First do some consistency checks */
182
183 if (nhdr.fhdr.f_magic != ALPHAMAGIC
184 && nhdr.fhdr.f_magic != ALPHAUMAGIC)
185 {
186 fprintf (stderr, "unexec: input file magic number is %x, not %x or %x.\n",
187 nhdr.fhdr.f_magic, ALPHAMAGIC, ALPHAUMAGIC);
188 exit (1);
189 }
190
191 if (nhdr.fhdr.f_opthdr != sizeof (nhdr.aout))
192 {
193 fprintf (stderr, "unexec: input a.out header is %d bytes, not %d.\n",
194 nhdr.fhdr.f_opthdr, (int)sizeof (nhdr.aout));
195 exit (1);
196 }
197 if (nhdr.aout.magic != ZMAGIC)
198 {
199 fprintf (stderr, "unexec: input file a.out magic number is %o, not %o.\n",
200 nhdr.aout.magic, ZMAGIC);
201 exit (1);
202 }
203
204
205 /* Now check the existence of certain header section and grab
206 their addresses. */
207
208#define CHECK_SCNHDR(ptr, name, flags) \
209 ptr = NULL; \
210 for (i = 0; i < nhdr.fhdr.f_nscns && !ptr; i++) \
211 if (strncmp (nhdr.section[i].s_name, name, 8) == 0) \
212 { \
213 if (nhdr.section[i].s_flags != flags) \
214 fprintf (stderr, "unexec: %x flags (%x expected) in %s section.\n", \
215 nhdr.section[i].s_flags, flags, name); \
216 ptr = nhdr.section + i; \
217 } \
218
219 CHECK_SCNHDR (text_section, _TEXT, STYP_TEXT);
220 CHECK_SCNHDR (init_section, _INIT, STYP_INIT);
221#ifdef _REL_DYN
222 CHECK_SCNHDR (rel_dyn_section, _REL_DYN, STYP_REL_DYN);
223#endif /* _REL_DYN */
224#ifdef _DYNSYM
225 CHECK_SCNHDR (dynsym_section, _DYNSYM, STYP_DYNSYM);
226#endif /* _REL_DYN */
227#ifdef _DYNSTR
228 CHECK_SCNHDR (dynstr_section, _DYNSTR, STYP_DYNSTR);
229#endif /* _REL_DYN */
230#ifdef _FINI
231 CHECK_SCNHDR (finit_section, _FINI, STYP_FINI);
232#endif /* _FINI */
233 CHECK_SCNHDR (rdata_section, _RDATA, STYP_RDATA);
234#ifdef _RCONST
235 CHECK_SCNHDR (rconst_section, _RCONST, STYP_RCONST);
236#endif
237#ifdef _PDATA
238 CHECK_SCNHDR (pdata_section, _PDATA, STYP_PDATA);
239#endif /* _PDATA */
240#ifdef _GOT
241 CHECK_SCNHDR (got_section, _GOT, STYP_GOT);
242#endif /* _GOT */
243 CHECK_SCNHDR (data_section, _DATA, STYP_DATA);
244#ifdef _XDATA
245 CHECK_SCNHDR (xdata_section, _XDATA, STYP_XDATA);
246#endif /* _XDATA */
247#ifdef _LIT8
248 CHECK_SCNHDR (lit8_section, _LIT8, STYP_LIT8);
249 CHECK_SCNHDR (lit4_section, _LIT4, STYP_LIT4);
250#endif /* _LIT8 */
251 CHECK_SCNHDR (sdata_section, _SDATA, STYP_SDATA);
252 CHECK_SCNHDR (sbss_section, _SBSS, STYP_SBSS);
253 CHECK_SCNHDR (bss_section, _BSS, STYP_BSS);
254
255
256 pagesize = getpagesize ();
257 brk = (((long) (sbrk (0))) + pagesize - 1) & (-pagesize);
258
259 /* Remember the current break */
260
261 Brk = brk;
262
263 memcpy (&old_data_scnhdr, data_section, sizeof (old_data_scnhdr));
264
265 nhdr.aout.dsize = brk - DATA_START;
266 nhdr.aout.bsize = 0;
267 if (entry_address == 0)
268 {
269 extern __start ();
270 nhdr.aout.entry = (unsigned long)__start;
271 }
272 else
273 nhdr.aout.entry = entry_address;
274
275 nhdr.aout.bss_start = nhdr.aout.data_start + nhdr.aout.dsize;
276
277 if (rdata_section != NULL)
278 {
279 rdata_section->s_size = data_start - DATA_START;
280
281 /* Adjust start and virtual addresses of rdata_section, too. */
282 rdata_section->s_vaddr = DATA_START;
283 rdata_section->s_paddr = DATA_START;
284 rdata_section->s_scnptr = text_section->s_scnptr + nhdr.aout.tsize;
285 }
286
287 data_section->s_vaddr = data_start;
288 data_section->s_paddr = data_start;
289 data_section->s_size = brk - data_start;
290
291 if (rdata_section != NULL)
292 {
293 data_section->s_scnptr = rdata_section->s_scnptr + rdata_section->s_size;
294 }
295
296 vaddr = data_section->s_vaddr + data_section->s_size;
297 scnptr = data_section->s_scnptr + data_section->s_size;
298 if (lit8_section != NULL)
299 {
300 lit8_section->s_vaddr = vaddr;
301 lit8_section->s_paddr = vaddr;
302 lit8_section->s_size = 0;
303 lit8_section->s_scnptr = scnptr;
304 }
305 if (lit4_section != NULL)
306 {
307 lit4_section->s_vaddr = vaddr;
308 lit4_section->s_paddr = vaddr;
309 lit4_section->s_size = 0;
310 lit4_section->s_scnptr = scnptr;
311 }
312 if (sdata_section != NULL)
313 {
314 sdata_section->s_vaddr = vaddr;
315 sdata_section->s_paddr = vaddr;
316 sdata_section->s_size = 0;
317 sdata_section->s_scnptr = scnptr;
318 }
319#ifdef _XDATA
320 if (xdata_section != NULL)
321 {
322 xdata_section->s_vaddr = vaddr;
323 xdata_section->s_paddr = vaddr;
324 xdata_section->s_size = 0;
325 xdata_section->s_scnptr = scnptr;
326 }
327#endif
328#ifdef _GOT
329 if (got_section != NULL)
330 {
331 memcpy (buffer, got_section, sizeof (struct scnhdr));
332
333 got_section->s_vaddr = vaddr;
334 got_section->s_paddr = vaddr;
335 got_section->s_size = 0;
336 got_section->s_scnptr = scnptr;
337 }
338#endif /*_GOT */
339 if (sbss_section != NULL)
340 {
341 sbss_section->s_vaddr = vaddr;
342 sbss_section->s_paddr = vaddr;
343 sbss_section->s_size = 0;
344 sbss_section->s_scnptr = scnptr;
345 }
346 if (bss_section != NULL)
347 {
348 bss_section->s_vaddr = vaddr;
349 bss_section->s_paddr = vaddr;
350 bss_section->s_size = 0;
351 bss_section->s_scnptr = scnptr;
352 }
353
354 WRITE (new, (char *)TEXT_START, nhdr.aout.tsize,
355 "writing text section to %s", new_name);
356 WRITE (new, (char *)DATA_START, nhdr.aout.dsize,
357 "writing data section to %s", new_name);
358
359#ifdef _GOT
360#define old_got_section ((struct scnhdr *)buffer)
361
362 if (got_section != NULL)
363 {
364 SEEK (new, old_got_section->s_scnptr,
365 "seeking to start of got_section in %s", new_name);
366 WRITE (new, oldptr + old_got_section->s_scnptr, old_got_section->s_size,
367 "writing new got_section of %s", new_name);
368 SEEK (new, nhdr.aout.tsize + nhdr.aout.dsize,
369 "seeking to end of data section of %s", new_name);
370 }
371
372#undef old_got_section
373#endif
374
375 /*
376 * Construct new symbol table header
377 */
378
379 memcpy (buffer, oldptr + nhdr.fhdr.f_symptr, cbHDRR);
380
381#define symhdr ((pHDRR)buffer)
382 newsyms = nhdr.aout.tsize + nhdr.aout.dsize;
383 symrel = newsyms - nhdr.fhdr.f_symptr;
384 nhdr.fhdr.f_symptr = newsyms;
385 symhdr->cbLineOffset += symrel;
386 symhdr->cbDnOffset += symrel;
387 symhdr->cbPdOffset += symrel;
388 symhdr->cbSymOffset += symrel;
389 symhdr->cbOptOffset += symrel;
390 symhdr->cbAuxOffset += symrel;
391 symhdr->cbSsOffset += symrel;
392 symhdr->cbSsExtOffset += symrel;
393 symhdr->cbFdOffset += symrel;
394 symhdr->cbRfdOffset += symrel;
395 symhdr->cbExtOffset += symrel;
396
397 WRITE (new, buffer, cbHDRR, "writing symbol table header of %s", new_name);
398
399 /*
400 * Copy the symbol table and line numbers
401 */
402 WRITE (new, oldptr + ohdr.fhdr.f_symptr + cbHDRR,
403 stat.st_size - ohdr.fhdr.f_symptr - cbHDRR,
404 "writing symbol table of %s", new_name);
405
406#ifdef _REL_DYN
407 if (rel_dyn_section)
408 update_dynamic_symbols (oldptr, new_name, new, nhdr.aout);
409#endif
410
411#undef symhdr
412
413 SEEK (new, 0, "seeking to start of header in %s", new_name);
414 WRITE (new, &nhdr, sizeof (nhdr),
415 "writing header of %s", new_name);
416
417 close (old);
418 close (new);
419 mark_x (new_name);
420}
421
422
423static void
424update_dynamic_symbols (old, new_name, new, aout)
425 char *old; /* Pointer to old executable */
426 char *new_name; /* Name of new executable */
427 int new; /* File descriptor for new executable */
428 struct aouthdr aout; /* a.out info from the file header */
429{
430#if !defined (__linux__) && !defined (__NetBSD__) && !defined (__OpenBSD__)
431
432 typedef struct dynrel_info {
433 char * addr;
434 unsigned type:8;
435 unsigned index:24;
436 unsigned info:8;
437 unsigned pad:8;
438 } dr_info;
439
440 int nsyms = rel_dyn_section->s_size / sizeof (struct dynrel_info);
441 int i;
442 dr_info * rd_base = (dr_info *) (old + rel_dyn_section->s_scnptr);
443 Elf32_Sym * ds_base = (Elf32_Sym *) (old + dynsym_section->s_scnptr);
444
445 for (i = 0; i < nsyms; i++) {
446 register Elf32_Sym x;
447
448 if (rd_base[i].index == 0)
449 continue;
450
451 x = ds_base[rd_base[i].index];
452
453#if 0
454 fprintf (stderr, "Object inspected: %s, addr = %lx, shndx = %x",
455 old + dynstr_section->s_scnptr + x.st_name, rd_base[i].addr, x.st_shndx);
456#endif
457
458
459 if ((ELF32_ST_BIND (x.st_info) == STB_GLOBAL)
460 && (x.st_shndx == 0)
461 /* && (x.st_value == NULL) */
462 ) {
463 /* OK, this is probably a reference to an object in a shared
464 library, so copy the old value. This is done in several steps:
465 1. reladdr is the address of the location in question relative to
466 the start of the data section,
467 2. oldref is the addr is the mapped in temacs executable,
468 3. newref is the address of the location in question in the
469 undumped executable,
470 4. len is the size of the object reference in bytes --
471 currently only 4 (long) and 8 (quad) are supported.
472 */
473 register unsigned long reladdr = (long)rd_base[i].addr - old_data_scnhdr.s_vaddr;
474 char * oldref = old + old_data_scnhdr.s_scnptr + reladdr;
475 unsigned long newref = aout.tsize + reladdr;
476 int len;
477
478#if 0
479 fprintf (stderr, "...relocated\n");
480#endif
481
482 if (rd_base[i].type == R_REFLONG)
483 len = 4;
484 else if (rd_base[i].type == R_REFQUAD)
485 len = 8;
486 else
487 fatal_unexec ("unrecognized relocation type in .dyn.rel section (symbol #%d)", (char *) i);
488
489 SEEK (new, newref, "seeking to dynamic symbol in %s", new_name);
490 WRITE (new, oldref, len, "writing old dynrel info in %s", new_name);
491 }
492
493#if 0
494 else
495 fprintf (stderr, "...not relocated\n");
496#endif
497
498 }
499
500#endif /* not __linux__ and not __NetBSD__ and not __OpenBSD__ */
501}
502
503
504/*
505 * mark_x
506 *
507 * After successfully building the new a.out, mark it executable
508 */
509
510static void
511mark_x (name)
512 char *name;
513{
514 struct stat sbuf;
515 int um = umask (777);
516 umask (um);
517 if (stat (name, &sbuf) < 0)
518 fatal_unexec ("getting protection on %s", name);
519 sbuf.st_mode |= 0111 & ~um;
520 if (chmod (name, sbuf.st_mode) < 0)
521 fatal_unexec ("setting protection on %s", name);
522}
523
524static void
525fatal_unexec (s, arg)
526 char *s;
527 char *arg;
528{
529 if (errno == EEOF)
530 fputs ("unexec: unexpected end of file, ", stderr);
531 else
532 fprintf (stderr, "unexec: %s, ", strerror (errno));
533 fprintf (stderr, s, arg);
534 fputs (".\n", stderr);
535 exit (1);
536}
537
538/* arch-tag: 46316c49-ee08-4aa3-942b-00798902f5bd
539 (do not change this comment) */
diff --git a/src/vm-limit.c b/src/vm-limit.c
index b288276f394..71ad82d687e 100644
--- a/src/vm-limit.c
+++ b/src/vm-limit.c
@@ -100,7 +100,7 @@ get_lim_data (void)
100} 100}
101 101
102#else 102#else
103#if !defined (BSD4_2) && !defined (__osf__) 103#if !defined (BSD4_2) && !defined (__osf__) && !defined (CYGWIN)
104 104
105#ifdef MSDOS 105#ifdef MSDOS
106void 106void
@@ -173,9 +173,9 @@ static void
173check_memory_limits (void) 173check_memory_limits (void)
174{ 174{
175#ifdef REL_ALLOC 175#ifdef REL_ALLOC
176 extern POINTER (*real_morecore) (); 176 extern POINTER (*real_morecore) (SIZE);
177#endif 177#endif
178 extern POINTER (*__morecore) (); 178 extern POINTER (*__morecore) (SIZE);
179 179
180 register POINTER cp; 180 register POINTER cp;
181 unsigned long five_percent; 181 unsigned long five_percent;
diff --git a/src/w32fns.c b/src/w32fns.c
index 57786d76795..72830c435e9 100644
--- a/src/w32fns.c
+++ b/src/w32fns.c
@@ -439,8 +439,6 @@ void x_explicitly_set_name (struct frame *, Lisp_Object, Lisp_Object);
439void x_set_menu_bar_lines (struct frame *, Lisp_Object, Lisp_Object); 439void x_set_menu_bar_lines (struct frame *, Lisp_Object, Lisp_Object);
440void x_set_title (struct frame *, Lisp_Object, Lisp_Object); 440void x_set_title (struct frame *, Lisp_Object, Lisp_Object);
441void x_set_tool_bar_lines (struct frame *, Lisp_Object, Lisp_Object); 441void x_set_tool_bar_lines (struct frame *, Lisp_Object, Lisp_Object);
442static void x_edge_detection (struct frame *, struct image *, Lisp_Object,
443 Lisp_Object);
444 442
445 443
446 444
@@ -788,25 +786,6 @@ DEFUN ("w32-default-color-map", Fw32_default_color_map, Sw32_default_color_map,
788} 786}
789 787
790static Lisp_Object 788static Lisp_Object
791w32_to_x_color (Lisp_Object rgb)
792{
793 Lisp_Object color;
794
795 CHECK_NUMBER (rgb);
796
797 BLOCK_INPUT;
798
799 color = Frassq (rgb, Vw32_color_map);
800
801 UNBLOCK_INPUT;
802
803 if (!NILP (color))
804 return (Fcar (color));
805 else
806 return Qnil;
807}
808
809static Lisp_Object
810w32_color_map_lookup (char *colorname) 789w32_color_map_lookup (char *colorname)
811{ 790{
812 Lisp_Object tail, ret = Qnil; 791 Lisp_Object tail, ret = Qnil;
diff --git a/src/w32gui.h b/src/w32gui.h
index 07a6fed0b47..9cad4f21f21 100644
--- a/src/w32gui.h
+++ b/src/w32gui.h
@@ -118,7 +118,7 @@ extern int nCmdShow;
118#define PBaseSize (1L << 8) /* program specified base for incrementing */ 118#define PBaseSize (1L << 8) /* program specified base for incrementing */
119#define PWinGravity (1L << 9) /* program specified window gravity */ 119#define PWinGravity (1L << 9) /* program specified window gravity */
120 120
121extern int XParseGeometry (); 121extern int XParseGeometry (char *, int *, int *, unsigned *, unsigned *);
122 122
123 123
124typedef struct { 124typedef struct {
diff --git a/src/w32heap.h b/src/w32heap.h
index cbd7f7ae96d..20a49a4e0ac 100644
--- a/src/w32heap.h
+++ b/src/w32heap.h
@@ -41,8 +41,8 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
41#define get_w32_major_version() w32_major_version 41#define get_w32_major_version() w32_major_version
42#define get_w32_minor_version() w32_minor_version 42#define get_w32_minor_version() w32_minor_version
43 43
44extern unsigned char *get_data_start(); 44extern unsigned char *get_data_start (void);
45extern unsigned char *get_data_end(); 45extern unsigned char *get_data_end (void);
46extern unsigned long reserved_heap_size; 46extern unsigned long reserved_heap_size;
47extern SYSTEM_INFO sysinfo_cache; 47extern SYSTEM_INFO sysinfo_cache;
48extern OSVERSIONINFO osinfo_cache; 48extern OSVERSIONINFO osinfo_cache;
@@ -62,7 +62,7 @@ extern int os_subtype;
62extern void *sbrk (unsigned long size); 62extern void *sbrk (unsigned long size);
63 63
64/* Initialize heap structures for sbrk on startup. */ 64/* Initialize heap structures for sbrk on startup. */
65extern void init_heap (); 65extern void init_heap (void);
66 66
67/* Round the heap to this size. */ 67/* Round the heap to this size. */
68extern void round_heap (unsigned long size); 68extern void round_heap (unsigned long size);
diff --git a/src/w32menu.c b/src/w32menu.c
index e96b70b59dc..919f8505da8 100644
--- a/src/w32menu.c
+++ b/src/w32menu.c
@@ -111,30 +111,6 @@ void w32_free_menu_strings (HWND);
111 111
112int pending_menu_activation; 112int pending_menu_activation;
113 113
114
115/* Return the frame whose ->output_data.w32->menubar_widget equals
116 ID, or 0 if none. */
117
118static struct frame *
119menubar_id_to_frame (HMENU id)
120{
121 Lisp_Object tail, frame;
122 FRAME_PTR f;
123
124 for (tail = Vframe_list; CONSP (tail); tail = XCDR (tail))
125 {
126 frame = XCAR (tail);
127 if (!FRAMEP (frame))
128 continue;
129 f = XFRAME (frame);
130 if (!FRAME_WINDOW_P (f))
131 continue;
132 if (f->output_data.w32->menubar_widget == id)
133 return f;
134 }
135 return 0;
136}
137
138#ifdef HAVE_MENUS 114#ifdef HAVE_MENUS
139 115
140DEFUN ("x-popup-dialog", Fx_popup_dialog, Sx_popup_dialog, 2, 3, 0, 116DEFUN ("x-popup-dialog", Fx_popup_dialog, Sx_popup_dialog, 2, 3, 0,
@@ -1316,14 +1292,6 @@ name_is_separator (char *name)
1316 return (*name == '\0' || start + 2 == name); 1292 return (*name == '\0' || start + 2 == name);
1317} 1293}
1318 1294
1319
1320/* Indicate boundary between left and right. */
1321static int
1322add_left_right_boundary (HMENU menu)
1323{
1324 return AppendMenu (menu, MF_MENUBARBREAK, 0, NULL);
1325}
1326
1327/* UTF8: 0xxxxxxx, 110xxxxx 10xxxxxx, 1110xxxx, 10xxxxxx, 10xxxxxx */ 1295/* UTF8: 0xxxxxxx, 110xxxxx 10xxxxxx, 1110xxxx, 10xxxxxx, 10xxxxxx */
1328static void 1296static void
1329utf8to16 (unsigned char * src, int len, WCHAR * dest) 1297utf8to16 (unsigned char * src, int len, WCHAR * dest)
diff --git a/src/w32term.c b/src/w32term.c
index 3a0a1b1abae..fc03034b14b 100644
--- a/src/w32term.c
+++ b/src/w32term.c
@@ -268,7 +268,9 @@ static void x_draw_bar_cursor (struct window *, struct glyph_row *, int,
268static void w32_clip_to_row (struct window *, struct glyph_row *, int, HDC); 268static void w32_clip_to_row (struct window *, struct glyph_row *, int, HDC);
269static BOOL my_show_window (struct frame *, HWND, int); 269static BOOL my_show_window (struct frame *, HWND, int);
270static void my_set_window_pos (HWND, HWND, int, int, int, int, UINT); 270static void my_set_window_pos (HWND, HWND, int, int, int, int, UINT);
271#if 0
271static void my_set_focus (struct frame *, HWND); 272static void my_set_focus (struct frame *, HWND);
273#endif
272static void my_set_foreground_window (HWND); 274static void my_set_foreground_window (HWND);
273static void my_destroy_window (struct frame *, HWND); 275static void my_destroy_window (struct frame *, HWND);
274 276
@@ -3366,12 +3368,14 @@ my_set_window_pos (HWND hwnd, HWND hwndAfter,
3366#endif 3368#endif
3367} 3369}
3368 3370
3371#if 0
3369static void 3372static void
3370my_set_focus (struct frame * f, HWND hwnd) 3373my_set_focus (struct frame * f, HWND hwnd)
3371{ 3374{
3372 SendMessage (FRAME_W32_WINDOW (f), WM_EMACS_SETFOCUS, 3375 SendMessage (FRAME_W32_WINDOW (f), WM_EMACS_SETFOCUS,
3373 (WPARAM) hwnd, 0); 3376 (WPARAM) hwnd, 0);
3374} 3377}
3378#endif
3375 3379
3376static void 3380static void
3377my_set_foreground_window (HWND hwnd) 3381my_set_foreground_window (HWND hwnd)
diff --git a/src/w32term.h b/src/w32term.h
index b5b3d4451f2..ea245144ac3 100644
--- a/src/w32term.h
+++ b/src/w32term.h
@@ -48,8 +48,6 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
48extern MSG CurMsg; 48extern MSG CurMsg;
49extern BOOL bUseDflt; 49extern BOOL bUseDflt;
50 50
51extern struct frame *x_window_to_frame ();
52
53/* Structure recording bitmaps and reference count. 51/* Structure recording bitmaps and reference count.
54 If REFCOUNT is 0 then this record is free to be reused. */ 52 If REFCOUNT is 0 then this record is free to be reused. */
55 53
@@ -226,13 +224,16 @@ extern Lisp_Object w32_display_name_list;
226/* Regexp matching a font name whose width is the same as `PIXEL_SIZE'. */ 224/* Regexp matching a font name whose width is the same as `PIXEL_SIZE'. */
227extern Lisp_Object Vx_pixel_size_width_font_regexp; 225extern Lisp_Object Vx_pixel_size_width_font_regexp;
228 226
229struct w32_display_info *x_display_info_for_name (); 227extern struct frame *x_window_to_frame (struct w32_display_info *, HWND);
228
229struct w32_display_info *x_display_info_for_name (Lisp_Object);
230 230
231Lisp_Object display_x_get_resource (struct w32_display_info *, 231Lisp_Object display_x_get_resource (struct w32_display_info *,
232 Lisp_Object, Lisp_Object, 232 Lisp_Object, Lisp_Object,
233 Lisp_Object, Lisp_Object); 233 Lisp_Object, Lisp_Object);
234 234
235extern struct w32_display_info *w32_term_init (); 235extern struct w32_display_info *w32_term_init (Lisp_Object,
236 char *, char *);
236 237
237extern int x_display_pixel_height (struct w32_display_info *); 238extern int x_display_pixel_height (struct w32_display_info *);
238extern int x_display_pixel_width (struct w32_display_info *); 239extern int x_display_pixel_width (struct w32_display_info *);
@@ -544,8 +545,10 @@ struct scroll_bar {
544#define VERTICAL_SCROLL_BAR_WIDTH_TRIM (0) 545#define VERTICAL_SCROLL_BAR_WIDTH_TRIM (0)
545 546
546 547
547extern void w32_fill_rect (); 548struct frame; /* from frame.h */
548extern void w32_clear_window (); 549
550extern void w32_fill_rect (struct frame *, HDC, COLORREF, RECT *);
551extern void w32_clear_window (struct frame *);
549 552
550#define w32_fill_area(f,hdc,pix,x,y,nx,ny) \ 553#define w32_fill_area(f,hdc,pix,x,y,nx,ny) \
551do { \ 554do { \
@@ -645,10 +648,10 @@ typedef struct deferred_msg
645 648
646extern CRITICAL_SECTION critsect; 649extern CRITICAL_SECTION critsect;
647 650
648extern void init_crit (); 651extern void init_crit (void);
649extern void delete_crit (); 652extern void delete_crit (void);
650 653
651extern void signal_quit (); 654extern void signal_quit (void);
652 655
653#define enter_crit() EnterCriticalSection (&critsect) 656#define enter_crit() EnterCriticalSection (&critsect)
654#define leave_crit() LeaveCriticalSection (&critsect) 657#define leave_crit() LeaveCriticalSection (&critsect)
@@ -658,14 +661,13 @@ extern void deselect_palette (struct frame * f, HDC hdc);
658extern HDC get_frame_dc (struct frame * f); 661extern HDC get_frame_dc (struct frame * f);
659extern int release_frame_dc (struct frame * f, HDC hDC); 662extern int release_frame_dc (struct frame * f, HDC hDC);
660 663
661extern void drain_message_queue (); 664extern void drain_message_queue (void);
662 665
663extern BOOL get_next_msg (); 666extern BOOL get_next_msg (W32Msg *, BOOL);
664extern BOOL post_msg (); 667extern BOOL post_msg (W32Msg *);
665extern void complete_deferred_msg (HWND hwnd, UINT msg, LRESULT result); 668extern void complete_deferred_msg (HWND hwnd, UINT msg, LRESULT result);
666extern void wait_for_sync ();
667 669
668extern BOOL parse_button (); 670extern BOOL parse_button (int, int, int *, int *);
669 671
670extern void w32_sys_ring_bell (struct frame *f); 672extern void w32_sys_ring_bell (struct frame *f);
671extern void x_delete_display (struct w32_display_info *dpyinfo); 673extern void x_delete_display (struct w32_display_info *dpyinfo);
@@ -725,7 +727,7 @@ struct frame * check_x_frame (Lisp_Object);
725EXFUN (Fx_display_color_p, 1); 727EXFUN (Fx_display_color_p, 1);
726EXFUN (Fx_display_grayscale_p, 1); 728EXFUN (Fx_display_grayscale_p, 1);
727 729
728typedef DWORD (WINAPI * ClipboardSequence_Proc) (); 730typedef DWORD (WINAPI * ClipboardSequence_Proc) (void);
729typedef BOOL (WINAPI * AppendMenuW_Proc) ( 731typedef BOOL (WINAPI * AppendMenuW_Proc) (
730 IN HMENU, 732 IN HMENU,
731 IN UINT, 733 IN UINT,
diff --git a/src/xfaces.c b/src/xfaces.c
index d5aabd40c0c..c0c53f3aa1f 100644
--- a/src/xfaces.c
+++ b/src/xfaces.c
@@ -513,7 +513,6 @@ struct named_merge_point;
513static void map_tty_color (struct frame *, struct face *, 513static void map_tty_color (struct frame *, struct face *,
514 enum lface_attribute_index, int *); 514 enum lface_attribute_index, int *);
515static Lisp_Object resolve_face_name (Lisp_Object, int); 515static Lisp_Object resolve_face_name (Lisp_Object, int);
516static int may_use_scalable_font_p (const char *);
517static void set_font_frame_param (Lisp_Object, Lisp_Object); 516static void set_font_frame_param (Lisp_Object, Lisp_Object);
518static int get_lface_attributes (struct frame *, Lisp_Object, Lisp_Object *, 517static int get_lface_attributes (struct frame *, Lisp_Object, Lisp_Object *,
519 int, struct named_merge_point *); 518 int, struct named_merge_point *);