aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ChangeLog19
-rw-r--r--admin/CPP-DEFINES12
-rwxr-xr-xconfigure73
-rw-r--r--configure.in76
-rw-r--r--doc/misc/ChangeLog4
-rw-r--r--doc/misc/calc.texi43
-rw-r--r--lisp/ChangeLog45
-rw-r--r--lisp/dos-fns.el39
-rw-r--r--lisp/gnus/ChangeLog22
-rw-r--r--lisp/gnus/gnus-art.el6
-rw-r--r--lisp/gnus/gnus-sum.el1
-rw-r--r--lisp/gnus/message.el4
-rw-r--r--lisp/gnus/mml1991.el2
-rw-r--r--lisp/gnus/mml2015.el1
-rw-r--r--lisp/net/tramp-smb.el270
-rw-r--r--lisp/net/tramp.el242
-rw-r--r--lisp/progmodes/cc-cmds.el10
-rw-r--r--lisp/progmodes/sh-script.el10
-rw-r--r--lisp/textmodes/ispell.el17
-rw-r--r--lisp/textmodes/sgml-mode.el5
-rw-r--r--lisp/textmodes/tex-mode.el5
-rw-r--r--lwlib/ChangeLog4
-rw-r--r--lwlib/lwlib-Xaw.c2
-rw-r--r--msdos/ChangeLog30
-rw-r--r--msdos/sed1v2.inp28
-rw-r--r--msdos/sed1x.inp7
-rw-r--r--msdos/sed2x.inp5
-rw-r--r--nt/ChangeLog4
-rw-r--r--nt/config.nt19
-rw-r--r--src/ChangeLog48
-rw-r--r--src/Makefile.in235
-rw-r--r--src/config.in30
-rw-r--r--src/s/netbsd.h2
33 files changed, 747 insertions, 573 deletions
diff --git a/ChangeLog b/ChangeLog
index b1b4a39e1fb..ab69ce7b457 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,22 @@
12010-05-14 Glenn Morris <rgm@gnu.org>
2
3 * configure.in (cpp_undefs): Add mktime, register, X11.
4
5 * configure.in (GPM_MOUSE_SUPPORT): Remove.
6 (MOUSE_SUPPORT, TOOLTIP_SUPPORT, WINDOW_SUPPORT): New output variables.
7 (HAVE_WINDOW_SYSTEM, HAVE_MOUSE): Move out of AC_BOTTOM.
8
9 * configure.in (NS_IMPL_GNUSTEP_INC): New output variable.
10 (GNUSTEP_MAKEFILES): Do not output.
11
122010-05-13 Glenn Morris <rgm@gnu.org>
13
14 * configure.in: Fix some paren typos.
15
16 * configure.in (OLDXMENU, LIBXMENU): Set to empty if !HAVE_MENUS.
17
18 * configure.in (LD_SWITCH_X_SITE, C_SWITCH_X_SITE): Do not define.
19
12010-05-12 Glenn Morris <rgm@gnu.org> 202010-05-12 Glenn Morris <rgm@gnu.org>
2 21
3 * configure.in (LIB_SRC_EXTRA_INSTALLABLES): Remove, unused. 22 * configure.in (LIB_SRC_EXTRA_INSTALLABLES): Remove, unused.
diff --git a/admin/CPP-DEFINES b/admin/CPP-DEFINES
index d4776c9b755..1f42eeb9528 100644
--- a/admin/CPP-DEFINES
+++ b/admin/CPP-DEFINES
@@ -22,7 +22,6 @@ NS_IMPL_GNUSTEP Compile support for GNUstep implementation of NS GUI API.
22NS_IMPL_COCOA Compile support for Cocoa (Apple) implementation of NS GUI API. 22NS_IMPL_COCOA Compile support for Cocoa (Apple) implementation of NS GUI API.
23HAVE_X11 Compile support for the X11 GUI. 23HAVE_X11 Compile support for the X11 GUI.
24HAVE_X_WINDOWS Compile support for X Window system 24HAVE_X_WINDOWS Compile support for X Window system
25X11 ?? Makefile.in suggests it's equivalent to HAVE_X11
26USE_LUCID Use the Lucid toolkit for menus&scrollbars. Requires HAVE_X11. 25USE_LUCID Use the Lucid toolkit for menus&scrollbars. Requires HAVE_X11.
27USE_MOTIF Use the Motif toolkit for menus&scrollbars. Requires HAVE_X11. 26USE_MOTIF Use the Motif toolkit for menus&scrollbars. Requires HAVE_X11.
28USE_GTK Use the Gtk toolkit for menus&scrollbars. Requires HAVE_X11. 27USE_GTK Use the Gtk toolkit for menus&scrollbars. Requires HAVE_X11.
@@ -84,6 +83,9 @@ BCOPY_DOWNWARD_SAFE
84BCOPY_UPWARD_SAFE 83BCOPY_UPWARD_SAFE
85BITS_PER_EMACS_INT 84BITS_PER_EMACS_INT
86BITS_PER_LONG 85BITS_PER_LONG
86BITS_PER_CHAR
87BITS_PER_SHORT
88BITS_PER_INT
87BROKEN_DATAGRAM_SOCKETS 89BROKEN_DATAGRAM_SOCKETS
88BROKEN_FIONREAD 90BROKEN_FIONREAD
89BROKEN_GET_CURRENT_DIR_NAME 91BROKEN_GET_CURRENT_DIR_NAME
@@ -98,7 +100,6 @@ BSD4_2
98BSD4_3 100BSD4_3
99BSD_SYSTEM 101BSD_SYSTEM
100CLASH_DETECTION 102CLASH_DETECTION
101C_SWITCH_X_SYSTEM
102DATA_SEG_BITS 103DATA_SEG_BITS
103DATA_START 104DATA_START
104DBL_MIN_REPLACEMENT 105DBL_MIN_REPLACEMENT
@@ -114,7 +115,6 @@ EMACS_CONFIGURATION
114EMACS_CONFIG_OPTIONS 115EMACS_CONFIG_OPTIONS
115EMACS_INT 116EMACS_INT
116EMACS_UINT 117EMACS_UINT
117END_FILES_1
118FILE_SYSTEM_CASE 118FILE_SYSTEM_CASE
119FLOAT_CHECK_DOMAIN 119FLOAT_CHECK_DOMAIN
120FSCALE 120FSCALE
@@ -133,7 +133,6 @@ HAVE_BCMP
133HAVE_BCOPY 133HAVE_BCOPY
134HAVE_CBRT 134HAVE_CBRT
135HAVE_CLOSEDIR 135HAVE_CLOSEDIR
136HAVE_CRTIN
137HAVE_DUP2 136HAVE_DUP2
138HAVE_EUIDACCESS 137HAVE_EUIDACCESS
139HAVE_FMOD 138HAVE_FMOD
@@ -154,9 +153,6 @@ HAVE_INDEX
154HAVE_INET_SOCKETS 153HAVE_INET_SOCKETS
155HAVE_INVERSE_HYPERBOLIC 154HAVE_INVERSE_HYPERBOLIC
156HAVE_LIBKSTAT 155HAVE_LIBKSTAT
157HAVE_LIBNCURSES
158HAVE_LIBPTHREADS
159HAVE_LIBXMU
160HAVE_LIMITS_H 156HAVE_LIMITS_H
161HAVE_LINUX_VERSION_H 157HAVE_LINUX_VERSION_H
162HAVE_LOGB 158HAVE_LOGB
@@ -266,8 +262,6 @@ SIGQUIT
266SIGTRAP 262SIGTRAP
267SIGTYPE 263SIGTYPE
268SOLARIS2 264SOLARIS2
269START_FILES
270START_FILES_1
271STDC_HEADERS 265STDC_HEADERS
272SYMS_SYSTEM 266SYMS_SYSTEM
273SYSTEM_PURESIZE_EXTRA 267SYSTEM_PURESIZE_EXTRA
diff --git a/configure b/configure
index fc9096b6783..0a1c2ee3d3b 100755
--- a/configure
+++ b/configure
@@ -717,6 +717,7 @@ SET_MAKE
717XMKMF 717XMKMF
718LD_SWITCH_X_SITE_AUX 718LD_SWITCH_X_SITE_AUX
719LD_SWITCH_X_SITE_AUX_RPATH 719LD_SWITCH_X_SITE_AUX_RPATH
720NS_IMPL_GNUSTEP_INC
720NS_OBJ 721NS_OBJ
721NS_SUPPORT 722NS_SUPPORT
722LIB_STANDARD 723LIB_STANDARD
@@ -751,7 +752,6 @@ LIBPNG
751LIBTIFF 752LIBTIFF
752LIBGIF 753LIBGIF
753LIBGPM 754LIBGPM
754GPM_MOUSE_SUPPORT
755LIBXSM 755LIBXSM
756ALLOCA 756ALLOCA
757liblockfile 757liblockfile
@@ -796,7 +796,6 @@ ns_appdir
796ns_appbindir 796ns_appbindir
797ns_appresdir 797ns_appresdir
798ns_appsrc 798ns_appsrc
799GNUSTEP_MAKEFILES
800GNUSTEP_SYSTEM_HEADERS 799GNUSTEP_SYSTEM_HEADERS
801GNUSTEP_SYSTEM_LIBRARIES 800GNUSTEP_SYSTEM_LIBRARIES
802GNU_OBJC_CFLAGS 801GNU_OBJC_CFLAGS
@@ -815,6 +814,9 @@ POST_ALLOC_OBJ
815LD_SWITCH_SYSTEM_TEMACS 814LD_SWITCH_SYSTEM_TEMACS
816LD_SWITCH_SYSTEM_EXTRA 815LD_SWITCH_SYSTEM_EXTRA
817LIB_GCC 816LIB_GCC
817MOUSE_SUPPORT
818TOOLTIP_SUPPORT
819WINDOW_SUPPORT
818LTLIBOBJS' 820LTLIBOBJS'
819ac_subst_files='' 821ac_subst_files=''
820ac_user_opts=' 822ac_user_opts='
@@ -6484,7 +6486,7 @@ case $opsys in
6484 START_FILES='pre-crt0.o $(CRT_DIR)/crt0.o' 6486 START_FILES='pre-crt0.o $(CRT_DIR)/crt0.o'
6485 ;; 6487 ;;
6486 netbsd | openbsd ) 6488 netbsd | openbsd )
6487 if test -f $(CRT_DIR)/crti.o; then 6489 if test -f $CRT_DIR/crti.o; then
6488 LIB_STANDARD='-lgcc -lc -lgcc $(CRT_DIR)/crtend.o $(CRT_DIR)/crtn.o' 6490 LIB_STANDARD='-lgcc -lc -lgcc $(CRT_DIR)/crtend.o $(CRT_DIR)/crtn.o'
6489 START_FILES='pre-crt0.o $(CRT_DIR)/crt0.o $(CRT_DIR)/crti.o $(CRT_DIR)/crtbegin.o' 6491 START_FILES='pre-crt0.o $(CRT_DIR)/crt0.o $(CRT_DIR)/crti.o $(CRT_DIR)/crtbegin.o'
6490 else 6492 else
@@ -9929,6 +9931,7 @@ fi
9929HAVE_NS=no 9931HAVE_NS=no
9930NS_IMPL_COCOA=no 9932NS_IMPL_COCOA=no
9931NS_IMPL_GNUSTEP=no 9933NS_IMPL_GNUSTEP=no
9934NS_IMPL_GNUSTEP_INC=
9932tmp_CPPFLAGS="$CPPFLAGS" 9935tmp_CPPFLAGS="$CPPFLAGS"
9933tmp_CFLAGS="$CFLAGS" 9936tmp_CFLAGS="$CFLAGS"
9934CPPFLAGS="$CPPFLAGS -x objective-c" 9937CPPFLAGS="$CPPFLAGS -x objective-c"
@@ -9949,6 +9952,13 @@ if test "${with_ns}" != no; then
9949 GNUSTEP_MAKEFILES="$(. $GNUSTEP_CONFIG_FILE; echo $GNUSTEP_MAKEFILES)" 9952 GNUSTEP_MAKEFILES="$(. $GNUSTEP_CONFIG_FILE; echo $GNUSTEP_MAKEFILES)"
9950 GNUSTEP_SYSTEM_HEADERS="$(. $GNUSTEP_CONFIG_FILE; echo $GNUSTEP_SYSTEM_HEADERS)" 9953 GNUSTEP_SYSTEM_HEADERS="$(. $GNUSTEP_CONFIG_FILE; echo $GNUSTEP_SYSTEM_HEADERS)"
9951 GNUSTEP_SYSTEM_LIBRARIES="$(. $GNUSTEP_CONFIG_FILE; echo $GNUSTEP_SYSTEM_LIBRARIES)" 9954 GNUSTEP_SYSTEM_LIBRARIES="$(. $GNUSTEP_CONFIG_FILE; echo $GNUSTEP_SYSTEM_LIBRARIES)"
9955 ## Pull in stuff from GNUstep-make.
9956 NS_IMPL_GNUSTEP_INC="FOUNDATION_LIB=gnu
9957GUI_LIB=gnu
9958include $GNUSTEP_MAKEFILES/Additional/base.make
9959include $GNUSTEP_MAKEFILES/Additional/gui.make
9960shared=no
9961"
9952 CPPFLAGS="$CPPFLAGS -I${GNUSTEP_SYSTEM_HEADERS}" 9962 CPPFLAGS="$CPPFLAGS -I${GNUSTEP_SYSTEM_HEADERS}"
9953 CFLAGS="$CFLAGS -I${GNUSTEP_SYSTEM_HEADERS}" 9963 CFLAGS="$CFLAGS -I${GNUSTEP_SYSTEM_HEADERS}"
9954 REAL_CFLAGS="$REAL_CFLAGS -I${GNUSTEP_SYSTEM_HEADERS}" 9964 REAL_CFLAGS="$REAL_CFLAGS -I${GNUSTEP_SYSTEM_HEADERS}"
@@ -10141,6 +10151,7 @@ rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext
10141 fi 10151 fi
10142fi 10152fi
10143 10153
10154
10144NS_OBJ= 10155NS_OBJ=
10145NS_SUPPORT= 10156NS_SUPPORT=
10146if test "${HAVE_NS}" = yes; then 10157if test "${HAVE_NS}" = yes; then
@@ -15991,7 +16002,7 @@ fi
15991### Use -lgpm if available, unless `--with-gpm=no'. 16002### Use -lgpm if available, unless `--with-gpm=no'.
15992HAVE_GPM=no 16003HAVE_GPM=no
15993LIBGPM= 16004LIBGPM=
15994GPM_MOUSE_SUPPORT= 16005MOUSE_SUPPORT=
15995if test "${with_gpm}" != "no"; then 16006if test "${with_gpm}" != "no"; then
15996 if test "${ac_cv_header_gpm_h+set}" = set; then 16007 if test "${ac_cv_header_gpm_h+set}" = set; then
15997 { $as_echo "$as_me:$LINENO: checking for gpm.h" >&5 16008 { $as_echo "$as_me:$LINENO: checking for gpm.h" >&5
@@ -16201,12 +16212,12 @@ cat >>confdefs.h <<\_ACEOF
16201_ACEOF 16212_ACEOF
16202 16213
16203 LIBGPM=-lgpm 16214 LIBGPM=-lgpm
16204 GPM_MOUSE_SUPPORT="\${lispsource}mouse.elc" 16215 ## May be reset below.
16216 MOUSE_SUPPORT="\$(GPM_MOUSE_SUPPORT)"
16205 fi 16217 fi
16206fi 16218fi
16207 16219
16208 16220
16209
16210if test "${ac_cv_header_malloc_malloc_h+set}" = set; then 16221if test "${ac_cv_header_malloc_malloc_h+set}" = set; then
16211 { $as_echo "$as_me:$LINENO: checking for malloc/malloc.h" >&5 16222 { $as_echo "$as_me:$LINENO: checking for malloc/malloc.h" >&5
16212$as_echo_n "checking for malloc/malloc.h... " >&6; } 16223$as_echo_n "checking for malloc/malloc.h... " >&6; }
@@ -26313,6 +26324,7 @@ fi
26313### Use configuration here uncanonicalized to avoid exceeding size limits. 26324### Use configuration here uncanonicalized to avoid exceeding size limits.
26314 26325
26315 26326
26327## Unused?
26316 26328
26317 26329
26318 26330
@@ -26334,6 +26346,9 @@ fi
26334 26346
26335 26347
26336 26348
26349## FIXME? Nothing uses @LD_SWITCH_X_SITE@.
26350## src/Makefile.in did add LD_SWITCH_X_SITE (as a cpp define) to the
26351## end of LIBX_BASE, but nothing ever set it.
26337 26352
26338 26353
26339 26354
@@ -26353,7 +26368,6 @@ fi
26353 26368
26354 26369
26355 26370
26356
26357cat >>confdefs.h <<_ACEOF 26371cat >>confdefs.h <<_ACEOF
26358#define EMACS_CONFIGURATION "${canonical}" 26372#define EMACS_CONFIGURATION "${canonical}"
26359_ACEOF 26373_ACEOF
@@ -26374,16 +26388,6 @@ cat >>confdefs.h <<_ACEOF
26374_ACEOF 26388_ACEOF
26375 26389
26376 26390
26377cat >>confdefs.h <<_ACEOF
26378#define LD_SWITCH_X_SITE ${LD_SWITCH_X_SITE}
26379_ACEOF
26380
26381
26382cat >>confdefs.h <<_ACEOF
26383#define C_SWITCH_X_SITE ${C_SWITCH_X_SITE}
26384_ACEOF
26385
26386
26387XMENU_OBJ= 26391XMENU_OBJ=
26388XOBJ= 26392XOBJ=
26389if test "${HAVE_X_WINDOWS}" = "yes" ; then 26393if test "${HAVE_X_WINDOWS}" = "yes" ; then
@@ -26480,7 +26484,7 @@ else
26480 LIBX_OTHER= 26484 LIBX_OTHER=
26481fi 26485fi
26482 26486
26483if test "$HAVE_GTK" = "yes"; then 26487if test "$HAVE_GTK" = "yes" || test "$HAVE_MENUS" != "yes"; then
26484 OLDXMENU= 26488 OLDXMENU=
26485 LIBXMENU= 26489 LIBXMENU=
26486fi 26490fi
@@ -26584,17 +26588,44 @@ if test "x$GCC" = "xyes"; then
26584 ## FIXME? s/gnu-linux.h used to define LIB_GCC as below, then 26588 ## FIXME? s/gnu-linux.h used to define LIB_GCC as below, then
26585 ## immediately undefine it again and redefine it to empty. 26589 ## immediately undefine it again and redefine it to empty.
26586 ## Was the C_SWITCH_X_SITE part really necessary? 26590 ## Was the C_SWITCH_X_SITE part really necessary?
26587## LIB_GCC=`$(CC) $(C_SWITCH_X_SITE) -print-libgcc-file-name` 26591## LIB_GCC=`$CC $C_SWITCH_X_SITE -print-libgcc-file-name`
26588 LIB_GCC= 26592 LIB_GCC=
26589 fi 26593 fi
26590 ;; 26594 ;;
26591 26595
26592 ## Ask GCC where to find libgcc.a. 26596 ## Ask GCC where to find libgcc.a.
26593 *) LIB_GCC=`$(CC) -print-libgcc-file-name 2> /dev/null` ;; 26597 *) LIB_GCC=`$CC -print-libgcc-file-name 2> /dev/null` ;;
26594 esac 26598 esac
26595fi 26599fi
26596 26600
26597 26601
26602TOOLTIP_SUPPORT=
26603WINDOW_SUPPORT=
26604## If we're using X11/GNUstep, define some consequences.
26605if test "$HAVE_X_WINDOWS" = "yes" || test "$HAVE_NS" = "yes"; then
26606
26607cat >>confdefs.h <<\_ACEOF
26608#define HAVE_WINDOW_SYSTEM 1
26609_ACEOF
26610
26611
26612cat >>confdefs.h <<\_ACEOF
26613#define HAVE_MOUSE 1
26614_ACEOF
26615
26616 MOUSE_SUPPORT="\$(REAL_MOUSE_SUPPORT)"
26617 TOOLTIP_SUPPORT="\${lispsource}mouse.elc"
26618
26619 WINDOW_SUPPORT="\$(BASE_WINDOW_SUPPORT)"
26620 test "$HAVE_X_WINDOWS" = "yes" && \
26621 WINDOW_SUPPORT="$WINDOW_SUPPORT \$(X_WINDOW_SUPPORT)"
26622
26623fi
26624
26625
26626
26627
26628
26598 26629
26599 26630
26600 26631
@@ -26691,7 +26722,7 @@ test "${exec_prefix}" != NONE &&
26691# the C preprocessor to some helpful value like 1, or maybe the empty 26722# the C preprocessor to some helpful value like 1, or maybe the empty
26692# string. Needless to say consequent macro substitutions are less 26723# string. Needless to say consequent macro substitutions are less
26693# than conducive to the makefile finding the correct directory. 26724# than conducive to the makefile finding the correct directory.
26694cpp_undefs="`echo $srcdir $configuration $canonical unix | 26725cpp_undefs="`echo $srcdir $configuration $canonical unix mktime register X11 |
26695 sed -e 's/[^a-zA-Z0-9_]/ /g' -e 's/^/ /' -e 's/ *$//' \ 26726 sed -e 's/[^a-zA-Z0-9_]/ /g' -e 's/^/ /' -e 's/ *$//' \
26696 -e 's/ */ -U/g' -e 's/-U[0-9][^ ]*//g'`" 26727 -e 's/ */ -U/g' -e 's/-U[0-9][^ ]*//g'`"
26697 26728
diff --git a/configure.in b/configure.in
index 491c3af9dce..2475caae053 100644
--- a/configure.in
+++ b/configure.in
@@ -1094,7 +1094,7 @@ case $opsys in
1094 START_FILES='pre-crt0.o $(CRT_DIR)/crt0.o' 1094 START_FILES='pre-crt0.o $(CRT_DIR)/crt0.o'
1095 ;; 1095 ;;
1096 netbsd | openbsd ) 1096 netbsd | openbsd )
1097 if test -f $(CRT_DIR)/crti.o; then 1097 if test -f $CRT_DIR/crti.o; then
1098 LIB_STANDARD='-lgcc -lc -lgcc $(CRT_DIR)/crtend.o $(CRT_DIR)/crtn.o' 1098 LIB_STANDARD='-lgcc -lc -lgcc $(CRT_DIR)/crtend.o $(CRT_DIR)/crtn.o'
1099 START_FILES='pre-crt0.o $(CRT_DIR)/crt0.o $(CRT_DIR)/crti.o $(CRT_DIR)/crtbegin.o' 1099 START_FILES='pre-crt0.o $(CRT_DIR)/crt0.o $(CRT_DIR)/crti.o $(CRT_DIR)/crtbegin.o'
1100 else 1100 else
@@ -1452,6 +1452,7 @@ fi
1452HAVE_NS=no 1452HAVE_NS=no
1453NS_IMPL_COCOA=no 1453NS_IMPL_COCOA=no
1454NS_IMPL_GNUSTEP=no 1454NS_IMPL_GNUSTEP=no
1455NS_IMPL_GNUSTEP_INC=
1455tmp_CPPFLAGS="$CPPFLAGS" 1456tmp_CPPFLAGS="$CPPFLAGS"
1456tmp_CFLAGS="$CFLAGS" 1457tmp_CFLAGS="$CFLAGS"
1457CPPFLAGS="$CPPFLAGS -x objective-c" 1458CPPFLAGS="$CPPFLAGS -x objective-c"
@@ -1473,6 +1474,13 @@ if test "${with_ns}" != no; then
1473 GNUSTEP_MAKEFILES="$(. $GNUSTEP_CONFIG_FILE; echo $GNUSTEP_MAKEFILES)" 1474 GNUSTEP_MAKEFILES="$(. $GNUSTEP_CONFIG_FILE; echo $GNUSTEP_MAKEFILES)"
1474 GNUSTEP_SYSTEM_HEADERS="$(. $GNUSTEP_CONFIG_FILE; echo $GNUSTEP_SYSTEM_HEADERS)" 1475 GNUSTEP_SYSTEM_HEADERS="$(. $GNUSTEP_CONFIG_FILE; echo $GNUSTEP_SYSTEM_HEADERS)"
1475 GNUSTEP_SYSTEM_LIBRARIES="$(. $GNUSTEP_CONFIG_FILE; echo $GNUSTEP_SYSTEM_LIBRARIES)" 1476 GNUSTEP_SYSTEM_LIBRARIES="$(. $GNUSTEP_CONFIG_FILE; echo $GNUSTEP_SYSTEM_LIBRARIES)"
1477 ## Pull in stuff from GNUstep-make.
1478 NS_IMPL_GNUSTEP_INC="FOUNDATION_LIB=gnu
1479GUI_LIB=gnu
1480include $GNUSTEP_MAKEFILES/Additional/base.make
1481include $GNUSTEP_MAKEFILES/Additional/gui.make
1482shared=no
1483"
1476 CPPFLAGS="$CPPFLAGS -I${GNUSTEP_SYSTEM_HEADERS}" 1484 CPPFLAGS="$CPPFLAGS -I${GNUSTEP_SYSTEM_HEADERS}"
1477 CFLAGS="$CFLAGS -I${GNUSTEP_SYSTEM_HEADERS}" 1485 CFLAGS="$CFLAGS -I${GNUSTEP_SYSTEM_HEADERS}"
1478 REAL_CFLAGS="$REAL_CFLAGS -I${GNUSTEP_SYSTEM_HEADERS}" 1486 REAL_CFLAGS="$REAL_CFLAGS -I${GNUSTEP_SYSTEM_HEADERS}"
@@ -1491,6 +1499,7 @@ if test "${with_ns}" != no; then
1491 NS_HAVE_NSINTEGER=no 1499 NS_HAVE_NSINTEGER=no
1492 fi 1500 fi
1493fi 1501fi
1502AC_SUBST(NS_IMPL_GNUSTEP_INC)
1494 1503
1495NS_OBJ= 1504NS_OBJ=
1496NS_SUPPORT= 1505NS_SUPPORT=
@@ -2391,7 +2400,7 @@ fi
2391### Use -lgpm if available, unless `--with-gpm=no'. 2400### Use -lgpm if available, unless `--with-gpm=no'.
2392HAVE_GPM=no 2401HAVE_GPM=no
2393LIBGPM= 2402LIBGPM=
2394GPM_MOUSE_SUPPORT= 2403MOUSE_SUPPORT=
2395if test "${with_gpm}" != "no"; then 2404if test "${with_gpm}" != "no"; then
2396 AC_CHECK_HEADER(gpm.h, 2405 AC_CHECK_HEADER(gpm.h,
2397 [AC_CHECK_LIB(gpm, Gpm_Open, HAVE_GPM=yes)]) 2406 [AC_CHECK_LIB(gpm, Gpm_Open, HAVE_GPM=yes)])
@@ -2399,11 +2408,11 @@ if test "${with_gpm}" != "no"; then
2399 if test "${HAVE_GPM}" = "yes"; then 2408 if test "${HAVE_GPM}" = "yes"; then
2400 AC_DEFINE(HAVE_GPM, 1, [Define to 1 if you have the gpm library (-lgpm).]) 2409 AC_DEFINE(HAVE_GPM, 1, [Define to 1 if you have the gpm library (-lgpm).])
2401 LIBGPM=-lgpm 2410 LIBGPM=-lgpm
2402 GPM_MOUSE_SUPPORT="\${lispsource}mouse.elc" 2411 ## May be reset below.
2412 MOUSE_SUPPORT="\$(GPM_MOUSE_SUPPORT)"
2403 fi 2413 fi
2404fi 2414fi
2405AC_SUBST(LIBGPM) 2415AC_SUBST(LIBGPM)
2406AC_SUBST(GPM_MOUSE_SUPPORT)
2407 2416
2408dnl Check for malloc/malloc.h on darwin 2417dnl Check for malloc/malloc.h on darwin
2409AC_CHECK_HEADER(malloc/malloc.h, [AC_DEFINE(HAVE_MALLOC_MALLOC_H, 1, [Define to 1 if you have the <malloc/malloc.h> header file.])]) 2418AC_CHECK_HEADER(malloc/malloc.h, [AC_DEFINE(HAVE_MALLOC_MALLOC_H, 1, [Define to 1 if you have the <malloc/malloc.h> header file.])])
@@ -3012,6 +3021,7 @@ fi
3012### Use configuration here uncanonicalized to avoid exceeding size limits. 3021### Use configuration here uncanonicalized to avoid exceeding size limits.
3013AC_SUBST(version) 3022AC_SUBST(version)
3014AC_SUBST(configuration) 3023AC_SUBST(configuration)
3024## Unused?
3015AC_SUBST(canonical) 3025AC_SUBST(canonical)
3016AC_SUBST(srcdir) 3026AC_SUBST(srcdir)
3017AC_SUBST(prefix) 3027AC_SUBST(prefix)
@@ -3033,6 +3043,9 @@ AC_SUBST(bitmapdir)
3033AC_SUBST(gamedir) 3043AC_SUBST(gamedir)
3034AC_SUBST(gameuser) 3044AC_SUBST(gameuser)
3035AC_SUBST(unexec) 3045AC_SUBST(unexec)
3046## FIXME? Nothing uses @LD_SWITCH_X_SITE@.
3047## src/Makefile.in did add LD_SWITCH_X_SITE (as a cpp define) to the
3048## end of LIBX_BASE, but nothing ever set it.
3036AC_SUBST(LD_SWITCH_X_SITE) 3049AC_SUBST(LD_SWITCH_X_SITE)
3037AC_SUBST(C_SWITCH_X_SITE) 3050AC_SUBST(C_SWITCH_X_SITE)
3038AC_SUBST(C_SWITCH_X_SYSTEM) 3051AC_SUBST(C_SWITCH_X_SYSTEM)
@@ -3046,7 +3059,6 @@ AC_SUBST(ns_appdir)
3046AC_SUBST(ns_appbindir) 3059AC_SUBST(ns_appbindir)
3047AC_SUBST(ns_appresdir) 3060AC_SUBST(ns_appresdir)
3048AC_SUBST(ns_appsrc) 3061AC_SUBST(ns_appsrc)
3049AC_SUBST(GNUSTEP_MAKEFILES)
3050AC_SUBST(GNUSTEP_SYSTEM_HEADERS) 3062AC_SUBST(GNUSTEP_SYSTEM_HEADERS)
3051AC_SUBST(GNUSTEP_SYSTEM_LIBRARIES) 3063AC_SUBST(GNUSTEP_SYSTEM_LIBRARIES)
3052AC_SUBST(GNU_OBJC_CFLAGS) 3064AC_SUBST(GNU_OBJC_CFLAGS)
@@ -3060,18 +3072,6 @@ AC_DEFINE_UNQUOTED(config_machfile, "${machfile}",
3060 [Define to the used machine dependent file.]) 3072 [Define to the used machine dependent file.])
3061AC_DEFINE_UNQUOTED(config_opsysfile, "${opsysfile}", 3073AC_DEFINE_UNQUOTED(config_opsysfile, "${opsysfile}",
3062 [Define to the used os dependent file.]) 3074 [Define to the used os dependent file.])
3063AC_DEFINE_UNQUOTED(LD_SWITCH_X_SITE, ${LD_SWITCH_X_SITE},
3064[Define LD_SWITCH_X_SITE to contain any special flags your loader
3065 may need to deal with X Windows. For instance, if you've defined
3066 HAVE_X_WINDOWS above and your X libraries aren't in a place that
3067 your loader can find on its own, you might want to add "-L/..." or
3068 something similar.])
3069AC_DEFINE_UNQUOTED(C_SWITCH_X_SITE, ${C_SWITCH_X_SITE},
3070[Define C_SWITCH_X_SITE to contain any special flags your compiler
3071 may need to deal with X Windows. For instance, if you've defined
3072 HAVE_X_WINDOWS above and your X include files aren't in a place
3073 that your compiler can find on its own, you might want to add
3074 "-I/..." or something similar.])
3075 3075
3076XMENU_OBJ= 3076XMENU_OBJ=
3077XOBJ= 3077XOBJ=
@@ -3152,7 +3152,7 @@ else
3152 LIBX_OTHER= 3152 LIBX_OTHER=
3153fi 3153fi
3154 3154
3155if test "$HAVE_GTK" = "yes"; then 3155if test "$HAVE_GTK" = "yes" || test "$HAVE_MENUS" != "yes"; then
3156 OLDXMENU= 3156 OLDXMENU=
3157 LIBXMENU= 3157 LIBXMENU=
3158fi 3158fi
@@ -3250,18 +3250,37 @@ if test "x$GCC" = "xyes"; then
3250 ## FIXME? s/gnu-linux.h used to define LIB_GCC as below, then 3250 ## FIXME? s/gnu-linux.h used to define LIB_GCC as below, then
3251 ## immediately undefine it again and redefine it to empty. 3251 ## immediately undefine it again and redefine it to empty.
3252 ## Was the C_SWITCH_X_SITE part really necessary? 3252 ## Was the C_SWITCH_X_SITE part really necessary?
3253## LIB_GCC=`$(CC) $(C_SWITCH_X_SITE) -print-libgcc-file-name` 3253## LIB_GCC=`$CC $C_SWITCH_X_SITE -print-libgcc-file-name`
3254 LIB_GCC= 3254 LIB_GCC=
3255 fi 3255 fi
3256 ;; 3256 ;;
3257 3257
3258 ## Ask GCC where to find libgcc.a. 3258 ## Ask GCC where to find libgcc.a.
3259 *) LIB_GCC=`$(CC) -print-libgcc-file-name 2> /dev/null` ;; 3259 *) LIB_GCC=`$CC -print-libgcc-file-name 2> /dev/null` ;;
3260 esac 3260 esac
3261fi dnl if $GCC 3261fi dnl if $GCC
3262AC_SUBST(LIB_GCC) 3262AC_SUBST(LIB_GCC)
3263 3263
3264 3264
3265TOOLTIP_SUPPORT=
3266WINDOW_SUPPORT=
3267## If we're using X11/GNUstep, define some consequences.
3268if test "$HAVE_X_WINDOWS" = "yes" || test "$HAVE_NS" = "yes"; then
3269 AC_DEFINE(HAVE_WINDOW_SYSTEM, 1, [Define if you have a window system.])
3270 AC_DEFINE(HAVE_MOUSE, 1, [Define if you have mouse support.])
3271 MOUSE_SUPPORT="\$(REAL_MOUSE_SUPPORT)"
3272 TOOLTIP_SUPPORT="\${lispsource}mouse.elc"
3273
3274 WINDOW_SUPPORT="\$(BASE_WINDOW_SUPPORT)"
3275 test "$HAVE_X_WINDOWS" = "yes" && \
3276 WINDOW_SUPPORT="$WINDOW_SUPPORT \$(X_WINDOW_SUPPORT)"
3277
3278fi
3279AC_SUBST(MOUSE_SUPPORT)
3280AC_SUBST(TOOLTIP_SUPPORT)
3281AC_SUBST(WINDOW_SUPPORT)
3282
3283
3265AH_TOP([/* GNU Emacs site configuration template file. 3284AH_TOP([/* GNU Emacs site configuration template file.
3266 Copyright (C) 1988, 1993, 1994, 1999, 2000, 2001, 2002, 2004, 2005, 3285 Copyright (C) 1988, 1993, 1994, 1999, 2000, 2001, 2002, 2004, 2005,
3267 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc. 3286 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc.
@@ -3290,12 +3309,6 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
3290])dnl 3309])dnl
3291 3310
3292AH_BOTTOM([ 3311AH_BOTTOM([
3293/* If we're using X11/Carbon/GNUstep, define some consequences. */
3294#if defined(HAVE_X_WINDOWS) || defined(HAVE_NS)
3295#define HAVE_WINDOW_SYSTEM
3296#define HAVE_MOUSE
3297#endif
3298
3299/* Define AMPERSAND_FULL_NAME if you use the convention 3312/* Define AMPERSAND_FULL_NAME if you use the convention
3300 that & in the full name stands for the login id. */ 3313 that & in the full name stands for the login id. */
3301/* Turned on June 1996 supposing nobody will mind it. */ 3314/* Turned on June 1996 supposing nobody will mind it. */
@@ -3320,7 +3333,7 @@ AH_BOTTOM([
3320#endif 3333#endif
3321#endif /* __FreeBSD__ || __NetBSD__ || __linux__ */ 3334#endif /* __FreeBSD__ || __NetBSD__ || __linux__ */
3322 3335
3323/* If using GNU, then support inline function declarations. */ 3336/* If using GNU, then support inline function declarations. */
3324/* Don't try to switch on inline handling as detected by AC_C_INLINE 3337/* Don't try to switch on inline handling as detected by AC_C_INLINE
3325 generally, because even if non-gcc compilers accept `inline', they 3338 generally, because even if non-gcc compilers accept `inline', they
3326 may reject `extern inline'. */ 3339 may reject `extern inline'. */
@@ -3345,7 +3358,7 @@ AH_BOTTOM([
3345/* Set up some defines, C and LD flags for NeXTstep interface on GNUstep. 3358/* Set up some defines, C and LD flags for NeXTstep interface on GNUstep.
3346 (There is probably a better place to do this, but right now the Cocoa 3359 (There is probably a better place to do this, but right now the Cocoa
3347 side does this in s/darwin.h and we cannot 3360 side does this in s/darwin.h and we cannot
3348 parallel this exactly since GNUstep is multi-OS. */ 3361 parallel this exactly since GNUstep is multi-OS. */
3349#ifdef HAVE_NS 3362#ifdef HAVE_NS
3350# ifdef NS_IMPL_GNUSTEP 3363# ifdef NS_IMPL_GNUSTEP
3351/* GNUstep needs a bit more pure memory. Of the existing knobs, 3364/* GNUstep needs a bit more pure memory. Of the existing knobs,
@@ -3442,7 +3455,7 @@ extern char *getenv ();
3442#include "string.h" 3455#include "string.h"
3443#endif 3456#endif
3444#ifdef HAVE_STRINGS_H 3457#ifdef HAVE_STRINGS_H
3445#include "strings.h" /* May be needed for bcopy & al. */ 3458#include "strings.h" /* May be needed for bcopy & al. */
3446#endif 3459#endif
3447#ifdef HAVE_STDLIB_H 3460#ifdef HAVE_STDLIB_H
3448#include <stdlib.h> 3461#include <stdlib.h>
@@ -3609,7 +3622,10 @@ test "${exec_prefix}" != NONE &&
3609# the C preprocessor to some helpful value like 1, or maybe the empty 3622# the C preprocessor to some helpful value like 1, or maybe the empty
3610# string. Needless to say consequent macro substitutions are less 3623# string. Needless to say consequent macro substitutions are less
3611# than conducive to the makefile finding the correct directory. 3624# than conducive to the makefile finding the correct directory.
3612[cpp_undefs="`echo $srcdir $configuration $canonical unix | 3625# src/Makefile.in used to treat X11 as equivalent to HAVE_X11.
3626# But nothing in Emacs defines X11, and everywhere else uses HAVE_X11,
3627# so that cannot have been doing anything.
3628[cpp_undefs="`echo $srcdir $configuration $canonical unix mktime register X11 |
3613 sed -e 's/[^a-zA-Z0-9_]/ /g' -e 's/^/ /' -e 's/ *$//' \ 3629 sed -e 's/[^a-zA-Z0-9_]/ /g' -e 's/^/ /' -e 's/ *$//' \
3614 -e 's/ */ -U/g' -e 's/-U[0-9][^ ]*//g'`"] 3630 -e 's/ */ -U/g' -e 's/-U[0-9][^ ]*//g'`"]
3615 3631
diff --git a/doc/misc/ChangeLog b/doc/misc/ChangeLog
index 85bf897f41f..c6d3c1be498 100644
--- a/doc/misc/ChangeLog
+++ b/doc/misc/ChangeLog
@@ -1,3 +1,7 @@
12010-05-13 Jay Belanger <jay.p.belanger@gmail.com>
2
3 * calc.texi: Remove "\turnoffactive" commands througout.
4
12010-05-08 Štěpán Němec <stepnem@gmail.com> (tiny change) 52010-05-08 Štěpán Němec <stepnem@gmail.com> (tiny change)
2 6
3 * url.texi (HTTP language/coding, Customization): 7 * url.texi (HTTP language/coding, Customization):
diff --git a/doc/misc/calc.texi b/doc/misc/calc.texi
index 96075b6710d..c578e919612 100644
--- a/doc/misc/calc.texi
+++ b/doc/misc/calc.texi
@@ -76,7 +76,6 @@
76@newcount@calcpageno 76@newcount@calcpageno
77@newtoks@calcoldeverypar @calcoldeverypar=@everypar 77@newtoks@calcoldeverypar @calcoldeverypar=@everypar
78@everypar={@calceverypar@the@calcoldeverypar} 78@everypar={@calceverypar@the@calcoldeverypar}
79@ifx@turnoffactive@undefinedzzz@def@turnoffactive{}@fi
80@ifx@ninett@undefinedzzz@font@ninett=cmtt9@fi 79@ifx@ninett@undefinedzzz@font@ninett=cmtt9@fi
81@catcode`@\=0 \catcode`\@=11 80@catcode`@\=0 \catcode`\@=11
82\r@ggedbottomtrue 81\r@ggedbottomtrue
@@ -1804,7 +1803,6 @@ or, in large mathematical notation,
1804@end example 1803@end example
1805@end ifnottex 1804@end ifnottex
1806@tex 1805@tex
1807\turnoffactive
1808\beforedisplay 1806\beforedisplay
1809$$ 2 + { 3 \times 4 \times 5 \over 6 \times 7^8 } - 9 $$ 1807$$ 2 + { 3 \times 4 \times 5 \over 6 \times 7^8 } - 9 $$
1810\afterdisplay 1808\afterdisplay
@@ -3358,7 +3356,6 @@ Suppose we had the following set of equations:
3358@end group 3356@end group
3359@end ifnottex 3357@end ifnottex
3360@tex 3358@tex
3361\turnoffactive
3362\beforedisplayh 3359\beforedisplayh
3363$$ \openup1\jot \tabskip=0pt plus1fil 3360$$ \openup1\jot \tabskip=0pt plus1fil
3364\halign to\displaywidth{\tabskip=0pt 3361\halign to\displaywidth{\tabskip=0pt
@@ -3385,7 +3382,6 @@ This can be cast into the matrix equation,
3385@end group 3382@end group
3386@end ifnottex 3383@end ifnottex
3387@tex 3384@tex
3388\turnoffactive
3389\beforedisplay 3385\beforedisplay
3390$$ \pmatrix{ 1 & 2 & 3 \cr 4 & 5 & 6 \cr 7 & 6 & 0 } 3386$$ \pmatrix{ 1 & 2 & 3 \cr 4 & 5 & 6 \cr 7 & 6 & 0 }
3391 \times 3387 \times
@@ -3457,7 +3453,6 @@ in terms of @expr{a} and @expr{b}.
3457@end group 3453@end group
3458@end ifnottex 3454@end ifnottex
3459@tex 3455@tex
3460\turnoffactive
3461\beforedisplay 3456\beforedisplay
3462$$ \eqalign{ x &+ a y = 6 \cr 3457$$ \eqalign{ x &+ a y = 6 \cr
3463 x &+ b y = 10} 3458 x &+ b y = 10}
@@ -3483,7 +3478,6 @@ on the left by the transpose of @expr{A}:
3483@samp{trn(A)*A*X = trn(A)*B}. 3478@samp{trn(A)*A*X = trn(A)*B}.
3484@end ifnottex 3479@end ifnottex
3485@tex 3480@tex
3486\turnoffactive
3487$A^T A \, X = A^T B$, where $A^T$ is the transpose \samp{trn(A)}. 3481$A^T A \, X = A^T B$, where $A^T$ is the transpose \samp{trn(A)}.
3488@end tex 3482@end tex
3489Now 3483Now
@@ -3506,7 +3500,6 @@ system:
3506@end group 3500@end group
3507@end ifnottex 3501@end ifnottex
3508@tex 3502@tex
3509\turnoffactive
3510\beforedisplayh 3503\beforedisplayh
3511$$ \openup1\jot \tabskip=0pt plus1fil 3504$$ \openup1\jot \tabskip=0pt plus1fil
3512\halign to\displaywidth{\tabskip=0pt 3505\halign to\displaywidth{\tabskip=0pt
@@ -3778,7 +3771,6 @@ m = (N sum(x y) - sum(x) sum(y)) / (N sum(x^2) - sum(x)^2)
3778@end example 3771@end example
3779@end ifnottex 3772@end ifnottex
3780@tex 3773@tex
3781\turnoffactive
3782\beforedisplay 3774\beforedisplay
3783$$ m = {N \sum x y - \sum x \sum y \over 3775$$ m = {N \sum x y - \sum x \sum y \over
3784 N \sum x^2 - \left( \sum x \right)^2} $$ 3776 N \sum x^2 - \left( \sum x \right)^2} $$
@@ -3820,7 +3812,6 @@ respectively. (We could have used @kbd{*} to compute @samp{sum(x^2)} and
3820@samp{sum(x y)}.) 3812@samp{sum(x y)}.)
3821@end ifnottex 3813@end ifnottex
3822@tex 3814@tex
3823\turnoffactive
3824These are $\sum x$, $\sum x^2$, $\sum y$, and $\sum x y$, 3815These are $\sum x$, $\sum x^2$, $\sum y$, and $\sum x y$,
3825respectively. (We could have used \kbd{*} to compute $\sum x^2$ and 3816respectively. (We could have used \kbd{*} to compute $\sum x^2$ and
3826$\sum x y$.) 3817$\sum x y$.)
@@ -3874,7 +3865,6 @@ b = (sum(y) - m sum(x)) / N
3874@end example 3865@end example
3875@end ifnottex 3866@end ifnottex
3876@tex 3867@tex
3877\turnoffactive
3878\beforedisplay 3868\beforedisplay
3879$$ b = {\sum y - m \sum x \over N} $$ 3869$$ b = {\sum y - m \sum x \over N} $$
3880\afterdisplay 3870\afterdisplay
@@ -5223,7 +5213,6 @@ down to the formula,
5223@end example 5213@end example
5224@end ifnottex 5214@end ifnottex
5225@tex 5215@tex
5226\turnoffactive
5227\beforedisplay 5216\beforedisplay
5228$$ \displaylines{ 5217$$ \displaylines{
5229 \qquad {h \over 3} (f(a) + 4 f(a+h) + 2 f(a+2h) + 4 f(a+3h) + \cdots 5218 \qquad {h \over 3} (f(a) + 4 f(a+h) + 2 f(a+2h) + 4 f(a+3h) + \cdots
@@ -5245,7 +5234,6 @@ h * (f(a) + f(a+h) + f(a+2h) + f(a+3h) + ...
5245@end example 5234@end example
5246@end ifnottex 5235@end ifnottex
5247@tex 5236@tex
5248\turnoffactive
5249\beforedisplay 5237\beforedisplay
5250$$ h (f(a) + f(a+h) + f(a+2h) + f(a+3h) + \cdots 5238$$ h (f(a) + f(a+h) + f(a+2h) + f(a+3h) + \cdots
5251 + f(a+(n-2)h) + f(a+(n-1)h)) $$ 5239 + f(a+(n-2)h) + f(a+(n-1)h)) $$
@@ -5686,7 +5674,6 @@ cos(x) = 1 - x^2 / 2! + x^4 / 4! - x^6 / 6! + ...
5686@end example 5674@end example
5687@end ifnottex 5675@end ifnottex
5688@tex 5676@tex
5689\turnoffactive
5690\beforedisplay 5677\beforedisplay
5691$$ \cos x = 1 - {x^2 \over 2!} + {x^4 \over 4!} - {x^6 \over 6!} + \cdots $$ 5678$$ \cos x = 1 - {x^2 \over 2!} + {x^4 \over 4!} - {x^6 \over 6!} + \cdots $$
5692\afterdisplay 5679\afterdisplay
@@ -5704,7 +5691,6 @@ cos(x) = 1 - x^2 / 2! + O(x^3)
5704@end example 5691@end example
5705@end ifnottex 5692@end ifnottex
5706@tex 5693@tex
5707\turnoffactive
5708\beforedisplay 5694\beforedisplay
5709$$ \cos x = 1 - {x^2 \over 2!} + O(x^3) $$ 5695$$ \cos x = 1 - {x^2 \over 2!} + O(x^3) $$
5710\afterdisplay 5696\afterdisplay
@@ -6336,7 +6322,6 @@ s(n+1,m) = s(n,m-1) - n s(n,m) for n >= m >= 1.
6336@end example 6322@end example
6337@end ifnottex 6323@end ifnottex
6338@tex 6324@tex
6339\turnoffactive
6340\beforedisplay 6325\beforedisplay
6341$$ \eqalign{ s(n,n) &= 1 \qquad \hbox{for } n \ge 0, \cr 6326$$ \eqalign{ s(n,n) &= 1 \qquad \hbox{for } n \ge 0, \cr
6342 s(n,0) &= 0 \qquad \hbox{for } n > 0, \cr 6327 s(n,0) &= 0 \qquad \hbox{for } n > 0, \cr
@@ -6875,7 +6860,6 @@ get the row sum. Similarly, use @kbd{[1 1] r 4 *} to get the column sum.
6875@end example 6860@end example
6876@end ifnottex 6861@end ifnottex
6877@tex 6862@tex
6878\turnoffactive
6879\beforedisplay 6863\beforedisplay
6880$$ \eqalign{ x &+ a y = 6 \cr 6864$$ \eqalign{ x &+ a y = 6 \cr
6881 x &+ b y = 10} 6865 x &+ b y = 10}
@@ -6939,7 +6923,6 @@ which we can solve using Calc's @samp{/} command.
6939@end example 6923@end example
6940@end ifnottex 6924@end ifnottex
6941@tex 6925@tex
6942\turnoffactive
6943\beforedisplayh 6926\beforedisplayh
6944$$ \openup1\jot \tabskip=0pt plus1fil 6927$$ \openup1\jot \tabskip=0pt plus1fil
6945\halign to\displaywidth{\tabskip=0pt 6928\halign to\displaywidth{\tabskip=0pt
@@ -7074,7 +7057,6 @@ the first job is to form the matrix that describes the problem.
7074@end example 7057@end example
7075@end ifnottex 7058@end ifnottex
7076@tex 7059@tex
7077\turnoffactive
7078\beforedisplay 7060\beforedisplay
7079$$ m \times x + b \times 1 = y $$ 7061$$ m \times x + b \times 1 = y $$
7080\afterdisplay 7062\afterdisplay
@@ -7865,7 +7847,6 @@ So the result when we take the modulo after every step is,
7865@end example 7847@end example
7866@end ifnottex 7848@end ifnottex
7867@tex 7849@tex
7868\turnoffactive
7869\beforedisplay 7850\beforedisplay
7870$$ 3 (3 a + b - 511 m) + c - 511 n $$ 7851$$ 3 (3 a + b - 511 m) + c - 511 n $$
7871\afterdisplay 7852\afterdisplay
@@ -7881,7 +7862,6 @@ the distributive law yields
7881@end example 7862@end example
7882@end ifnottex 7863@end ifnottex
7883@tex 7864@tex
7884\turnoffactive
7885\beforedisplay 7865\beforedisplay
7886$$ 9 a + 3 b + c - 511\times3 m - 511 n $$ 7866$$ 9 a + 3 b + c - 511\times3 m - 511 n $$
7887\afterdisplay 7867\afterdisplay
@@ -7899,7 +7879,6 @@ term. So we can take it out to get an equivalent formula with
7899@end example 7879@end example
7900@end ifnottex 7880@end ifnottex
7901@tex 7881@tex
7902\turnoffactive
7903\beforedisplay 7882\beforedisplay
7904$$ 9 a + 3 b + c - 511 n^{\prime} $$ 7883$$ 9 a + 3 b + c - 511 n^{\prime} $$
7905\afterdisplay 7884\afterdisplay
@@ -14408,7 +14387,6 @@ $$ \sin\left( a^2 \over b_i \right) $$
14408@end group 14387@end group
14409@end example 14388@end example
14410@tex 14389@tex
14411\turnoffactive
14412$$ [3 + 4i, {3 \over 4}, 3 \pm 4, [ 3 \ldots \infty)] $$ 14390$$ [3 + 4i, {3 \over 4}, 3 \pm 4, [ 3 \ldots \infty)] $$
14413@end tex 14391@end tex
14414@sp 1 14392@sp 1
@@ -14434,7 +14412,6 @@ $$ [|a|, \left| a \over b \right|,
14434@end group 14412@end group
14435@end example 14413@end example
14436@tex 14414@tex
14437\turnoffactive
14438$$ [\sin{a}, \sin{2 a}, \sin(2 + a), \sin\left( {a \over b} \right)] $$ 14415$$ [\sin{a}, \sin{2 a}, \sin(2 + a), \sin\left( {a \over b} \right)] $$
14439@end tex 14416@end tex
14440@sp 2 14417@sp 2
@@ -14467,7 +14444,6 @@ First with @samp{\def\evalto@{@}}, then with @samp{\def\evalto#1\to@{@}}:
14467@end group 14444@end group
14468@end example 14445@end example
14469@tex 14446@tex
14470\turnoffactive
14471$$ 2 + 3 \to 5 $$ 14447$$ 2 + 3 \to 5 $$
14472$$ 5 $$ 14448$$ 5 $$
14473@end tex 14449@end tex
@@ -14482,7 +14458,6 @@ First with standard @code{\to}, then with @samp{\let\to\Rightarrow}:
14482@end group 14458@end group
14483@end example 14459@end example
14484@tex 14460@tex
14485\turnoffactive
14486$$ [{2 + 3 \to 5}, {{a \over 2} \to {b + c \over 2}}] $$ 14461$$ [{2 + 3 \to 5}, {{a \over 2} \to {b + c \over 2}}] $$
14487{\let\to\Rightarrow 14462{\let\to\Rightarrow
14488$$ [{2 + 3 \to 5}, {{a \over 2} \to {b + c \over 2}}] $$} 14463$$ [{2 + 3 \to 5}, {{a \over 2} \to {b + c \over 2}}] $$}
@@ -14499,7 +14474,6 @@ Matrices normally, then changing @code{\matrix} to @code{\pmatrix}:
14499@end group 14474@end group
14500@end example 14475@end example
14501@tex 14476@tex
14502\turnoffactive
14503$$ \matrix{ {a \over b} & 0 \cr 0 & 2^{(x + 1)} } $$ 14477$$ \matrix{ {a \over b} & 0 \cr 0 & 2^{(x + 1)} } $$
14504$$ \pmatrix{ {a \over b} & 0 \cr 0 & 2^{(x + 1)} } $$ 14478$$ \pmatrix{ {a \over b} & 0 \cr 0 & 2^{(x + 1)} } $$
14505@end tex 14479@end tex
@@ -17935,7 +17909,6 @@ ddb(cost, salv, life, per) = --------, book = cost - depreciation so far
17935@end example 17909@end example
17936@end ifnottex 17910@end ifnottex
17937@tex 17911@tex
17938\turnoffactive
17939$$ \code{fv}(r, n, p) = p { (1 + r)^n - 1 \over r } $$ 17912$$ \code{fv}(r, n, p) = p { (1 + r)^n - 1 \over r } $$
17940$$ \code{fvb}(r, n, p) = p { ((1 + r)^n - 1) (1 + r) \over r } $$ 17913$$ \code{fvb}(r, n, p) = p { ((1 + r)^n - 1) (1 + r) \over r } $$
17941$$ \code{fvl}(r, n, p) = p (1 + r)^n $$ 17914$$ \code{fvl}(r, n, p) = p (1 + r)^n $$
@@ -18591,7 +18564,6 @@ letter gamma). You can obtain these using the @kbd{H f G} [@code{gammag}]
18591and @kbd{H I f G} [@code{gammaG}] commands. 18564and @kbd{H I f G} [@code{gammaG}] commands.
18592@end ifnottex 18565@end ifnottex
18593@tex 18566@tex
18594\turnoffactive
18595The functions corresponding to the integrals that define $P(a,x)$ 18567The functions corresponding to the integrals that define $P(a,x)$
18596and $Q(a,x)$ but without the normalizing $1/\Gamma(a)$ 18568and $Q(a,x)$ but without the normalizing $1/\Gamma(a)$
18597factor are called $\gamma(a,x)$ and $\Gamma(a,x)$, respectively. 18569factor are called $\gamma(a,x)$ and $\Gamma(a,x)$, respectively.
@@ -20559,7 +20531,6 @@ this is the weighted mean of the @expr{x} values with weights
20559@texline @math{1 /\sigma^2}. 20531@texline @math{1 /\sigma^2}.
20560@infoline @expr{1 / s^2}. 20532@infoline @expr{1 / s^2}.
20561@tex 20533@tex
20562\turnoffactive
20563$$ \mu = { \displaystyle \sum { x_i \over \sigma_i^2 } \over 20534$$ \mu = { \displaystyle \sum { x_i \over \sigma_i^2 } \over
20564 \displaystyle \sum { 1 \over \sigma_i^2 } } $$ 20535 \displaystyle \sum { 1 \over \sigma_i^2 } } $$
20565@end tex 20536@end tex
@@ -20593,7 +20564,6 @@ root of the reciprocal of the sum of the reciprocals of the squares
20593of the input errors. (I.e., the variance is the reciprocal of the 20564of the input errors. (I.e., the variance is the reciprocal of the
20594sum of the reciprocals of the variances.) 20565sum of the reciprocals of the variances.)
20595@tex 20566@tex
20596\turnoffactive
20597$$ \sigma_\mu^2 = {1 \over \displaystyle \sum {1 \over \sigma_i^2}} $$ 20567$$ \sigma_\mu^2 = {1 \over \displaystyle \sum {1 \over \sigma_i^2}} $$
20598@end tex 20568@end tex
20599If the inputs are plain 20569If the inputs are plain
@@ -20603,7 +20573,6 @@ out to be equivalent to calculating the standard deviation and
20603then assuming each value's error is equal to this standard 20573then assuming each value's error is equal to this standard
20604deviation.) 20574deviation.)
20605@tex 20575@tex
20606\turnoffactive
20607$$ \sigma_\mu^2 = {\sigma^2 \over N} $$ 20576$$ \sigma_\mu^2 = {\sigma^2 \over N} $$
20608@end tex 20577@end tex
20609 20578
@@ -20636,7 +20605,6 @@ command computes the harmonic mean of the data values. This is
20636defined as the reciprocal of the arithmetic mean of the reciprocals 20605defined as the reciprocal of the arithmetic mean of the reciprocals
20637of the values. 20606of the values.
20638@tex 20607@tex
20639\turnoffactive
20640$$ { N \over \displaystyle \sum {1 \over x_i} } $$ 20608$$ { N \over \displaystyle \sum {1 \over x_i} } $$
20641@end tex 20609@end tex
20642 20610
@@ -20650,7 +20618,6 @@ is the @var{n}th root of the product of the values. This is also
20650equal to the @code{exp} of the arithmetic mean of the logarithms 20618equal to the @code{exp} of the arithmetic mean of the logarithms
20651of the data values. 20619of the data values.
20652@tex 20620@tex
20653\turnoffactive
20654$$ \exp \left ( \sum { \ln x_i } \right ) = 20621$$ \exp \left ( \sum { \ln x_i } \right ) =
20655 \left ( \prod { x_i } \right)^{1 / N} $$ 20622 \left ( \prod { x_i } \right)^{1 / N} $$
20656@end tex 20623@end tex
@@ -20662,7 +20629,6 @@ mean'' of two numbers taken from the stack. This is computed by
20662replacing the two numbers with their arithmetic mean and geometric 20629replacing the two numbers with their arithmetic mean and geometric
20663mean, then repeating until the two values converge. 20630mean, then repeating until the two values converge.
20664@tex 20631@tex
20665\turnoffactive
20666$$ a_{i+1} = { a_i + b_i \over 2 } , \qquad b_{i+1} = \sqrt{a_i b_i} $$ 20632$$ a_{i+1} = { a_i + b_i \over 2 } , \qquad b_{i+1} = \sqrt{a_i b_i} $$
20667@end tex 20633@end tex
20668 20634
@@ -20685,7 +20651,6 @@ deviation, whose value is the square root of the sum of the squares of
20685the differences between the values and the mean of the @expr{N} values, 20651the differences between the values and the mean of the @expr{N} values,
20686divided by @expr{N-1}. 20652divided by @expr{N-1}.
20687@tex 20653@tex
20688\turnoffactive
20689$$ \sigma^2 = {1 \over N - 1} \sum (x_i - \mu)^2 $$ 20654$$ \sigma^2 = {1 \over N - 1} \sum (x_i - \mu)^2 $$
20690@end tex 20655@end tex
20691 20656
@@ -20712,7 +20677,6 @@ is used when the input represents a sample of the set of all
20712data values, so that the mean computed from the input is itself 20677data values, so that the mean computed from the input is itself
20713only an estimate of the true mean. 20678only an estimate of the true mean.
20714@tex 20679@tex
20715\turnoffactive
20716$$ \sigma^2 = {1 \over N} \sum (x_i - \mu)^2 $$ 20680$$ \sigma^2 = {1 \over N} \sum (x_i - \mu)^2 $$
20717@end tex 20681@end tex
20718 20682
@@ -20777,7 +20741,6 @@ are composed of error forms, the error for a given data point
20777is taken as the square root of the sum of the squares of the two 20741is taken as the square root of the sum of the squares of the two
20778input errors. 20742input errors.
20779@tex 20743@tex
20780\turnoffactive
20781$$ \sigma_{x\!y}^2 = {1 \over N-1} \sum (x_i - \mu_x) (y_i - \mu_y) $$ 20744$$ \sigma_{x\!y}^2 = {1 \over N-1} \sum (x_i - \mu_x) (y_i - \mu_y) $$
20782$$ \sigma_{x\!y}^2 = 20745$$ \sigma_{x\!y}^2 =
20783 {\displaystyle {1 \over N-1} 20746 {\displaystyle {1 \over N-1}
@@ -20805,7 +20768,6 @@ This is defined by the covariance of the vectors divided by the
20805product of their standard deviations. (There is no difference 20768product of their standard deviations. (There is no difference
20806between sample or population statistics here.) 20769between sample or population statistics here.)
20807@tex 20770@tex
20808\turnoffactive
20809$$ r_{x\!y} = { \sigma_{x\!y}^2 \over \sigma_x^2 \sigma_y^2 } $$ 20771$$ r_{x\!y} = { \sigma_{x\!y}^2 \over \sigma_x^2 \sigma_y^2 } $$
20810@end tex 20772@end tex
20811 20773
@@ -24361,8 +24323,6 @@ For example, suppose the data matrix
24361@end example 24323@end example
24362@end ifnottex 24324@end ifnottex
24363@tex 24325@tex
24364\turnoffactive
24365\turnoffactive
24366\beforedisplay 24326\beforedisplay
24367$$ \pmatrix{ 1 & 2 & 3 & 4 & 5 \cr 24327$$ \pmatrix{ 1 & 2 & 3 & 4 & 5 \cr
24368 5 & 7 & 9 & 11 & 13 } 24328 5 & 7 & 9 & 11 & 13 }
@@ -24422,7 +24382,6 @@ chi^2 = sum((y_i - (a + b x_i))^2, i, 1, N)
24422@end example 24382@end example
24423@end ifnottex 24383@end ifnottex
24424@tex 24384@tex
24425\turnoffactive
24426\beforedisplay 24385\beforedisplay
24427$$ \chi^2 = \sum_{i=1}^N (y_i - (a + b x_i))^2 $$ 24386$$ \chi^2 = \sum_{i=1}^N (y_i - (a + b x_i))^2 $$
24428\afterdisplay 24387\afterdisplay
@@ -24613,7 +24572,6 @@ chi^2 = sum(((y_i - (a + b x_i)) / sigma_i)^2, i, 1, N)
24613@end example 24572@end example
24614@end ifnottex 24573@end ifnottex
24615@tex 24574@tex
24616\turnoffactive
24617\beforedisplay 24575\beforedisplay
24618$$ \chi^2 = \sum_{i=1}^N \left(y_i - (a + b x_i) \over \sigma_i\right)^2 $$ 24576$$ \chi^2 = \sum_{i=1}^N \left(y_i - (a + b x_i) \over \sigma_i\right)^2 $$
24619\afterdisplay 24577\afterdisplay
@@ -25388,7 +25346,6 @@ any later ones are answered by reading additional elements from
25388the stack. Thus, @kbd{' k^2 @key{RET} ' k @key{RET} 1 @key{RET} 5 @key{RET} a + @key{RET}} 25346the stack. Thus, @kbd{' k^2 @key{RET} ' k @key{RET} 1 @key{RET} 5 @key{RET} a + @key{RET}}
25389produces the result 55. 25347produces the result 55.
25390@tex 25348@tex
25391\turnoffactive
25392$$ \sum_{k=1}^5 k^2 = 55 $$ 25349$$ \sum_{k=1}^5 k^2 = 55 $$
25393@end tex 25350@end tex
25394 25351
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e0cbf007771..484ae6529c3 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,48 @@
12010-05-13 Chong Yidong <cyd@stupidchicken.com>
2
3 Add TeX open-block and close-block keybindings to SGML, and vice
4 versa.
5
6 * textmodes/tex-mode.el (tex-mode-map): Bind C-c C-t to
7 latex-open-block and C-c / to latex-close-block.
8
9 * textmodes/sgml-mode.el (sgml-mode-map): Bind C-c C-o to sgml-tag
10 and C-c C-e to sgml-close-tag.
11
122010-05-13 Michael Albinus <michael.albinus@gmx.de>
13
14 * net/tramp.el (with-progress-reporter): Create reporter object
15 only when the message would be displayed. Handled nested calls.
16 (tramp-handle-load, tramp-handle-file-local-copy)
17 (tramp-handle-insert-file-contents, tramp-handle-write-region)
18 (tramp-maybe-send-script, tramp-find-shell): Use
19 `with-progress-reporter'.
20 (tramp-handle-dired-compress-file, tramp-maybe-open-connection):
21 Fix message text.
22
23 * net/tramp-smb.el (tramp-smb-handle-copy-file)
24 (tramp-smb-handle-file-local-copy, tramp-smb-handle-rename-file)
25 (tramp-smb-handle-write-region, tramp-smb-maybe-open-connection):
26 Use `with-progress-reporter'.
27
282010-05-13 Agustín Martín <agustin.martin@hispalinux.es>
29
30 * ispell.el (ispell-init-process): Do not kill ispell process
31 everytime when spellchecking from the minibuffer (bug#6143).
32
332010-05-13 Stefan Monnier <monnier@iro.umontreal.ca>
34
35 * progmodes/sh-script.el (sh-mode): Use define-derived-mode.
36
37 * dos-fns.el: Add "dos-" prefix for namespace control.
38 (convert-standard-filename): Define as alias for
39 dos-convert-standard-filename but only if applicable.
40
412010-05-12 Alan Mackenzie <acm@muc.de>
42
43 * progmodes/cc-cmds.el (c-beginning-of-defun, c-end-of-defun):
44 Push the mark at the start of these functions when appropriate.
45
12010-05-12 Stefan Monnier <monnier@iro.umontreal.ca> 462010-05-12 Stefan Monnier <monnier@iro.umontreal.ca>
2 47
3 * minibuffer.el (completion-cycle-threshold): New custom var. 48 * minibuffer.el (completion-cycle-threshold): New custom var.
diff --git a/lisp/dos-fns.el b/lisp/dos-fns.el
index c1c2517bc22..5834afae8bc 100644
--- a/lisp/dos-fns.el
+++ b/lisp/dos-fns.el
@@ -31,7 +31,7 @@
31(declare-function msdos-long-file-names "msdos.c") 31(declare-function msdos-long-file-names "msdos.c")
32 32
33;; This overrides a trivial definition in files.el. 33;; This overrides a trivial definition in files.el.
34(defun convert-standard-filename (filename) 34(defun dos-convert-standard-filename (filename)
35 "Convert a standard file's name to something suitable for the current OS. 35 "Convert a standard file's name to something suitable for the current OS.
36This means to guarantee valid names and perhaps to canonicalize 36This means to guarantee valid names and perhaps to canonicalize
37certain patterns. 37certain patterns.
@@ -48,7 +48,7 @@ shell requires it (see `w32-shell-dos-semantics')."
48 (let ((flen (length filename))) 48 (let ((flen (length filename)))
49 ;; If FILENAME has a trailing slash, remove it and recurse. 49 ;; If FILENAME has a trailing slash, remove it and recurse.
50 (if (memq (aref filename (1- flen)) '(?/ ?\\)) 50 (if (memq (aref filename (1- flen)) '(?/ ?\\))
51 (concat (convert-standard-filename 51 (concat (dos-convert-standard-filename
52 (substring filename 0 (1- flen))) 52 (substring filename 0 (1- flen)))
53 "/") 53 "/")
54 (let* (;; ange-ftp gets in the way for names like "/foo:bar". 54 (let* (;; ange-ftp gets in the way for names like "/foo:bar".
@@ -122,12 +122,17 @@ shell requires it (see `w32-shell-dos-semantics')."
122 (aset string (1- (length string)) lastchar)))) 122 (aset string (1- (length string)) lastchar))))
123 (concat (if (and (stringp dir) 123 (concat (if (and (stringp dir)
124 (memq (aref dir dlen-m-1) '(?/ ?\\))) 124 (memq (aref dir dlen-m-1) '(?/ ?\\)))
125 (concat (convert-standard-filename 125 (concat (dos-convert-standard-filename
126 (substring dir 0 dlen-m-1)) 126 (substring dir 0 dlen-m-1))
127 "/") 127 "/")
128 (convert-standard-filename dir)) 128 (dos-convert-standard-filename dir))
129 string)))))) 129 string))))))
130 130
131;; Only redirect convert-standard-filename if it has a chance of working,
132;; otherwise loading dos-fns.el might make your non-DOS Emacs misbehave.
133(when (fboundp 'msdos-long-file-names)
134 (defalias 'convert-standard-filename 'dos-convert-standard-filename))
135
131(defun dos-8+3-filename (filename) 136(defun dos-8+3-filename (filename)
132 "Truncate FILENAME to DOS 8+3 limits." 137 "Truncate FILENAME to DOS 8+3 limits."
133 (if (or (not (stringp filename)) 138 (if (or (not (stringp filename))
@@ -188,12 +193,12 @@ shell requires it (see `w32-shell-dos-semantics')."
188 193
189;; This is for the sake of standard file names elsewhere in Emacs that 194;; This is for the sake of standard file names elsewhere in Emacs that
190;; are defined as constant strings or via defconst, and whose 195;; are defined as constant strings or via defconst, and whose
191;; conversion via `convert-standard-filename' does not give good 196;; conversion via `dos-convert-standard-filename' does not give good
192;; enough results. 197;; enough results.
193(defun dosified-file-name (file-name) 198(defun dosified-file-name (file-name)
194 "Return a variant of FILE-NAME that is valid on MS-DOS filesystems. 199 "Return a variant of FILE-NAME that is valid on MS-DOS filesystems.
195 200
196This function is for those rare cases where `convert-standard-filename' 201This function is for those rare cases where `dos-convert-standard-filename'
197does not do a job that is good enough, e.g. if you need to preserve the 202does not do a job that is good enough, e.g. if you need to preserve the
198file-name extension. It recognizes only certain specific file names 203file-name extension. It recognizes only certain specific file names
199that are used in Emacs Lisp sources; any other file name will be 204that are used in Emacs Lisp sources; any other file name will be
@@ -209,13 +214,13 @@ returned unaltered."
209(defvar msdos-shells) 214(defvar msdos-shells)
210 215
211;; Override settings chosen at startup. 216;; Override settings chosen at startup.
212(defun set-default-process-coding-system () 217(defun dos-set-default-process-coding-system ()
213 (setq default-process-coding-system 218 (setq default-process-coding-system
214 (if (default-value 'enable-multibyte-characters) 219 (if (default-value 'enable-multibyte-characters)
215 '(undecided-dos . undecided-dos) 220 '(undecided-dos . undecided-dos)
216 '(raw-text-dos . raw-text-dos)))) 221 '(raw-text-dos . raw-text-dos))))
217 222
218(add-hook 'before-init-hook 'set-default-process-coding-system) 223(add-hook 'before-init-hook 'dos-set-default-process-coding-system)
219 224
220;; File names defined in preloaded packages can be incorrect or 225;; File names defined in preloaded packages can be incorrect or
221;; invalid if long file names were available during dumping, but not 226;; invalid if long file names were available during dumping, but not
@@ -232,17 +237,17 @@ returned unaltered."
232 237
233(add-hook 'before-init-hook 'dos-reevaluate-defcustoms) 238(add-hook 'before-init-hook 'dos-reevaluate-defcustoms)
234 239
235(defvar register-name-alist 240(defvar dos-register-name-alist
236 '((ax . 0) (bx . 1) (cx . 2) (dx . 3) (si . 4) (di . 5) 241 '((ax . 0) (bx . 1) (cx . 2) (dx . 3) (si . 4) (di . 5)
237 (cflag . 6) (flags . 7) 242 (cflag . 6) (flags . 7)
238 (al . (0 . 0)) (bl . (1 . 0)) (cl . (2 . 0)) (dl . (3 . 0)) 243 (al . (0 . 0)) (bl . (1 . 0)) (cl . (2 . 0)) (dl . (3 . 0))
239 (ah . (0 . 1)) (bh . (1 . 1)) (ch . (2 . 1)) (dh . (3 . 1)))) 244 (ah . (0 . 1)) (bh . (1 . 1)) (ch . (2 . 1)) (dh . (3 . 1))))
240 245
241(defun make-register () 246(defun dos-make-register ()
242 (make-vector 8 0)) 247 (make-vector 8 0))
243 248
244(defun register-value (regs name) 249(defun dos-register-value (regs name)
245 (let ((where (cdr (assoc name register-name-alist)))) 250 (let ((where (cdr (assoc name dos-register-name-alist))))
246 (cond ((consp where) 251 (cond ((consp where)
247 (let ((tem (aref regs (car where)))) 252 (let ((tem (aref regs (car where))))
248 (if (zerop (cdr where)) 253 (if (zerop (cdr where))
@@ -252,10 +257,10 @@ returned unaltered."
252 (aref regs where)) 257 (aref regs where))
253 (t nil)))) 258 (t nil))))
254 259
255(defun set-register-value (regs name value) 260(defun dos-set-register-value (regs name value)
256 (and (numberp value) 261 (and (numberp value)
257 (>= value 0) 262 (>= value 0)
258 (let ((where (cdr (assoc name register-name-alist)))) 263 (let ((where (cdr (assoc name dos-register-name-alist))))
259 (cond ((consp where) 264 (cond ((consp where)
260 (let ((tem (aref regs (car where))) 265 (let ((tem (aref regs (car where)))
261 (value (logand value 255))) 266 (value (logand value 255)))
@@ -268,18 +273,18 @@ returned unaltered."
268 (aset regs where (logand value 65535)))))) 273 (aset regs where (logand value 65535))))))
269 regs) 274 regs)
270 275
271(defsubst intdos (regs) 276(defsubst dos-intdos (regs)
272 (int86 33 regs)) 277 (int86 33 regs))
273 278
274;; Backward compatibility for obsolescent functions which 279;; Backward compatibility for obsolescent functions which
275;; set screen size. 280;; set screen size.
276 281
277(defun mode25 () 282(defun dos-mode25 ()
278 "Changes the number of screen rows to 25." 283 "Changes the number of screen rows to 25."
279 (interactive) 284 (interactive)
280 (set-frame-size (selected-frame) 80 25)) 285 (set-frame-size (selected-frame) 80 25))
281 286
282(defun mode4350 () 287(defun dos-mode4350 ()
283 "Changes the number of rows to 43 or 50. 288 "Changes the number of rows to 43 or 50.
284Emacs always tries to set the screen height to 50 rows first. 289Emacs always tries to set the screen height to 50 rows first.
285If this fails, it will try to set it to 43 rows, on the assumption 290If this fails, it will try to set it to 43 rows, on the assumption
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 194d2036c3f..0b7eaf7ed72 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,25 @@
12010-05-13 Katsumi Yamaoka <yamaoka@jpl.org>
2
3 * mml1991.el (mml1991-mailcrypt-encrypt, mml1991-gpg-encrypt)
4 * mml2015.el (mml2015-gpg-encrypt): Disable multibyte in buffers
5 generated within the mm-with-unibyte-current-buffer macro.
6
72010-05-13 Katsumi Yamaoka <yamaoka@jpl.org>
8
9 * gnus-art.el (gnus-bind-safe-url-regexp): Bind mm-w3m-safe-url-regexp
10 to nil when we're in a mml-preview buffer and no group is selected.
11
122010-05-12 Andreas Seltenreich <seltenreich@gmx.de>
13
14 * gnus-sum.el (gnus-summary-read-group-1): Don't jump to next group
15 when catching the `C-g'. Reported by: "Leo"
16
172010-05-12 Katsumi Yamaoka <yamaoka@jpl.org>
18
19 * message.el (message-forward-make-body-plain)
20 (message-forward-make-body-mml): Use mm-multibyte-string-p instead of
21 multibyte-string-p.
22
12010-05-12 Katsumi Yamaoka <yamaoka@jpl.org> 232010-05-12 Katsumi Yamaoka <yamaoka@jpl.org>
2 24
3 * message.el (message-forward-make-body-mml): Assume original message 25 * message.el (message-forward-make-body-mml): Assume original message
diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el
index 5f899b3067a..0659ee893de 100644
--- a/lisp/gnus/gnus-art.el
+++ b/lisp/gnus/gnus-art.el
@@ -4822,7 +4822,11 @@ General format specifiers can also be used. See Info node
4822 (with-current-buffer gnus-article-current-summary 4822 (with-current-buffer gnus-article-current-summary
4823 gnus-newsgroup-name) 4823 gnus-newsgroup-name)
4824 gnus-newsgroup-name))) 4824 gnus-newsgroup-name)))
4825 (if (cond ((stringp gnus-safe-html-newsgroups) 4825 (if (cond ((not group)
4826 ;; Maybe we're in a mml-preview buffer
4827 ;; and no group is selected.
4828 t)
4829 ((stringp gnus-safe-html-newsgroups)
4826 (string-match gnus-safe-html-newsgroups group)) 4830 (string-match gnus-safe-html-newsgroups group))
4827 ((consp gnus-safe-html-newsgroups) 4831 ((consp gnus-safe-html-newsgroups)
4828 (member group gnus-safe-html-newsgroups))) 4832 (member group gnus-safe-html-newsgroups)))
diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el
index a0943493844..3a2c944ed2f 100644
--- a/lisp/gnus/gnus-sum.el
+++ b/lisp/gnus/gnus-sum.el
@@ -3931,7 +3931,6 @@ If NO-DISPLAY, don't generate a summary buffer."
3931 (progn 3931 (progn
3932 (set-buffer gnus-group-buffer) 3932 (set-buffer gnus-group-buffer)
3933 (gnus-group-jump-to-group group) 3933 (gnus-group-jump-to-group group)
3934 (gnus-group-next-unread-group 1)
3935 (gnus-configure-windows 'group 'force)) 3934 (gnus-configure-windows 'group 'force))
3936 (gnus-handle-ephemeral-exit quit-config)) 3935 (gnus-handle-ephemeral-exit quit-config))
3937 ;; Finally signal the quit. 3936 ;; Finally signal the quit.
diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index 897fe695288..947b1bd53e8 100644
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -7165,7 +7165,7 @@ Optional DIGEST will use digest to forward."
7165 (contents (with-current-buffer forward-buffer (buffer-string))) 7165 (contents (with-current-buffer forward-buffer (buffer-string)))
7166 e) 7166 e)
7167 (unless (featurep 'xemacs) 7167 (unless (featurep 'xemacs)
7168 (unless (multibyte-string-p contents) 7168 (unless (mm-multibyte-string-p contents)
7169 (error "Attempt to insert unibyte string from the buffer \"%s\"\ 7169 (error "Attempt to insert unibyte string from the buffer \"%s\"\
7170 to the multibyte buffer \"%s\"" 7170 to the multibyte buffer \"%s\""
7171 (if (bufferp forward-buffer) 7171 (if (bufferp forward-buffer)
@@ -7220,7 +7220,7 @@ Optional DIGEST will use digest to forward."
7220 (if (not message-forward-decoded-p) 7220 (if (not message-forward-decoded-p)
7221 (let ((contents (with-current-buffer forward-buffer (buffer-string)))) 7221 (let ((contents (with-current-buffer forward-buffer (buffer-string))))
7222 (unless (featurep 'xemacs) 7222 (unless (featurep 'xemacs)
7223 (unless (multibyte-string-p contents) 7223 (unless (mm-multibyte-string-p contents)
7224 (error "Attempt to insert unibyte string from the buffer \"%s\"\ 7224 (error "Attempt to insert unibyte string from the buffer \"%s\"\
7225 to the multibyte buffer \"%s\"" 7225 to the multibyte buffer \"%s\""
7226 (if (bufferp forward-buffer) 7226 (if (bufferp forward-buffer)
diff --git a/lisp/gnus/mml1991.el b/lisp/gnus/mml1991.el
index a3ada29fa66..3ba479574fd 100644
--- a/lisp/gnus/mml1991.el
+++ b/lisp/gnus/mml1991.el
@@ -145,6 +145,7 @@ Whether the passphrase is cached at all is controlled by
145 (delete-region (point-min) (point))) 145 (delete-region (point-min) (point)))
146 (mm-with-unibyte-current-buffer 146 (mm-with-unibyte-current-buffer
147 (with-temp-buffer 147 (with-temp-buffer
148 (inline (mm-disable-multibyte))
148 (setq cipher (current-buffer)) 149 (setq cipher (current-buffer))
149 (insert-buffer-substring text) 150 (insert-buffer-substring text)
150 (unless (mc-encrypt-generic 151 (unless (mc-encrypt-generic
@@ -225,6 +226,7 @@ Whether the passphrase is cached at all is controlled by
225 (delete-region (point-min) (point))) 226 (delete-region (point-min) (point)))
226 (mm-with-unibyte-current-buffer 227 (mm-with-unibyte-current-buffer
227 (with-temp-buffer 228 (with-temp-buffer
229 (inline (mm-disable-multibyte))
228 (flet ((gpg-encrypt-func 230 (flet ((gpg-encrypt-func
229 (sign plaintext ciphertext result recipients &optional 231 (sign plaintext ciphertext result recipients &optional
230 passphrase sign-with-key armor textmode) 232 passphrase sign-with-key armor textmode)
diff --git a/lisp/gnus/mml2015.el b/lisp/gnus/mml2015.el
index 130a3ca86a5..977f4dabb67 100644
--- a/lisp/gnus/mml2015.el
+++ b/lisp/gnus/mml2015.el
@@ -680,6 +680,7 @@ Whether the passphrase is cached at all is controlled by
680 cipher) 680 cipher)
681 (mm-with-unibyte-current-buffer 681 (mm-with-unibyte-current-buffer
682 (with-temp-buffer 682 (with-temp-buffer
683 (mm-disable-multibyte)
683 ;; set up a function to call the correct gpg encrypt routine 684 ;; set up a function to call the correct gpg encrypt routine
684 ;; with the right arguments. (FIXME: this should be done 685 ;; with the right arguments. (FIXME: this should be done
685 ;; differently.) 686 ;; differently.)
diff --git a/lisp/net/tramp-smb.el b/lisp/net/tramp-smb.el
index 434c2bad20d..00b282b83e3 100644
--- a/lisp/net/tramp-smb.el
+++ b/lisp/net/tramp-smb.el
@@ -334,41 +334,41 @@ KEEP-DATE is not handled in case NEWNAME resides on an SMB server.
334PRESERVE-UID-GID is completely ignored." 334PRESERVE-UID-GID is completely ignored."
335 (setq filename (expand-file-name filename) 335 (setq filename (expand-file-name filename)
336 newname (expand-file-name newname)) 336 newname (expand-file-name newname))
337 (with-progress-reporter
338 (tramp-dissect-file-name (if (file-remote-p filename) filename newname))
339 0 (format "Copying %s to %s" filename newname)
340
341 (let ((tmpfile (file-local-copy filename)))
342
343 (if tmpfile
344 ;; Remote filename.
345 (condition-case err
346 (rename-file tmpfile newname ok-if-already-exists)
347 ((error quit)
348 (tramp-compat-delete-file tmpfile 'force)
349 (signal (car err) (cdr err))))
350
351 ;; Remote newname.
352 (when (file-directory-p newname)
353 (setq newname
354 (expand-file-name (file-name-nondirectory filename) newname)))
355
356 (with-parsed-tramp-file-name newname nil
357 (when (and (not ok-if-already-exists)
358 (file-exists-p newname))
359 (tramp-error v 'file-already-exists newname))
337 360
338 (let ((tmpfile (file-local-copy filename))) 361 ;; We must also flush the cache of the directory, because
339 362 ;; `file-attributes' reads the values from there.
340 (if tmpfile 363 (tramp-flush-file-property v (file-name-directory localname))
341 ;; Remote filename. 364 (tramp-flush-file-property v localname)
342 (condition-case err 365 (unless (tramp-smb-get-share v)
343 (rename-file tmpfile newname ok-if-already-exists) 366 (tramp-error
344 ((error quit) 367 v 'file-error "Target `%s' must contain a share name" newname))
345 (tramp-compat-delete-file tmpfile 'force) 368 (unless (tramp-smb-send-command
346 (signal (car err) (cdr err)))) 369 v (format "put \"%s\" \"%s\""
347 370 filename (tramp-smb-get-localname v)))
348 ;; Remote newname. 371 (tramp-error v 'file-error "Cannot copy `%s'" filename))))))
349 (when (file-directory-p newname)
350 (setq newname (expand-file-name
351 (file-name-nondirectory filename) newname)))
352
353 (with-parsed-tramp-file-name newname nil
354 (when (and (not ok-if-already-exists)
355 (file-exists-p newname))
356 (tramp-error v 'file-already-exists newname))
357
358 ;; We must also flush the cache of the directory, because
359 ;; `file-attributes' reads the values from there.
360 (tramp-flush-file-property v (file-name-directory localname))
361 (tramp-flush-file-property v localname)
362 (unless (tramp-smb-get-share v)
363 (tramp-error
364 v 'file-error "Target `%s' must contain a share name" newname))
365 (tramp-message v 0 "Copying file %s to file %s..." filename newname)
366 (if (tramp-smb-send-command
367 v (format "put \"%s\" \"%s\""
368 filename (tramp-smb-get-localname v)))
369 (tramp-message
370 v 0 "Copying file %s to file %s...done" filename newname)
371 (tramp-error v 'file-error "Cannot copy `%s'" filename)))))
372 372
373 ;; KEEP-DATE handling. 373 ;; KEEP-DATE handling.
374 (when keep-date (set-file-times newname (nth 5 (file-attributes filename))))) 374 (when keep-date (set-file-times newname (nth 5 (file-attributes filename)))))
@@ -605,15 +605,15 @@ PRESERVE-UID-GID is completely ignored."
605 v 'file-error 605 v 'file-error
606 "Cannot make local copy of non-existing file `%s'" filename)) 606 "Cannot make local copy of non-existing file `%s'" filename))
607 (let ((tmpfile (tramp-compat-make-temp-file filename))) 607 (let ((tmpfile (tramp-compat-make-temp-file filename)))
608 (tramp-message v 4 "Fetching %s to tmp file %s..." filename tmpfile) 608 (with-progress-reporter
609 (if (tramp-smb-send-command 609 v 3 (format "Fetching %s to tmp file %s" filename tmpfile)
610 v (format "get \"%s\" \"%s\"" (tramp-smb-get-localname v) tmpfile)) 610 (unless (tramp-smb-send-command
611 (tramp-message 611 v (format "get \"%s\" \"%s\""
612 v 4 "Fetching %s to tmp file %s...done" filename tmpfile) 612 (tramp-smb-get-localname v) tmpfile))
613 ;; Oops, an error. We shall cleanup. 613 ;; Oops, an error. We shall cleanup.
614 (tramp-compat-delete-file tmpfile 'force) 614 (tramp-compat-delete-file tmpfile 'force)
615 (tramp-error 615 (tramp-error
616 v 'file-error "Cannot make local copy of file `%s'" filename)) 616 v 'file-error "Cannot make local copy of file `%s'" filename)))
617 tmpfile))) 617 tmpfile)))
618 618
619;; This function should return "foo/" for directories and "bar" for 619;; This function should return "foo/" for directories and "bar" for
@@ -850,38 +850,39 @@ target of the symlink differ."
850 "Like `rename-file' for Tramp files." 850 "Like `rename-file' for Tramp files."
851 (setq filename (expand-file-name filename) 851 (setq filename (expand-file-name filename)
852 newname (expand-file-name newname)) 852 newname (expand-file-name newname))
853 (with-progress-reporter
854 (tramp-dissect-file-name (if (file-remote-p filename) filename newname))
855 0 (format "Renaming %s to %s" filename newname)
856
857 (let ((tmpfile (file-local-copy filename)))
858
859 (if tmpfile
860 ;; Remote filename.
861 (condition-case err
862 (rename-file tmpfile newname ok-if-already-exists)
863 ((error quit)
864 (tramp-compat-delete-file tmpfile 'force)
865 (signal (car err) (cdr err))))
866
867 ;; Remote newname.
868 (when (file-directory-p newname)
869 (setq newname (expand-file-name
870 (file-name-nondirectory filename) newname)))
871
872 (with-parsed-tramp-file-name newname nil
873 (when (and (not ok-if-already-exists)
874 (file-exists-p newname))
875 (tramp-error v 'file-already-exists newname))
876 ;; We must also flush the cache of the directory, because
877 ;; `file-attributes' reads the values from there.
878 (tramp-flush-file-property v (file-name-directory localname))
879 (tramp-flush-file-property v localname)
880 (unless (tramp-smb-send-command
881 v (format "put %s \"%s\""
882 filename (tramp-smb-get-localname v)))
883 (tramp-error v 'file-error "Cannot rename `%s'" filename)))))
853 884
854 (let ((tmpfile (file-local-copy filename))) 885 (tramp-compat-delete-file filename 'force)))
855
856 (if tmpfile
857 ;; Remote filename.
858 (condition-case err
859 (rename-file tmpfile newname ok-if-already-exists)
860 ((error quit)
861 (tramp-compat-delete-file tmpfile 'force)
862 (signal (car err) (cdr err))))
863
864 ;; Remote newname.
865 (when (file-directory-p newname)
866 (setq newname (expand-file-name
867 (file-name-nondirectory filename) newname)))
868
869 (with-parsed-tramp-file-name newname nil
870 (when (and (not ok-if-already-exists)
871 (file-exists-p newname))
872 (tramp-error v 'file-already-exists newname))
873 ;; We must also flush the cache of the directory, because
874 ;; `file-attributes' reads the values from there.
875 (tramp-flush-file-property v (file-name-directory localname))
876 (tramp-flush-file-property v localname)
877 (tramp-message v 0 "Copying file %s to file %s..." filename newname)
878 (if (tramp-smb-send-command
879 v (format "put %s \"%s\"" filename (tramp-smb-get-localname v)))
880 (tramp-message
881 v 0 "Copying file %s to file %s...done" filename newname)
882 (tramp-error v 'file-error "Cannot rename `%s'" filename)))))
883
884 (tramp-compat-delete-file filename 'force))
885 886
886(defun tramp-smb-handle-set-file-modes (filename mode) 887(defun tramp-smb-handle-set-file-modes (filename mode)
887 "Like `set-file-modes' for Tramp files." 888 "Like `set-file-modes' for Tramp files."
@@ -938,14 +939,14 @@ errors for shares like \"C$/\", which are common in Microsoft Windows."
938 (list start end tmpfile append 'no-message lockname confirm) 939 (list start end tmpfile append 'no-message lockname confirm)
939 (list start end tmpfile append 'no-message lockname))) 940 (list start end tmpfile append 'no-message lockname)))
940 941
941 (tramp-message v 5 "Writing tmp file %s to file %s..." tmpfile filename) 942 (with-progress-reporter
942 (unwind-protect 943 v 3 (format "Moving tmp file %s to %s" tmpfile filename)
943 (if (tramp-smb-send-command 944 (unwind-protect
944 v (format "put %s \"%s\"" tmpfile (tramp-smb-get-localname v))) 945 (unless (tramp-smb-send-command
945 (tramp-message 946 v (format "put %s \"%s\""
946 v 5 "Writing tmp file %s to file %s...done" tmpfile filename) 947 tmpfile (tramp-smb-get-localname v)))
947 (tramp-error v 'file-error "Cannot write `%s'" filename)) 948 (tramp-error v 'file-error "Cannot write `%s'" filename))
948 (tramp-compat-delete-file tmpfile 'force)) 949 (tramp-compat-delete-file tmpfile 'force)))
949 950
950 (unless (equal curbuf (current-buffer)) 951 (unless (equal curbuf (current-buffer))
951 (tramp-error 952 (tramp-error
@@ -1302,60 +1303,57 @@ connection if a previous connection has died for some reason."
1302 (setq args (append args (list "-s" tramp-smb-conf)))) 1303 (setq args (append args (list "-s" tramp-smb-conf))))
1303 1304
1304 ;; OK, let's go. 1305 ;; OK, let's go.
1305 (tramp-message 1306 (with-progress-reporter
1306 vec 3 "Opening connection for //%s%s/%s..." 1307 vec 3
1307 (if (not (zerop (length user))) (concat user "@") "") 1308 (format "Opening connection for //%s%s/%s"
1308 host (or share "")) 1309 (if (not (zerop (length user))) (concat user "@") "")
1309 1310 host (or share ""))
1310 (let* ((coding-system-for-read nil) 1311
1311 (process-connection-type tramp-process-connection-type) 1312 (let* ((coding-system-for-read nil)
1312 (p (let ((default-directory 1313 (process-connection-type tramp-process-connection-type)
1313 (tramp-compat-temporary-file-directory))) 1314 (p (let ((default-directory
1314 (apply #'start-process 1315 (tramp-compat-temporary-file-directory)))
1315 (tramp-buffer-name vec) (tramp-get-buffer vec) 1316 (apply #'start-process
1316 tramp-smb-program args)))) 1317 (tramp-buffer-name vec) (tramp-get-buffer vec)
1317 1318 tramp-smb-program args))))
1318 (tramp-message 1319
1319 vec 6 "%s" (mapconcat 'identity (process-command p) " ")) 1320 (tramp-message
1320 (tramp-set-process-query-on-exit-flag p nil) 1321 vec 6 "%s" (mapconcat 'identity (process-command p) " "))
1321 1322 (tramp-set-process-query-on-exit-flag p nil)
1322 ;; Set variables for computing the prompt for reading password. 1323
1323 (setq tramp-current-method tramp-smb-method 1324 ;; Set variables for computing the prompt for reading password.
1324 tramp-current-user user 1325 (setq tramp-current-method tramp-smb-method
1325 tramp-current-host host) 1326 tramp-current-user user
1326 1327 tramp-current-host host)
1327 ;; Play login scenario. 1328
1328 (tramp-process-actions 1329 ;; Play login scenario.
1329 p vec 1330 (tramp-process-actions
1330 (if share 1331 p vec
1331 tramp-smb-actions-with-share 1332 (if share
1332 tramp-smb-actions-without-share)) 1333 tramp-smb-actions-with-share
1333 1334 tramp-smb-actions-without-share))
1334 ;; Check server version. 1335
1335 (with-current-buffer (tramp-get-connection-buffer vec) 1336 ;; Check server version.
1336 (goto-char (point-min)) 1337 (with-current-buffer (tramp-get-connection-buffer vec)
1337 (search-forward-regexp 1338 (goto-char (point-min))
1338 "Domain=\\[[^]]*\\] OS=\\[[^]]*\\] Server=\\[[^]]*\\]" nil t) 1339 (search-forward-regexp
1339 (let ((smbserver-version (match-string 0))) 1340 "Domain=\\[[^]]*\\] OS=\\[[^]]*\\] Server=\\[[^]]*\\]" nil t)
1340 (unless 1341 (let ((smbserver-version (match-string 0)))
1341 (string-equal 1342 (unless
1342 smbserver-version 1343 (string-equal
1343 (tramp-get-connection-property 1344 smbserver-version
1344 vec "smbserver-version" smbserver-version)) 1345 (tramp-get-connection-property
1345 (tramp-flush-directory-property vec "") 1346 vec "smbserver-version" smbserver-version))
1346 (tramp-flush-connection-property vec)) 1347 (tramp-flush-directory-property vec "")
1347 (tramp-set-connection-property 1348 (tramp-flush-connection-property vec))
1348 vec "smbserver-version" smbserver-version))) 1349 (tramp-set-connection-property
1349 1350 vec "smbserver-version" smbserver-version)))
1350 ;; Set chunksize. Otherwise, `tramp-send-string' might 1351
1351 ;; try it itself. 1352 ;; Set chunksize. Otherwise, `tramp-send-string' might
1352 (tramp-set-connection-property p "smb-share" share) 1353 ;; try it itself.
1353 (tramp-set-connection-property p "chunksize" tramp-chunksize) 1354 (tramp-set-connection-property p "smb-share" share)
1354 1355 (tramp-set-connection-property
1355 (tramp-message 1356 p "chunksize" tramp-chunksize))))))))
1356 vec 3 "Opening connection for //%s%s/%s...done"
1357 (if (not (zerop (length user))) (concat user "@") "")
1358 host (or share ""))))))))
1359 1357
1360;; We don't use timeouts. If needed, the caller shall wrap around. 1358;; We don't use timeouts. If needed, the caller shall wrap around.
1361(defun tramp-smb-wait-for-output (vec) 1359(defun tramp-smb-wait-for-output (vec)
diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el
index 2da11bda834..c5addae8e5d 100644
--- a/lisp/net/tramp.el
+++ b/lisp/net/tramp.el
@@ -2271,14 +2271,18 @@ FILE must be a local file name on a connection identified via VEC."
2271 (tramp-message ,vec ,level "%s..." ,message) 2271 (tramp-message ,vec ,level "%s..." ,message)
2272 ;; We start a pulsing progress reporter after 3 seconds. Feature 2272 ;; We start a pulsing progress reporter after 3 seconds. Feature
2273 ;; introduced in Emacs 24.1. 2273 ;; introduced in Emacs 24.1.
2274 (when (<= ,level tramp-verbose) 2274 (when (and tramp-message-show-message
2275 ;; Display only when there is a minimum level.
2276 (<= ,level (min tramp-verbose 3)))
2275 (condition-case nil 2277 (condition-case nil
2276 (setq pr (tramp-compat-funcall 'make-progress-reporter ,message) 2278 (setq pr (tramp-compat-funcall 'make-progress-reporter ,message)
2277 tm (if pr (run-at-time 3 0.1 'progress-reporter-update pr))) 2279 tm (if pr (run-at-time 3 0.1 'progress-reporter-update pr)))
2278 (error nil))) 2280 (error nil)))
2279 (unwind-protect 2281 (unwind-protect
2280 ;; Execute the body. 2282 ;; Execute the body.
2281 (progn ,@body) 2283 (let ((tramp-message-show-message
2284 (and tramp-message-show-message (not tm))))
2285 ,@body)
2282 ;; Stop progress reporter. 2286 ;; Stop progress reporter.
2283 (if tm (tramp-compat-funcall 'cancel-timer tm)) 2287 (if tm (tramp-compat-funcall 'cancel-timer tm))
2284 (tramp-message ,vec ,level "%s...done" ,message)))) 2288 (tramp-message ,vec ,level "%s...done" ,message))))
@@ -2558,13 +2562,13 @@ target of the symlink differ."
2558 (tramp-error v 'file-error "Cannot load nonexistent file `%s'" file))) 2562 (tramp-error v 'file-error "Cannot load nonexistent file `%s'" file)))
2559 (if (not (file-exists-p file)) 2563 (if (not (file-exists-p file))
2560 nil 2564 nil
2561 (unless nomessage (tramp-message v 0 "Loading %s..." file)) 2565 (let ((tramp-message-show-message (not nomessage)))
2562 (let ((local-copy (file-local-copy file))) 2566 (with-progress-reporter v 0 (format "Loading %s" file)
2563 ;; MUST-SUFFIX doesn't exist on XEmacs, so let it default to nil. 2567 (let ((local-copy (file-local-copy file)))
2564 (unwind-protect 2568 ;; MUST-SUFFIX doesn't exist on XEmacs, so let it default to nil.
2565 (load local-copy noerror t t) 2569 (unwind-protect
2566 (tramp-compat-delete-file local-copy 'force))) 2570 (load local-copy noerror t t)
2567 (unless nomessage (tramp-message v 0 "Loading %s...done" file)) 2571 (tramp-compat-delete-file local-copy 'force)))))
2568 t))) 2572 t)))
2569 2573
2570;; Localname manipulation functions that grok Tramp localnames... 2574;; Localname manipulation functions that grok Tramp localnames...
@@ -4153,7 +4157,7 @@ This is like `dired-recursive-delete-directory' for Tramp files."
4153 nil) 4157 nil)
4154 ((and suffix (nth 2 suffix)) 4158 ((and suffix (nth 2 suffix))
4155 ;; We found an uncompression rule. 4159 ;; We found an uncompression rule.
4156 (with-progress-reporter v 0 (format "Uncompressing %s..." file) 4160 (with-progress-reporter v 0 (format "Uncompressing %s" file)
4157 (when (zerop 4161 (when (zerop
4158 (tramp-send-command-and-check 4162 (tramp-send-command-and-check
4159 v (concat (nth 2 suffix) " " 4163 v (concat (nth 2 suffix) " "
@@ -4165,7 +4169,7 @@ This is like `dired-recursive-delete-directory' for Tramp files."
4165 (t 4169 (t
4166 ;; We don't recognize the file as compressed, so compress it. 4170 ;; We don't recognize the file as compressed, so compress it.
4167 ;; Try gzip. 4171 ;; Try gzip.
4168 (with-progress-reporter v 0 (format "Compressing %s..." file) 4172 (with-progress-reporter v 0 (format "Compressing %s" file)
4169 (when (zerop 4173 (when (zerop
4170 (tramp-send-command-and-check 4174 (tramp-send-command-and-check
4171 v (concat "gzip -f " 4175 v (concat "gzip -f "
@@ -4747,11 +4751,11 @@ Lisp error raised when PROGRAM is nil is trapped also, returning 1."
4747 ;; Use inline encoding for file transfer. 4751 ;; Use inline encoding for file transfer.
4748 (rem-enc 4752 (rem-enc
4749 (save-excursion 4753 (save-excursion
4750 (tramp-message v 5 "Encoding remote file %s..." filename) 4754 (with-progress-reporter
4751 (tramp-barf-unless-okay 4755 v 5 (format "Encoding remote file %s" filename)
4752 v (format rem-enc (tramp-shell-quote-argument localname)) 4756 (tramp-barf-unless-okay
4753 "Encoding remote file failed") 4757 v (format rem-enc (tramp-shell-quote-argument localname))
4754 (tramp-message v 5 "Encoding remote file %s...done" filename) 4758 "Encoding remote file failed"))
4755 4759
4756 (if (functionp loc-dec) 4760 (if (functionp loc-dec)
4757 ;; If local decoding is a function, we call it. We 4761 ;; If local decoding is a function, we call it. We
@@ -4761,15 +4765,15 @@ Lisp error raised when PROGRAM is nil is trapped also, returning 1."
4761 (with-temp-buffer 4765 (with-temp-buffer
4762 (set-buffer-multibyte nil) 4766 (set-buffer-multibyte nil)
4763 (insert-buffer-substring (tramp-get-buffer v)) 4767 (insert-buffer-substring (tramp-get-buffer v))
4764 (tramp-message 4768 (with-progress-reporter
4765 v 5 "Decoding remote file %s with function %s..." 4769 v 3 (format "Decoding remote file %s with function %s"
4766 filename loc-dec) 4770 filename loc-dec)
4767 (funcall loc-dec (point-min) (point-max)) 4771 (funcall loc-dec (point-min) (point-max))
4768 ;; Unset `file-name-handler-alist'. Otherwise, 4772 ;; Unset `file-name-handler-alist'. Otherwise,
4769 ;; epa-file gets confused. 4773 ;; epa-file gets confused.
4770 (let (file-name-handler-alist 4774 (let (file-name-handler-alist
4771 (coding-system-for-write 'binary)) 4775 (coding-system-for-write 'binary))
4772 (write-region (point-min) (point-max) tmpfile))) 4776 (write-region (point-min) (point-max) tmpfile))))
4773 4777
4774 ;; If tramp-decoding-function is not defined for this 4778 ;; If tramp-decoding-function is not defined for this
4775 ;; method, we invoke tramp-decoding-command instead. 4779 ;; method, we invoke tramp-decoding-command instead.
@@ -4779,14 +4783,14 @@ Lisp error raised when PROGRAM is nil is trapped also, returning 1."
4779 (let (file-name-handler-alist 4783 (let (file-name-handler-alist
4780 (coding-system-for-write 'binary)) 4784 (coding-system-for-write 'binary))
4781 (write-region (point-min) (point-max) tmpfile2)) 4785 (write-region (point-min) (point-max) tmpfile2))
4782 (tramp-message 4786 (with-progress-reporter
4783 v 5 "Decoding remote file %s with command %s..." 4787 v 3 (format "Decoding remote file %s with command %s"
4784 filename loc-dec) 4788 filename loc-dec)
4785 (unwind-protect 4789 (unwind-protect
4786 (tramp-call-local-coding-command loc-dec tmpfile2 tmpfile) 4790 (tramp-call-local-coding-command
4787 (tramp-compat-delete-file tmpfile2 'force)))) 4791 loc-dec tmpfile2 tmpfile)
4792 (tramp-compat-delete-file tmpfile2 'force)))))
4788 4793
4789 (tramp-message v 5 "Decoding remote file %s...done" filename)
4790 ;; Set proper permissions. 4794 ;; Set proper permissions.
4791 (set-file-modes tmpfile (tramp-default-file-modes filename)) 4795 (set-file-modes tmpfile (tramp-default-file-modes filename))
4792 ;; Set local user ownership. 4796 ;; Set local user ownership.
@@ -4842,7 +4846,7 @@ coding system might not be determined. This function repairs it."
4842 "Like `insert-file-contents' for Tramp files." 4846 "Like `insert-file-contents' for Tramp files."
4843 (barf-if-buffer-read-only) 4847 (barf-if-buffer-read-only)
4844 (setq filename (expand-file-name filename)) 4848 (setq filename (expand-file-name filename))
4845 (let (coding-system-used result local-copy remote-copy) 4849 (let (result local-copy remote-copy)
4846 (with-parsed-tramp-file-name filename nil 4850 (with-parsed-tramp-file-name filename nil
4847 (unwind-protect 4851 (unwind-protect
4848 (if (not (file-exists-p filename)) 4852 (if (not (file-exists-p filename))
@@ -4913,27 +4917,16 @@ coding system might not be determined. This function repairs it."
4913 (setq tramp-temp-buffer-file-name local-copy) 4917 (setq tramp-temp-buffer-file-name local-copy)
4914 (put 'tramp-temp-buffer-file-name 'permanent-local t)) 4918 (put 'tramp-temp-buffer-file-name 'permanent-local t))
4915 4919
4916 (tramp-message 4920 (with-progress-reporter
4917 v 4 "Inserting local temp file `%s'..." local-copy) 4921 v 3 (format "Inserting local temp file `%s'" local-copy)
4918 4922 ;; We must ensure that `file-coding-system-alist'
4919 ;; We must ensure that `file-coding-system-alist' 4923 ;; matches `local-copy'.
4920 ;; matches `local-copy'. 4924 (let ((file-coding-system-alist
4921 (let ((file-coding-system-alist 4925 (tramp-find-file-name-coding-system-alist
4922 (tramp-find-file-name-coding-system-alist 4926 filename local-copy)))
4923 filename local-copy))) 4927 (setq result
4924 (setq result 4928 (insert-file-contents
4925 (insert-file-contents 4929 local-copy nil nil nil replace))))))
4926 local-copy nil nil nil replace))
4927 ;; Now `last-coding-system-used' has right value.
4928 ;; Remember it.
4929 (when (boundp 'last-coding-system-used)
4930 (setq coding-system-used
4931 (symbol-value 'last-coding-system-used))))
4932
4933 (tramp-message
4934 v 4 "Inserting local temp file `%s'...done" local-copy)
4935 (when (boundp 'last-coding-system-used)
4936 (set 'last-coding-system-used coding-system-used))))
4937 4930
4938 ;; Save exit. 4931 ;; Save exit.
4939 (progn 4932 (progn
@@ -5193,15 +5186,14 @@ Returns a file name in `tramp-auto-save-directory' for autosaving this file."
5193 ;; Use inline file transfer. 5186 ;; Use inline file transfer.
5194 (rem-dec 5187 (rem-dec
5195 ;; Encode tmpfile. 5188 ;; Encode tmpfile.
5196 (tramp-message v 5 "Encoding region...")
5197 (unwind-protect 5189 (unwind-protect
5198 (with-temp-buffer 5190 (with-temp-buffer
5199 (set-buffer-multibyte nil) 5191 (set-buffer-multibyte nil)
5200 ;; Use encoding function or command. 5192 ;; Use encoding function or command.
5201 (if (functionp loc-enc) 5193 (if (functionp loc-enc)
5202 (progn 5194 (with-progress-reporter
5203 (tramp-message 5195 v 3 (format "Encoding region using function `%s'"
5204 v 5 "Encoding region using function `%s'..." loc-enc) 5196 loc-enc)
5205 (let ((coding-system-for-read 'binary)) 5197 (let ((coding-system-for-read 'binary))
5206 (insert-file-contents-literally tmpfile)) 5198 (insert-file-contents-literally tmpfile))
5207 ;; The following `let' is a workaround for the 5199 ;; The following `let' is a workaround for the
@@ -5217,59 +5209,61 @@ Returns a file name in `tramp-auto-save-directory' for autosaving this file."
5217 (tramp-compat-temporary-file-directory))) 5209 (tramp-compat-temporary-file-directory)))
5218 (funcall loc-enc (point-min) (point-max)))) 5210 (funcall loc-enc (point-min) (point-max))))
5219 5211
5220 (tramp-message 5212 (with-progress-reporter
5221 v 5 "Encoding region using command `%s'..." loc-enc) 5213 v 3 (format "Encoding region using command `%s'"
5222 (unless (zerop (tramp-call-local-coding-command 5214 loc-enc)
5223 loc-enc tmpfile t)) 5215 (unless (zerop (tramp-call-local-coding-command
5224 (tramp-error 5216 loc-enc tmpfile t))
5225 v 'file-error 5217 (tramp-error
5226 "Cannot write to `%s', local encoding command `%s' failed" 5218 v 'file-error
5227 filename loc-enc))) 5219 (concat "Cannot write to `%s', "
5220 "local encoding command `%s' failed")
5221 filename loc-enc))))
5228 5222
5229 ;; Send buffer into remote decoding command which 5223 ;; Send buffer into remote decoding command which
5230 ;; writes to remote file. Because this happens on 5224 ;; writes to remote file. Because this happens on
5231 ;; the remote host, we cannot use the function. 5225 ;; the remote host, we cannot use the function.
5232 (goto-char (point-max)) 5226 (with-progress-reporter
5233 (unless (bolp) (newline)) 5227 v 3
5234 (tramp-message 5228 (format "Decoding region into remote file %s" filename)
5235 v 5 "Decoding region into remote file %s..." filename) 5229 (goto-char (point-max))
5236 (tramp-send-command 5230 (unless (bolp) (newline))
5237 v 5231 (tramp-send-command
5238 (format 5232 v
5239 (concat rem-dec " <<'EOF'\n%sEOF") 5233 (format
5240 (tramp-shell-quote-argument localname) 5234 (concat rem-dec " <<'EOF'\n%sEOF")
5241 (buffer-string))) 5235 (tramp-shell-quote-argument localname)
5242 (tramp-barf-unless-okay 5236 (buffer-string)))
5243 v nil 5237 (tramp-barf-unless-okay
5244 "Couldn't write region to `%s', decode using `%s' failed" 5238 v nil
5245 filename rem-dec) 5239 "Couldn't write region to `%s', decode using `%s' failed"
5246 ;; When `file-precious-flag' is set, the region is 5240 filename rem-dec)
5247 ;; written to a temporary file. Check that the 5241 ;; When `file-precious-flag' is set, the region is
5248 ;; checksum is equal to that from the local tmpfile. 5242 ;; written to a temporary file. Check that the
5249 (when file-precious-flag 5243 ;; checksum is equal to that from the local tmpfile.
5250 (erase-buffer) 5244 (when file-precious-flag
5251 (and 5245 (erase-buffer)
5252 ;; cksum runs locally, if possible. 5246 (and
5253 (zerop (tramp-local-call-process "cksum" tmpfile t)) 5247 ;; cksum runs locally, if possible.
5254 ;; cksum runs remotely. 5248 (zerop (tramp-local-call-process "cksum" tmpfile t))
5255 (zerop 5249 ;; cksum runs remotely.
5256 (tramp-send-command-and-check 5250 (zerop
5257 v 5251 (tramp-send-command-and-check
5258 (format 5252 v
5259 "cksum <%s" (tramp-shell-quote-argument localname)))) 5253 (format
5260 ;; ... they are different. 5254 "cksum <%s"
5261 (not 5255 (tramp-shell-quote-argument localname))))
5262 (string-equal 5256 ;; ... they are different.
5263 (buffer-string) 5257 (not
5264 (with-current-buffer (tramp-get-buffer v) 5258 (string-equal
5265 (buffer-string)))) 5259 (buffer-string)
5266 (tramp-error 5260 (with-current-buffer (tramp-get-buffer v)
5267 v 'file-error 5261 (buffer-string))))
5268 (concat "Couldn't write region to `%s'," 5262 (tramp-error
5269 " decode using `%s' failed") 5263 v 'file-error
5270 filename rem-dec))) 5264 (concat "Couldn't write region to `%s',"
5271 (tramp-message 5265 " decode using `%s' failed")
5272 v 5 "Decoding region into remote file %s...done" filename)) 5266 filename rem-dec)))))
5273 5267
5274 ;; Save exit. 5268 ;; Save exit.
5275 (tramp-compat-delete-file tmpfile 'force))) 5269 (tramp-compat-delete-file tmpfile 'force)))
@@ -6286,14 +6280,13 @@ Only send the definition if it has not already been done."
6286 (let* ((p (tramp-get-connection-process vec)) 6280 (let* ((p (tramp-get-connection-process vec))
6287 (scripts (tramp-get-connection-property p "scripts" nil))) 6281 (scripts (tramp-get-connection-property p "scripts" nil)))
6288 (unless (member name scripts) 6282 (unless (member name scripts)
6289 (tramp-message vec 5 "Sending script `%s'..." name) 6283 (with-progress-reporter vec 5 (format "Sending script `%s'" name)
6290 ;; The script could contain a call of Perl. This is masked with `%s'. 6284 ;; The script could contain a call of Perl. This is masked with `%s'.
6291 (tramp-send-command-and-check 6285 (tramp-send-command-and-check
6292 vec 6286 vec
6293 (format "%s () {\n%s\n}" name 6287 (format "%s () {\n%s\n}" name
6294 (format script (tramp-get-remote-perl vec)))) 6288 (format script (tramp-get-remote-perl vec))))
6295 (tramp-set-connection-property p "scripts" (cons name scripts)) 6289 (tramp-set-connection-property p "scripts" (cons name scripts))))))
6296 (tramp-message vec 5 "Sending script `%s'...done." name))))
6297 6290
6298(defun tramp-set-auto-save () 6291(defun tramp-set-auto-save ()
6299 (when (and ;; ange-ftp has its own auto-save mechanism 6292 (when (and ;; ange-ftp has its own auto-save mechanism
@@ -6572,7 +6565,7 @@ file exists and nonzero exit status otherwise."
6572 (setq extra-args (cdr item)))) 6565 (setq extra-args (cdr item))))
6573 (when extra-args (setq shell (concat shell " " extra-args)))) 6566 (when extra-args (setq shell (concat shell " " extra-args))))
6574 (tramp-message 6567 (tramp-message
6575 vec 5 "Starting remote shell `%s' for tilde expansion..." shell) 6568 vec 5 "Starting remote shell `%s' for tilde expansion" shell)
6576 (let ((tramp-end-of-output tramp-initial-end-of-output)) 6569 (let ((tramp-end-of-output tramp-initial-end-of-output))
6577 (tramp-send-command 6570 (tramp-send-command
6578 vec 6571 vec
@@ -6580,13 +6573,12 @@ file exists and nonzero exit status otherwise."
6580 (shell-quote-argument tramp-end-of-output) shell) 6573 (shell-quote-argument tramp-end-of-output) shell)
6581 t)) 6574 t))
6582 ;; Setting prompts. 6575 ;; Setting prompts.
6583 (tramp-message vec 5 "Setting remote shell prompt...") 6576 (with-progress-reporter vec 5 (format "Setting remote shell prompt")
6584 (tramp-send-command 6577 (tramp-send-command
6585 vec (format "PS1=%s" (shell-quote-argument tramp-end-of-output)) t) 6578 vec (format "PS1=%s" (shell-quote-argument tramp-end-of-output)) t)
6586 (tramp-send-command vec "PS2=''" t) 6579 (tramp-send-command vec "PS2=''" t)
6587 (tramp-send-command vec "PS3=''" t) 6580 (tramp-send-command vec "PS3=''" t)
6588 (tramp-send-command vec "PROMPT_COMMAND=''" t) 6581 (tramp-send-command vec "PROMPT_COMMAND=''" t)))
6589 (tramp-message vec 5 "Setting remote shell prompt...done"))
6590 6582
6591 (t (tramp-message 6583 (t (tramp-message
6592 vec 5 "Remote `%s' groks tilde expansion, good" 6584 vec 5 "Remote `%s' groks tilde expansion, good"
@@ -7423,11 +7415,11 @@ connection if a previous connection has died for some reason."
7423 (tramp-get-buffer vec) 7415 (tramp-get-buffer vec)
7424 (if (zerop (length (tramp-file-name-user vec))) 7416 (if (zerop (length (tramp-file-name-user vec)))
7425 (tramp-message 7417 (tramp-message
7426 vec 3 "Opening connection for %s using %s..." 7418 vec 3 "Opening connection for %s using %s"
7427 (tramp-file-name-host vec) 7419 (tramp-file-name-host vec)
7428 (tramp-file-name-method vec)) 7420 (tramp-file-name-method vec))
7429 (tramp-message 7421 (tramp-message
7430 vec 3 "Opening connection for %s@%s using %s..." 7422 vec 3 "Opening connection for %s@%s using %s"
7431 (tramp-file-name-user vec) 7423 (tramp-file-name-user vec)
7432 (tramp-file-name-host vec) 7424 (tramp-file-name-host vec)
7433 (tramp-file-name-method vec))) 7425 (tramp-file-name-method vec)))
diff --git a/lisp/progmodes/cc-cmds.el b/lisp/progmodes/cc-cmds.el
index 56fc8032541..10267a6b2dc 100644
--- a/lisp/progmodes/cc-cmds.el
+++ b/lisp/progmodes/cc-cmds.el
@@ -1501,6 +1501,11 @@ defun."
1501 (interactive "p") 1501 (interactive "p")
1502 (or arg (setq arg 1)) 1502 (or arg (setq arg 1))
1503 1503
1504 (or (not (eq this-command 'c-beginning-of-defun))
1505 (eq last-command 'c-beginning-of-defun)
1506 (and transient-mark-mode mark-active)
1507 (push-mark))
1508
1504 (c-save-buffer-state 1509 (c-save-buffer-state
1505 (beginning-of-defun-function end-of-defun-function 1510 (beginning-of-defun-function end-of-defun-function
1506 (start (point)) 1511 (start (point))
@@ -1604,6 +1609,11 @@ the open-parenthesis that starts a defun; see `beginning-of-defun'."
1604 (interactive "p") 1609 (interactive "p")
1605 (or arg (setq arg 1)) 1610 (or arg (setq arg 1))
1606 1611
1612 (or (not (eq this-command 'c-end-of-defun))
1613 (eq last-command 'c-end-of-defun)
1614 (and transient-mark-mode mark-active)
1615 (push-mark))
1616
1607 (c-save-buffer-state 1617 (c-save-buffer-state
1608 (beginning-of-defun-function end-of-defun-function 1618 (beginning-of-defun-function end-of-defun-function
1609 (start (point)) 1619 (start (point))
diff --git a/lisp/progmodes/sh-script.el b/lisp/progmodes/sh-script.el
index 610fa14489a..eca6d5fbe7b 100644
--- a/lisp/progmodes/sh-script.el
+++ b/lisp/progmodes/sh-script.el
@@ -1480,7 +1480,7 @@ frequently editing existing scripts with different styles.")
1480;; mode-command and utility functions 1480;; mode-command and utility functions
1481 1481
1482;;;###autoload 1482;;;###autoload
1483(defun sh-mode () 1483(define-derived-mode sh-mode prog-mode "Shell-script"
1484 "Major mode for editing shell scripts. 1484 "Major mode for editing shell scripts.
1485This mode works for many shells, since they all have roughly the same syntax, 1485This mode works for many shells, since they all have roughly the same syntax,
1486as far as commands, arguments, variables, pipes, comments etc. are concerned. 1486as far as commands, arguments, variables, pipes, comments etc. are concerned.
@@ -1533,11 +1533,6 @@ indicate what shell it is use `sh-alias-alist' to translate.
1533 1533
1534If your shell gives error messages with line numbers, you can use \\[executable-interpret] 1534If your shell gives error messages with line numbers, you can use \\[executable-interpret]
1535with your script for an edit-interpret-debug cycle." 1535with your script for an edit-interpret-debug cycle."
1536 (interactive)
1537 (kill-all-local-variables)
1538 (setq major-mode 'sh-mode
1539 mode-name "Shell-script")
1540 (use-local-map sh-mode-map)
1541 (make-local-variable 'skeleton-end-hook) 1536 (make-local-variable 'skeleton-end-hook)
1542 (make-local-variable 'paragraph-start) 1537 (make-local-variable 'paragraph-start)
1543 (make-local-variable 'paragraph-separate) 1538 (make-local-variable 'paragraph-separate)
@@ -1613,8 +1608,7 @@ with your script for an edit-interpret-debug cycle."
1613 "sh") 1608 "sh")
1614 (t 1609 (t
1615 sh-shell-file)) 1610 sh-shell-file))
1616 nil nil) 1611 nil nil))
1617 (run-mode-hooks 'sh-mode-hook))
1618 1612
1619;;;###autoload 1613;;;###autoload
1620(defalias 'shell-script-mode 'sh-mode) 1614(defalias 'shell-script-mode 'sh-mode)
diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el
index c88b32f64cc..94eb721e4cf 100644
--- a/lisp/textmodes/ispell.el
+++ b/lisp/textmodes/ispell.el
@@ -2630,11 +2630,22 @@ Keeps argument list for future ispell invocations for no async support."
2630 (or ispell-local-dictionary ispell-dictionary "default")) 2630 (or ispell-local-dictionary ispell-dictionary "default"))
2631 (sit-for 0) 2631 (sit-for 0)
2632 (setq ispell-library-directory (ispell-check-version) 2632 (setq ispell-library-directory (ispell-check-version)
2633 ispell-process-directory default-directory
2634 ispell-process (ispell-start-process) 2633 ispell-process (ispell-start-process)
2635 ispell-filter nil 2634 ispell-filter nil
2636 ispell-filter-continue nil 2635 ispell-filter-continue nil)
2637 ispell-process-buffer-name (buffer-name)) 2636 ;; When spellchecking minibuffer contents, make sure ispell process
2637 ;; is not restarted every time the minibuffer is killed.
2638 (if (window-minibuffer-p)
2639 (if (fboundp 'minibuffer-selected-window)
2640 ;; Assign ispell process to parent buffer
2641 (setq ispell-process-directory default-directory
2642 ispell-process-buffer-name (window-buffer (minibuffer-selected-window)))
2643 ;; Force `ispell-process-directory' to $HOME and use a dummy name
2644 (setq ispell-process-directory (expand-file-name "~/")
2645 ispell-process-buffer-name " * Minibuffer-has-spellcheck-enabled"))
2646 ;; Not in a minibuffer
2647 (setq ispell-process-directory default-directory
2648 ispell-process-buffer-name (buffer-name)))
2638 (if ispell-async-processp 2649 (if ispell-async-processp
2639 (set-process-filter ispell-process 'ispell-filter)) 2650 (set-process-filter ispell-process 'ispell-filter))
2640 ;; protect against bogus binding of `enable-multibyte-characters' in XEmacs 2651 ;; protect against bogus binding of `enable-multibyte-characters' in XEmacs
diff --git a/lisp/textmodes/sgml-mode.el b/lisp/textmodes/sgml-mode.el
index b9d52acdeba..6cd4121bd10 100644
--- a/lisp/textmodes/sgml-mode.el
+++ b/lisp/textmodes/sgml-mode.el
@@ -101,6 +101,11 @@ This takes effect when first loading the `sgml-mode' library.")
101 (define-key map "\C-c\^?" 'sgml-delete-tag) 101 (define-key map "\C-c\^?" 'sgml-delete-tag)
102 (define-key map "\C-c?" 'sgml-tag-help) 102 (define-key map "\C-c?" 'sgml-tag-help)
103 (define-key map "\C-c/" 'sgml-close-tag) 103 (define-key map "\C-c/" 'sgml-close-tag)
104
105 ;; Redundant keybindings, for consistency with TeX mode.
106 (define-key map "\C-c\C-o" 'sgml-tag)
107 (define-key map "\C-c\C-e" 'sgml-close-tag)
108
104 (define-key map "\C-c8" 'sgml-name-8bit-mode) 109 (define-key map "\C-c8" 'sgml-name-8bit-mode)
105 (define-key map "\C-c\C-v" 'sgml-validate) 110 (define-key map "\C-c\C-v" 'sgml-validate)
106 (when sgml-quick-keys 111 (when sgml-quick-keys
diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el
index 5fc92a92d37..da0c5396f2c 100644
--- a/lisp/textmodes/tex-mode.el
+++ b/lisp/textmodes/tex-mode.el
@@ -808,6 +808,11 @@ END is the position of the first delimiter after \verb."
808 (define-key map "\C-c\C-c" 'tex-compile) 808 (define-key map "\C-c\C-c" 'tex-compile)
809 (define-key map "\C-c\C-i" 'tex-bibtex-file) 809 (define-key map "\C-c\C-i" 'tex-bibtex-file)
810 (define-key map "\C-c\C-o" 'latex-insert-block) 810 (define-key map "\C-c\C-o" 'latex-insert-block)
811
812 ;; Redundant keybindings, for consistency with SGML mode.
813 (define-key map "\C-c\C-t" 'latex-insert-block)
814 (define-key map "\C-c/" 'latex-close-block)
815
811 (define-key map "\C-c\C-e" 'latex-close-block) 816 (define-key map "\C-c\C-e" 'latex-close-block)
812 (define-key map "\C-c\C-u" 'tex-goto-last-unclosed-latex-block) 817 (define-key map "\C-c\C-u" 'tex-goto-last-unclosed-latex-block)
813 (define-key map "\C-c\C-m" 'tex-feed-input) 818 (define-key map "\C-c\C-m" 'tex-feed-input)
diff --git a/lwlib/ChangeLog b/lwlib/ChangeLog
index 8543b2336c0..dfa61888467 100644
--- a/lwlib/ChangeLog
+++ b/lwlib/ChangeLog
@@ -1,3 +1,7 @@
12010-05-13 Jan Djärv <jan.h.d@swipnet.se>
2
3 * lwlib-Xaw.c (make_dialog): Remove extra arg to XtVaGetSubresources.
4
12010-05-08 Jan Djärv <jan.h.d@swipnet.se> 52010-05-08 Jan Djärv <jan.h.d@swipnet.se>
2 6
3 * xlwmenu.c (XlwMenuDestroy): Remove XtDestroyWidget on subwidgets 7 * xlwmenu.c (XlwMenuDestroy): Remove XtDestroyWidget on subwidgets
diff --git a/lwlib/lwlib-Xaw.c b/lwlib/lwlib-Xaw.c
index d31b4602147..eaaf2b46d4e 100644
--- a/lwlib/lwlib-Xaw.c
+++ b/lwlib/lwlib-Xaw.c
@@ -664,7 +664,7 @@ make_dialog (name, parent, pop_up_p, shell_title, icon_name, text_input_slot,
664 (XtPointer)"Sans-14" }}; 664 (XtPointer)"Sans-14" }};
665 char *faceName; 665 char *faceName;
666 XtVaGetSubresources (dialog, &faceName, "Dialog", "dialog", 666 XtVaGetSubresources (dialog, &faceName, "Dialog", "dialog",
667 rec, 1, 0, NULL); 667 rec, 1, (String)NULL);
668 if (strcmp ("none", faceName) != 0) 668 if (strcmp ("none", faceName) != 0)
669 xft_font = openFont (dialog, faceName); 669 xft_font = openFont (dialog, faceName);
670 if (xft_font) 670 if (xft_font)
diff --git a/msdos/ChangeLog b/msdos/ChangeLog
index e4e77c5f101..780ec198d47 100644
--- a/msdos/ChangeLog
+++ b/msdos/ChangeLog
@@ -1,3 +1,33 @@
12010-05-14 Glenn Morris <rgm@gnu.org>
2
3 * sed1v2.inp (MSDOS_OBJ): Edit to dosfns.o msdos.o.
4 (MSDOS_SUPPORT): Edit to $(MSDOS_SUPPORT_REAL).
5 * sed1x.inp (MSDOS_X_OBJ): Edit to w16select.o termcap.o.
6
7 * sed2x.inp (HAVE_WINDOW_SYSTEM): Define.
8 * sed1x.inp (TOOLTIP_SUPPORT): Edit to ${lispsource}tooltip.elc.
9 (WINDOW_SUPPORT): Edit to $(BASE_WINDOW_SUPPORT) $(X_WINDOW_SUPPORT).
10 * sed1v2.inp (MOUSE_SUPPORT): Edit to $(REAL_MOUSE_SUPPORT).
11 (TOOLTIP_SUPPORT, WINDOW_SUPPORT): Edit to empty.
12
13 * sed1v2.inp (FONT_OBJ): Use the plain X version (no XFT, Freetype).
14
15 * sed1v2.inp (@NS_IMPL_GNUSTEP_INC@): Edit to nil.
16
172010-05-13 Glenn Morris <rgm@gnu.org>
18
19 * sed1x.inp (OLDXMENU): Edit to ${oldXMenudir}libXMenu11.a.
20 (LIBXMENU): Edit to ${OLDXMENU}.
21 (LIBX_OTHER): Edit to ${LIBXT} ${LIBX_EXTRA}.
22
23 * sed1v2.inp (C_SWITCH_X_SYSTEM, C_SWITCH_X_SITE, LIB_STANDARD)
24 (FONTCONFIG_CFLAGS, FONTCONFIG_LIBS, FREETYPE_CFLAGS, FREETYPE_LIBS)
25 (LIBOTF_CFLAGS, LIBOTF_LIBS, M17N_FLT_CFLAGS, M17N_FLT_LIBS)
26 (GNU_OBJC_CFLAGS, GNUSTEP_SYSTEM_LIBRARIES, LIBRESOLV, LIBGPM):
27 Edit to empty,
28 (LIB_MATH): Edit to -lm.
29 (UNEXEC_OBJ): Edit to unexec.o.
30
12010-05-12 Glenn Morris <rgm@gnu.org> 312010-05-12 Glenn Morris <rgm@gnu.org>
2 32
3 * sed3v2.inp (INSTALLABLES): No more @LIB_SRC_EXTRA_INSTALLABLES@. 33 * sed3v2.inp (INSTALLABLES): No more @LIB_SRC_EXTRA_INSTALLABLES@.
diff --git a/msdos/sed1v2.inp b/msdos/sed1v2.inp
index f0e057c6b28..5ebaba06f60 100644
--- a/msdos/sed1v2.inp
+++ b/msdos/sed1v2.inp
@@ -38,13 +38,15 @@ s/\.h\.in/.h-in/
38/^CPPFLAGS *=/s/@[^@\n]*@// 38/^CPPFLAGS *=/s/@[^@\n]*@//
39/^LDFLAGS *=/s/@[^@\n]*@// 39/^LDFLAGS *=/s/@[^@\n]*@//
40/^LIBS *=/s/@[^@\n]*@// 40/^LIBS *=/s/@[^@\n]*@//
41s/@LIB_MATH@/-lm/
42/^LIBES *=/,/^ *$/ { 41/^LIBES *=/,/^ *$/ {
43 s/@[^@\n]*@//g 42 s/@[^@\n]*@//g
44} 43}
45/^LIBOBJS *=/s/@[^@\n]*@/getloadavg.o/ 44/^LIBOBJS *=/s/@[^@\n]*@/getloadavg.o/
46/^C_SWITCH_MACHINE *=/s/@C_SWITCH_MACHINE@// 45/^C_SWITCH_MACHINE *=/s/@C_SWITCH_MACHINE@//
47/^C_SWITCH_SYSTEM *=/s/@C_SWITCH_SYSTEM@// 46/^C_SWITCH_SYSTEM *=/s/@C_SWITCH_SYSTEM@//
47/^C_SWITCH_X_SYSTEM *=/s/@C_SWITCH_X_SYSTEM@//
48/^C_SWITCH_X_SITE *=/s/@C_SWITCH_X_SITE@//
49#/^LD_SWITCH_X_SITE *=/s/@LD_SWITCH_X_SITE@//
48/^LD_SWITCH_SYSTEM_TEMACS *=/s/@LD_SWITCH_SYSTEM_TEMACS@// 50/^LD_SWITCH_SYSTEM_TEMACS *=/s/@LD_SWITCH_SYSTEM_TEMACS@//
49/^LD_SWITCH_X_SITE_AUX *=/s/@LD_SWITCH_X_SITE_AUX@// 51/^LD_SWITCH_X_SITE_AUX *=/s/@LD_SWITCH_X_SITE_AUX@//
50/^LD_SWITCH_X_SITE_AUX_RPATH *=/s/@LD_SWITCH_X_SITE_AUX_RPATH@// 52/^LD_SWITCH_X_SITE_AUX_RPATH *=/s/@LD_SWITCH_X_SITE_AUX_RPATH@//
@@ -52,12 +54,22 @@ s/@LIB_MATH@/-lm/
52/^LD_SWITCH_SYSTEM_EXTRA *=/s/@LD_SWITCH_SYSTEM_EXTRA@// 54/^LD_SWITCH_SYSTEM_EXTRA *=/s/@LD_SWITCH_SYSTEM_EXTRA@//
53/^LIBS_SYSTEM *=/s/@LIBS_SYSTEM@// 55/^LIBS_SYSTEM *=/s/@LIBS_SYSTEM@//
54/^LIB_GCC *=/s/@LIB_GCC@/-Lgcc/ 56/^LIB_GCC *=/s/@LIB_GCC@/-Lgcc/
57/^LIB_STANDARD *=/s/@LIB_STANDARD@//
58/^LIB_MATH *=/s/@LIB_MATH@/-lm/
55/^LIBTIFF *=/s/@LIBTIFF@// 59/^LIBTIFF *=/s/@LIBTIFF@//
56/^LIBJPEG *=/s/@LIBJPEG@// 60/^LIBJPEG *=/s/@LIBJPEG@//
57/^LIBPNG *=/s/@LIBPNG@// 61/^LIBPNG *=/s/@LIBPNG@//
58/^LIBGIF *=/s/@LIBGIF@// 62/^LIBGIF *=/s/@LIBGIF@//
59/^LIBXPM *=/s/@LIBXPM@// 63/^LIBXPM *=/s/@LIBXPM@//
60/^XFT_LIBS *=/s/@XFT_LIBS@// 64/^XFT_LIBS *=/s/@XFT_LIBS@//
65/^FONTCONFIG_CFLAGS *=/s/@FONTCONFIG_CFLAGS@//
66/^FONTCONFIG_LIBS *=/s/@FONTCONFIG_LIBS@//
67/^FREETYPE_CFLAGS *=/s/@FREETYPE_CFLAGS@//
68/^FREETYPE_LIBS *=/s/@FREETYPE_LIBS@//
69/^LIBOTF_CFLAGS *=/s/@LIBOTF_CFLAGS@//
70/^LIBOTF_LIBS *=/s/@LIBOTF_LIBS@//
71/^M17N_FLT_CFLAGS *=/s/@M17N_FLT_CFLAGS@//
72/^M17N_FLT_LIBS *=/s/@M17N_FLT_LIBS@//
61/^DBUS_CFLAGS *=/s/@DBUS_CFLAGS@// 73/^DBUS_CFLAGS *=/s/@DBUS_CFLAGS@//
62/^DBUS_LIBS *=/s/@DBUS_LIBS@// 74/^DBUS_LIBS *=/s/@DBUS_LIBS@//
63/^DBUS_OBJ *=/s/@DBUS_OBJ@// 75/^DBUS_OBJ *=/s/@DBUS_OBJ@//
@@ -77,22 +89,32 @@ s/@LIB_MATH@/-lm/
77/^RSVG_CFLAGS *=/s/@RSVG_CFLAGS@// 89/^RSVG_CFLAGS *=/s/@RSVG_CFLAGS@//
78/^WIDGET_OBJ *=/s/@WIDGET_OBJ@// 90/^WIDGET_OBJ *=/s/@WIDGET_OBJ@//
79/^CYGWIN_OBJ *=/s/@CYGWIN_OBJ@// 91/^CYGWIN_OBJ *=/s/@CYGWIN_OBJ@//
92/^MSDOS_OBJ *=/s/= */= dosfns.o msdos.o/
93/^MSDOS_SUPPORT *=/s/= */= $(MSDOS_SUPPORT_REAL)/
80/^NS_OBJ *=/s/@NS_OBJ@// 94/^NS_OBJ *=/s/@NS_OBJ@//
81/^NS_SUPPORT *=/s/@NS_SUPPORT@// 95/^NS_SUPPORT *=/s/@NS_SUPPORT@//
96/^GNU_OBJC_CFLAGS*=/s/@GNU_OBJC_CFLAGS@//
97/^GNUSTEP_SYSTEM_LIBRARIES *=/s/@GNUSTEP_SYSTEM_LIBRARIES@//
98/^LIBRESOLV *=/s/@LIBRESOLV@//
82/^LIBSELINUX_LIBS *=/s/@LIBSELINUX_LIBS@// 99/^LIBSELINUX_LIBS *=/s/@LIBSELINUX_LIBS@//
83/^GETLOADAVG_LIBS *=/s/@[^@\n]*@// 100/^GETLOADAVG_LIBS *=/s/@[^@\n]*@//
84/^START_FILES *=/s/@START_FILES@// 101/^START_FILES *=/s/@START_FILES@//
85/^OTHER_FILES *=/s/@OTHER_FILES@// 102/^OTHER_FILES *=/s/@OTHER_FILES@//
86/^XMENU_OBJ *=/s/@XMENU_OBJ@/xmenu.o/ 103/^XMENU_OBJ *=/s/@XMENU_OBJ@/xmenu.o/
87/^FONT_OBJ *=/s/@FONT_OBJ@/xfont.o ftfont.o xftfont.o ftxfont.o/ 104/^FONT_OBJ *=/s/@FONT_OBJ@/xfont.o/
105/^MOUSE_SUPPORT *=/s/@MOUSE_SUPPORT@/$(REAL_MOUSE_SUPPORT)/
106/^TOOLTIP_SUPPORT *=/s/@TOOLTIP_SUPPORT@//
107/^WINDOW_SUPPORT *=/s/@WINDOW_SUPPORT@//
108/^LIBGPM *=/s/@LIBGPM@//
88/^EXEEXT *=/s/@EXEEXT@/.exe/ 109/^EXEEXT *=/s/@EXEEXT@/.exe/
89/^PRE_ALLOC_OBJ *=/s/@PRE_ALLOC_OBJ@/lastfile.o/ 110/^PRE_ALLOC_OBJ *=/s/@PRE_ALLOC_OBJ@/lastfile.o/
90/^POST_ALLOC_OBJ *=/s/@POST_ALLOC_OBJ@/$(vmlimitobj)/ 111/^POST_ALLOC_OBJ *=/s/@POST_ALLOC_OBJ@/$(vmlimitobj)/
91s/@unexec@/unexec.o/g 112/^UNEXEC_OBJ *=/s/@unexec@/unexec.o/
92/^version *=/s/@[^@\n]*@// 113/^version *=/s/@[^@\n]*@//
93/^M_FILE *=/s!@[^@\n]*@!m/intel386.h! 114/^M_FILE *=/s!@[^@\n]*@!m/intel386.h!
94/^S_FILE *=/s!@[^@\n]*@!s/msdos.h! 115/^S_FILE *=/s!@[^@\n]*@!s/msdos.h!
95/^@SET_MAKE@$/s/@SET_MAKE@// 116/^@SET_MAKE@$/s/@SET_MAKE@//
117/^@NS_IMPL_GNUSTEP_INC@/s/@NS_IMPL_GNUSTEP_INC@//
96/^.\${libsrc}make-docfile.*>/s!make-docfile!make-docfile -o ../etc/DOC! 118/^.\${libsrc}make-docfile.*>/s!make-docfile!make-docfile -o ../etc/DOC!
97/^.\${libsrc}make-doc/s!>.*$!! 119/^.\${libsrc}make-doc/s!>.*$!!
98/^[ ]*$/d 120/^[ ]*$/d
diff --git a/msdos/sed1x.inp b/msdos/sed1x.inp
index 8be94aafa03..bcdb0fec0ed 100644
--- a/msdos/sed1x.inp
+++ b/msdos/sed1x.inp
@@ -4,8 +4,13 @@
4s!^ cd \${oldXMenudir}; \${MAKE}.*$! ${MAKE} -C ${oldXMenudir}.! 4s!^ cd \${oldXMenudir}; \${MAKE}.*$! ${MAKE} -C ${oldXMenudir}.!
5s!^ @true *$! @rem! 5s!^ @true *$! @rem!
6s/DOC/DOC-X/g 6s/DOC/DOC-X/g
7#/^LIBXMENU *=/s!= *!= ../oldxmenu/! 7/^OLDXMENU *=/s!@OLDXMENU@!${oldXMenudir}libXMenu11.a!
8/^LIBXMENU *=/s!@LIBXMENU@!${OLDXMENU}!
9/^LIBX_OTHER *=/s!@LIBX_OTHER@!${LIBXT} ${LIBX_EXTRA}!
8/^LIBS_SYSTEM *=/s!= *!= -lxext -lsys! 10/^LIBS_SYSTEM *=/s!= *!= -lxext -lsys!
11/^MSDOS_X_OBJ *=/s!= *!= w16select.o termcap.o!
12/^TOOLTIP_SUPPORT *=/s!= *!= ${lispsource}tooltip.elc!
13/^WINDOW_SUPPORT *=/s!= *!= $(BASE_WINDOW_SUPPORT) $(X_WINDOW_SUPPORT)!
9/^temacs *:/s!OLDXMENU!LIBXMENU! 14/^temacs *:/s!OLDXMENU!LIBXMENU!
10 15
11# arch-tag: 3e8a78f2-3dec-44f3-81f6-3785a562da19 16# arch-tag: 3e8a78f2-3dec-44f3-81f6-3785a562da19
diff --git a/msdos/sed2x.inp b/msdos/sed2x.inp
index 64d138e1b09..d17dd85ace6 100644
--- a/msdos/sed2x.inp
+++ b/msdos/sed2x.inp
@@ -2,8 +2,8 @@
2# Extra configuration script for src/config.h for DesqView/X 2# Extra configuration script for src/config.h for DesqView/X
3# ---------------------------------------------------------------------- 3# ----------------------------------------------------------------------
4# 4#
5# Copyright (C) 1994, 2001, 2002, 2003, 2004, 2005, 5# Copyright (C) 1994, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008,
6# 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc. 6# 2009, 2010 Free Software Foundation, Inc.
7# 7#
8# This file is part of GNU Emacs. 8# This file is part of GNU Emacs.
9# 9#
@@ -17,6 +17,7 @@
17# 17#
18# ---------------------------------------------------------------------- 18# ----------------------------------------------------------------------
19/^#undef HAVE_X_WINDOWS *$/s/undef/define/ 19/^#undef HAVE_X_WINDOWS *$/s/undef/define/
20/^#undef HAVE_WINDOW_SYSTEM *$/s/undef/define/
20/^#undef HAVE_X11 *$/s/undef/define/ 21/^#undef HAVE_X11 *$/s/undef/define/
21/^#undef HAVE_X_MENU *$/s/undef/define/ 22/^#undef HAVE_X_MENU *$/s/undef/define/
22/^#undef HAVE_XSCREENNUMBEROFSCREEN *$/s/undef/define/ 23/^#undef HAVE_XSCREENNUMBEROFSCREEN *$/s/undef/define/
diff --git a/nt/ChangeLog b/nt/ChangeLog
index 3be9a7f61d4..6db0eb744c9 100644
--- a/nt/ChangeLog
+++ b/nt/ChangeLog
@@ -1,3 +1,7 @@
12010-05-13 Glenn Morris <rgm@gnu.org>
2
3 * config.nt (LD_SWITCH_X_SITE, C_SWITCH_X_SITE): Remove undefs.
4
12010-05-07 Chong Yidong <cyd@stupidchicken.com> 52010-05-07 Chong Yidong <cyd@stupidchicken.com>
2 6
3 * Version 23.2 released. 7 * Version 23.2 released.
diff --git a/nt/config.nt b/nt/config.nt
index 9e223573ea3..7ec98fb7666 100644
--- a/nt/config.nt
+++ b/nt/config.nt
@@ -1,6 +1,7 @@
1/* GNU Emacs site configuration template file. -*- C -*- 1/* GNU Emacs site configuration template file. -*- C -*-
2 Copyright (C) 1988, 1993, 1994, 2001, 2002, 2003, 2004, 2005, 2006, 2
3 2007, 2008, 2009, 2010 Free Software Foundation, Inc. 3Copyright (C) 1988, 1993, 1994, 2001, 2002, 2003, 2004, 2005, 2006,
4 2007, 2008, 2009, 2010 Free Software Foundation, Inc.
4 5
5This file is part of GNU Emacs. 6This file is part of GNU Emacs.
6 7
@@ -318,20 +319,6 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
318 319
319#define subprocesses 320#define subprocesses
320 321
321/* Define LD_SWITCH_X_SITE to contain any special flags your loader
322 may need to deal with X Windows. For instance, if you've defined
323 HAVE_X_WINDOWS above and your X libraries aren't in a place that
324 your loader can find on its own, you might want to add "-L/..." or
325 something similar. */
326#undef LD_SWITCH_X_SITE
327
328/* Define C_SWITCH_X_SITE to contain any special flags your compiler
329 may need to deal with X Windows. For instance, if you've defined
330 HAVE_X_WINDOWS above and your X include files aren't in a place
331 that your compiler can find on its own, you might want to add
332 "-I/..." or something similar. */
333#undef C_SWITCH_X_SITE
334
335/* Define STACK_DIRECTION here, but not if m/foo.h did. */ 322/* Define STACK_DIRECTION here, but not if m/foo.h did. */
336#ifndef STACK_DIRECTION 323#ifndef STACK_DIRECTION
337#undef STACK_DIRECTION 324#undef STACK_DIRECTION
diff --git a/src/ChangeLog b/src/ChangeLog
index f759d0cebcd..7ffb5800753 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -3,6 +3,54 @@
3 * font.c (font_range): Return the range for the font found at 3 * font.c (font_range): Return the range for the font found at
4 first. 4 first.
5 5
62010-05-14 Glenn Morris <rgm@gnu.org>
7
8 * Makefile.in (mktime, X11, register): Move undefs to configure.
9
10 * Makefile.in (MSDOS_OBJ): Default to empty, let msdos scripts set it.
11 (MSDOS_X_OBJ): New variable.
12 (MSDOS_SUPPORT_REAL): New constant.
13 (MSDOS_SUPPORT): Set as a variable, not with cpp.
14 (obj): Use MSDOS_X_OBJ.
15 (lisp): Use MSDOS_SUPPORT as a variable.
16
17 * Makefile.in (REAL_MOUSE_SUPPORT): New constant.
18 (GPM_MOUSE_SUPPORT): Now it's a constant.
19 (MOUSE_SUPPORT, TOOLTIP_SUPPORT, WINDOW_SUPPORT): Set with configure,
20 not cpp.
21
22 * Makefile.in (@NS_IMPL_GNUSTEP_INC@): Use in place of #ifdef.
23 (ns_appresdir): Remove, unused.
24
25 * Makefile.in (SHELL): Move outside cpp section.
26
27 * s/netbsd.h (AMPERSAND_FULL_NAME): Remove (defined in AH_BOTTOM).
28
292010-05-13 Glenn Morris <rgm@gnu.org>
30
31 * Makefile.in (FONT_DRIVERS): Place with other HAVE_X_WINDOWS stuff.
32 (TOOLTIP_SUPPORT): Place with other HAVE_WINDOW_SYSTEM stuff.
33
34 * Makefile.in (FONT_DRIVERS): If HAVE_X_WINDOWS is defined,
35 HAVE_WINDOW_SYSTEM must be too.
36
37 * Makefile.in (WINNT_SUPPORT): Remove, nt build does not use this file.
38 (lisp): Remove WINNT_SUPPORT.
39
40 * Makefile.in (OLDXMENU, LIBXMENU) [!HAVE_MENUS]:
41 Let configure set these variables (to empty) in this case as well.
42
43 * Makefile.in (LD_SWITCH_X_SITE): Define as a variable, not via cpp.
44 (LIBX_BASE): Use $LD_SWITCH_X_SITE.
45
46 * Makefile.in (C_SWITCH_X_SYSTEM, C_SWITCH_X_SITE, LIB_STANDARD)
47 (LIB_MATH, FONTCONFIG_CFLAGS, FONTCONFIG_LIBS, FREETYPE_CFLAGS)
48 (FREETYPE_LIBS, LIBOTF_CFLAGS, LIBOTF_LIBS, M17N_FLT_CFLAGS)
49 (M17N_FLT_LIBS, GNU_OBJC_CFLAGS, GNUSTEP_SYSTEM_LIBRARIES, LIBGPM)
50 (LIBRESOLV, UNEXEC_OBJ): For clarity, define variables to hold
51 the values output by configure.
52 (ALL_CFLAGS, obj, LIBES, temacs${EXEEXT}): Use the above variables.
53
62010-05-12 Glenn Morris <rgm@gnu.org> 542010-05-12 Glenn Morris <rgm@gnu.org>
7 55
8 * Makefile.in (YMF_PASS_LDFLAGS, LD, LINKER): Simplify the logic. 56 * Makefile.in (YMF_PASS_LDFLAGS, LD, LINKER): Simplify the logic.
diff --git a/src/Makefile.in b/src/Makefile.in
index 46d4e0c2878..3a0339a3f70 100644
--- a/src/Makefile.in
+++ b/src/Makefile.in
@@ -30,6 +30,7 @@
30# Some of the conditionals might be dead now. Finding them and 30# Some of the conditionals might be dead now. Finding them and
31# deleting them would be fine. 31# deleting them would be fine.
32 32
33SHELL = /bin/sh
33 34
34# Here are the things that we expect ../configure to edit. 35# Here are the things that we expect ../configure to edit.
35# We use $(srcdir) explicitly in dependencies so as not to depend on VPATH. 36# We use $(srcdir) explicitly in dependencies so as not to depend on VPATH.
@@ -72,19 +73,44 @@ CRT_DIR=@CRT_DIR@
72C_SWITCH_MACHINE=@C_SWITCH_MACHINE@ 73C_SWITCH_MACHINE=@C_SWITCH_MACHINE@
73## System-specific CFLAGS. 74## System-specific CFLAGS.
74C_SWITCH_SYSTEM=@C_SWITCH_SYSTEM@ 75C_SWITCH_SYSTEM=@C_SWITCH_SYSTEM@
76
77## Currently only set if NS_IMPL_GNUSTEP.
78## C_SWITCH_X_SITE may override this.
79C_SWITCH_X_SYSTEM=@C_SWITCH_X_SYSTEM@
80
81## Define C_SWITCH_X_SITE to contain any special flags your compiler
82## may need to deal with X Windows. For instance, if you've defined
83## HAVE_X_WINDOWS and your X include files aren't in a place that your
84## compiler can find on its own, you might want to add "-I/..." or
85## something similar. This is normally set by configure.
86## This is used before C_SWITCH_X_SYSTEM and may override it.
87C_SWITCH_X_SITE=@C_SWITCH_X_SITE@
88
89## Define LD_SWITCH_X_SITE to contain any special flags your loader
90## may need to deal with X Windows. For instance, if your X libraries
91## aren't in a place that your loader can find on its own, you might
92## want to add "-L/..." or something similar. Only used if
93## HAVE_X_WINDOWS.
94## FIXME? configure sets a value for this, but it has never been
95## substituted in this or any other Makefile. Cf C_SWITCH_X_SITE.
96LD_SWITCH_X_SITE=
97
75## This holds any special options for linking temacs only (ie, not 98## This holds any special options for linking temacs only (ie, not
76## used by configure). Not used elsewhere because it sometimes 99## used by configure). Not used elsewhere because it sometimes
77## contains options that have to do with using Emacs's crt0, 100## contains options that have to do with using Emacs's crt0,
78## which are only good with temacs. 101## which are only good with temacs.
79LD_SWITCH_SYSTEM_TEMACS=@LD_SWITCH_SYSTEM_TEMACS@ 102LD_SWITCH_SYSTEM_TEMACS=@LD_SWITCH_SYSTEM_TEMACS@
103
80## Next two must come before LD_SWITCH_SYSTEM. 104## Next two must come before LD_SWITCH_SYSTEM.
81## If needed, a -R option that says where to find X windows at run time. 105## If needed, a -R option that says where to find X windows at run time.
82LD_SWITCH_X_SITE_AUX=@LD_SWITCH_X_SITE_AUX@ 106LD_SWITCH_X_SITE_AUX=@LD_SWITCH_X_SITE_AUX@
83## As above, but using -rpath instead. 107## As above, but using -rpath instead.
84LD_SWITCH_X_SITE_AUX_RPATH=@LD_SWITCH_X_SITE_AUX_RPATH@ 108LD_SWITCH_X_SITE_AUX_RPATH=@LD_SWITCH_X_SITE_AUX_RPATH@
109
85## System-specific LDFLAGS. 110## System-specific LDFLAGS.
86LD_SWITCH_SYSTEM=@LD_SWITCH_SYSTEM@ 111LD_SWITCH_SYSTEM=@LD_SWITCH_SYSTEM@
87LD_SWITCH_SYSTEM_EXTRA=@LD_SWITCH_SYSTEM_EXTRA@ 112LD_SWITCH_SYSTEM_EXTRA=@LD_SWITCH_SYSTEM_EXTRA@
113
88## Flags to pass to ld only for temacs. 114## Flags to pass to ld only for temacs.
89TEMACS_LDFLAGS = $(LD_SWITCH_SYSTEM) $(LD_SWITCH_SYSTEM_EXTRA) $(LD_SWITCH_SYSTEM_TEMACS) 115TEMACS_LDFLAGS = $(LD_SWITCH_SYSTEM) $(LD_SWITCH_SYSTEM_EXTRA) $(LD_SWITCH_SYSTEM_TEMACS)
90 116
@@ -94,6 +120,12 @@ LIBS_SYSTEM=@LIBS_SYSTEM@
94## Where to find libgcc.a, if using gcc and necessary. 120## Where to find libgcc.a, if using gcc and necessary.
95LIB_GCC=@LIB_GCC@ 121LIB_GCC=@LIB_GCC@
96 122
123## May use $CRT_DIR.
124LIB_STANDARD=@LIB_STANDARD@
125
126## -lm, or empty.
127LIB_MATH=@LIB_MATH@
128
97LIBTIFF=@LIBTIFF@ 129LIBTIFF=@LIBTIFF@
98LIBJPEG=@LIBJPEG@ 130LIBJPEG=@LIBJPEG@
99LIBPNG=@LIBPNG@ 131LIBPNG=@LIBPNG@
@@ -102,6 +134,15 @@ LIBXPM=@LIBXPM@
102XFT_LIBS=@XFT_LIBS@ 134XFT_LIBS=@XFT_LIBS@
103LIBX_EXTRA=$(LIBTIFF) $(LIBJPEG) $(LIBPNG) $(LIBGIF) $(LIBXPM) -lX11 $(XFT_LIBS) 135LIBX_EXTRA=$(LIBTIFF) $(LIBJPEG) $(LIBPNG) $(LIBGIF) $(LIBXPM) -lX11 $(XFT_LIBS)
104 136
137FONTCONFIG_CFLAGS = @FONTCONFIG_CFLAGS@
138FONTCONFIG_LIBS = @FONTCONFIG_LIBS@
139FREETYPE_CFLAGS = @FREETYPE_CFLAGS@
140FREETYPE_LIBS = @FREETYPE_LIBS@
141LIBOTF_CFLAGS = @LIBOTF_CFLAGS@
142LIBOTF_LIBS = @LIBOTF_LIBS@
143M17N_FLT_CFLAGS = @M17N_FLT_CFLAGS@
144M17N_FLT_LIBS = @M17N_FLT_LIBS@
145
105DBUS_CFLAGS = @DBUS_CFLAGS@ 146DBUS_CFLAGS = @DBUS_CFLAGS@
106DBUS_LIBS = @DBUS_LIBS@ 147DBUS_LIBS = @DBUS_LIBS@
107DBUS_OBJ = @DBUS_OBJ@ 148DBUS_OBJ = @DBUS_OBJ@
@@ -143,15 +184,36 @@ WIDGET_OBJ=@WIDGET_OBJ@
143## sheap.o if CYGWIN, otherwise empty. 184## sheap.o if CYGWIN, otherwise empty.
144CYGWIN_OBJ=@CYGWIN_OBJ@ 185CYGWIN_OBJ=@CYGWIN_OBJ@
145 186
187## dosfns.o msdos.o if MSDOS.
188MSDOS_OBJ =
189## w16select.o termcap.o if MSDOS && HAVE_X_WINDOWS.
190MSDOS_X_OBJ =
191MSDOS_SUPPORT_REAL = ${lispsource}ls-lisp.elc ${lispsource}disp-table.elc \
192 ${lispsource}dos-fns.elc ${lispsource}dos-w32.elc ${lispsource}dos-vars.elc \
193 ${lispsource}term/internal.elc ${lispsource}term/pc-win.elc
194## $MSDOS_SUPPORT_REAL if MSDOS.
195MSDOS_SUPPORT =
196
146NS_OBJ=@NS_OBJ@ 197NS_OBJ=@NS_OBJ@
147NS_SUPPORT=@NS_SUPPORT@ 198NS_SUPPORT=@NS_SUPPORT@
199## Next two only set if NS_IMPL_GNUSTEP.
200GNU_OBJC_CFLAGS=@GNU_OBJC_CFLAGS@
201GNUSTEP_SYSTEM_LIBRARIES=@GNUSTEP_SYSTEM_LIBRARIES@
148 202
149## Only used if HAVE_X_WINDOWS and HAVE_WINDOW_SYSTEM. 203## Only used if HAVE_X_WINDOWS.
150FONT_OBJ=@FONT_OBJ@ 204FONT_OBJ=@FONT_OBJ@
151 205
152## ${lispsource}mouse.elc if HAVE_GPM, otherwise empty. 206## Used if HAVE_MOUSE.
153## Not used if HAVE_MOUSE. 207REAL_MOUSE_SUPPORT=${lispsource}mouse.elc ${lispsource}select.elc \
154GPM_MOUSE_SUPPORT=@GPM_MOUSE_SUPPORT@ 208 ${lispsource}scroll-bar.elc
209## Used if HAVE_GPM && !HAVE_MOUSE
210GPM_MOUSE_SUPPORT=${lispsource}mouse.elc
211LIBGPM = @LIBGPM@
212## Either of the two preceding options, or empty.
213MOUSE_SUPPORT=@MOUSE_SUPPORT@
214
215## ${lispsource}tooltip.elc if HAVE_WINDOW_SYSTEM, else empty.
216TOOLTIP_SUPPORT=@TOOLTIP_SUPPORT@
155 217
156BASE_WINDOW_SUPPORT=${lispsource}fringe.elc ${lispsource}image.elc \ 218BASE_WINDOW_SUPPORT=${lispsource}fringe.elc ${lispsource}image.elc \
157 ${lispsource}international/fontset.elc ${lispsource}dnd.elc \ 219 ${lispsource}international/fontset.elc ${lispsource}dnd.elc \
@@ -160,6 +222,13 @@ BASE_WINDOW_SUPPORT=${lispsource}fringe.elc ${lispsource}image.elc \
160X_WINDOW_SUPPORT=${lispsource}x-dnd.elc ${lispsource}term/common-win.elc \ 222X_WINDOW_SUPPORT=${lispsource}x-dnd.elc ${lispsource}term/common-win.elc \
161 ${lispsource}term/x-win.elc ${lispsource}dynamic-setting.elc 223 ${lispsource}term/x-win.elc ${lispsource}dynamic-setting.elc
162 224
225## If HAVE_X_WINDOWS, both the above
226## else if HAVE_WINDOW_SYSTEM (ie, HAVE_NS) just the former; else empty.
227WINDOW_SUPPORT=@WINDOW_SUPPORT@
228
229## -lresolv, or empty.
230LIBRESOLV = @LIBRESOLV@
231
163LIBSELINUX_LIBS = @LIBSELINUX_LIBS@ 232LIBSELINUX_LIBS = @LIBSELINUX_LIBS@
164 233
165INTERVALS_H = dispextern.h intervals.h composite.h 234INTERVALS_H = dispextern.h intervals.h composite.h
@@ -170,12 +239,11 @@ RUN_TEMACS = `/bin/pwd`/temacs
170 239
171START_FILES = @START_FILES@ 240START_FILES = @START_FILES@
172 241
242UNEXEC_OBJ = @unexec@
243
173# ========================== start of cpp stuff ======================= 244# ========================== start of cpp stuff =======================
174/* From here on, comments must be done in C syntax. */ 245/* From here on, comments must be done in C syntax. */
175 246
176/* just to be sure the sh is used */
177SHELL=/bin/sh
178
179#define NOT_C_CODE 247#define NOT_C_CODE
180#include "config.h" 248#include "config.h"
181 249
@@ -183,42 +251,13 @@ SHELL=/bin/sh
183DEPFLAGS = -MMD -MF deps/$*.d 251DEPFLAGS = -MMD -MF deps/$*.d
184#endif 252#endif
185 253
186/* Do not let the file name mktime.c get messed up. */ 254/* If NS_IMPL_GNUSTEP, some definitions and includes are expanded here. */
187#ifdef mktime 255@NS_IMPL_GNUSTEP_INC@
188#undef mktime
189#endif
190
191/* Use HAVE_X11 as an alias for X11 in this file
192 to avoid problems with X11 as a subdirectory name
193 in -I and other such options which pass through this file. */
194
195#ifdef X11
196#define HAVE_X11
197#undef X11
198#endif
199
200/* On some machines #define register is done in config;
201 do not let it interfere with this file. */
202#undef register
203
204/* This macro is for switches specifically related to X Windows. */
205#ifndef LD_SWITCH_X_SITE
206#define LD_SWITCH_X_SITE
207#endif
208
209#ifdef NS_IMPL_GNUSTEP
210/* Pull in stuff from GNUstep-make. */
211FOUNDATION_LIB=gnu
212GUI_LIB=gnu
213include @GNUSTEP_MAKEFILES@/Additional/base.make
214include @GNUSTEP_MAKEFILES@/Additional/gui.make
215shared=no
216#endif
217 256
218/* DO NOT use -R. There is a special hack described in lastfile.c 257/* DO NOT use -R. There is a special hack described in lastfile.c
219 which is used instead. Some initialized data areas are modified 258 which is used instead. Some initialized data areas are modified
220 at initial startup, then labeled as part of the text area when 259 at initial startup, then labeled as part of the text area when
221 Emacs is dumped for the first time, and never changed again. */ 260 Emacs is dumped for the first time, and never changed again. */
222 261
223/* -Demacs is needed to make some files produce the correct version 262/* -Demacs is needed to make some files produce the correct version
224 for use in Emacs. 263 for use in Emacs.
@@ -227,10 +266,10 @@ shared=no
227 the information in ``config.h''. */ 266 the information in ``config.h''. */
228 267
229/* C_SWITCH_X_SITE must come before C_SWITCH_X_SYSTEM 268/* C_SWITCH_X_SITE must come before C_SWITCH_X_SYSTEM
230 since it may have -I options that should override those two. */ 269 since it may have -I options that should override those. */
231/* MYCPPFLAGS only referenced in etc/DEBUG. */ 270/* MYCPPFLAGS only referenced in etc/DEBUG. */
232ALL_CFLAGS=-Demacs -DHAVE_CONFIG_H $(MYCPPFLAGS) -I. -I${srcdir} ${C_SWITCH_MACHINE} ${C_SWITCH_SYSTEM} @C_SWITCH_X_SITE@ @C_SWITCH_X_SYSTEM@ ${CFLAGS_SOUND} ${RSVG_CFLAGS} ${DBUS_CFLAGS} ${GCONF_CFLAGS} ${CFLAGS} @FREETYPE_CFLAGS@ @FONTCONFIG_CFLAGS@ @LIBOTF_CFLAGS@ @M17N_FLT_CFLAGS@ ${DEPFLAGS} 271ALL_CFLAGS=-Demacs -DHAVE_CONFIG_H $(MYCPPFLAGS) -I. -I${srcdir} ${C_SWITCH_MACHINE} ${C_SWITCH_SYSTEM} ${C_SWITCH_X_SITE} ${C_SWITCH_X_SYSTEM} ${CFLAGS_SOUND} ${RSVG_CFLAGS} ${DBUS_CFLAGS} ${GCONF_CFLAGS} ${CFLAGS} ${FREETYPE_CFLAGS} ${FONTCONFIG_CFLAGS} ${LIBOTF_CFLAGS} ${M17N_FLT_CFLAGS} ${DEPFLAGS}
233ALL_OBJC_CFLAGS=$(ALL_CFLAGS) @GNU_OBJC_CFLAGS@ 272ALL_OBJC_CFLAGS=$(ALL_CFLAGS) $(GNU_OBJC_CFLAGS)
234 273
235.SUFFIXES: .m 274.SUFFIXES: .m
236.c.o: 275.c.o:
@@ -245,20 +284,13 @@ ALL_OBJC_CFLAGS=$(ALL_CFLAGS) @GNU_OBJC_CFLAGS@
245 $(CC) -c $(CPPFLAGS) $(ALL_OBJC_CFLAGS) $< 284 $(CC) -c $(CPPFLAGS) $(ALL_OBJC_CFLAGS) $<
246 285
247#ifdef HAVE_X_WINDOWS 286#ifdef HAVE_X_WINDOWS
248/* This test needs to say in cpp for the time being, since s/msdos.h
249 defines HAVE_MENUS, and does not use the configure script. */
250#ifdef HAVE_MENUS
251OLDXMENU=@OLDXMENU@ 287OLDXMENU=@OLDXMENU@
252LIBXMENU=@LIBXMENU@ 288LIBXMENU=@LIBXMENU@
253#else /* not HAVE_MENUS */
254OLDXMENU=
255LIBXMENU=
256#endif /* not HAVE_MENUS */
257
258LIBXT=$(TOOLKIT_LIBW) $(LIBXT_OTHER) 289LIBXT=$(TOOLKIT_LIBW) $(LIBXT_OTHER)
259LIBX_BASE=$(LIBXMENU) LD_SWITCH_X_SITE 290LIBX_BASE=$(LIBXMENU) $(LD_SWITCH_X_SITE)
260LIBX_OTHER=@LIBX_OTHER@ 291LIBX_OTHER=@LIBX_OTHER@
261#endif /* not HAVE_X_WINDOWS */ 292FONT_DRIVERS=$(FONT_OBJ)
293#endif /* HAVE_X_WINDOWS */
262 294
263 295
264/* A macro which other sections of Makefile can redefine to munge the 296/* A macro which other sections of Makefile can redefine to munge the
@@ -301,30 +333,14 @@ LD=ld
301 333
302#endif /* not ORDINARY_LINK */ 334#endif /* not ORDINARY_LINK */
303 335
304
305#ifdef MSDOS
306#ifdef HAVE_X_WINDOWS
307MSDOS_OBJ = dosfns.o msdos.o
308#else
309MSDOS_OBJ = dosfns.o msdos.o w16select.o termcap.o
310#endif
311#endif
312
313#ifdef HAVE_NS 336#ifdef HAVE_NS
314ns_appdir=@ns_appdir@/ 337ns_appdir=@ns_appdir@/
315ns_appbindir=@ns_appbindir@/ 338ns_appbindir=@ns_appbindir@/
316ns_appresdir=@ns_appresdir@/
317ns_appsrc=@ns_appsrc@ 339ns_appsrc=@ns_appsrc@
318#endif /* HAVE_NS */ 340#endif /* HAVE_NS */
319 341
320#ifdef HAVE_WINDOW_SYSTEM 342/* lastfile must follow all files whose initialized data areas should
321#ifdef HAVE_X_WINDOWS 343 be dumped as pure by dump-emacs. */
322FONT_DRIVERS=$(FONT_OBJ)
323#endif /* HAVE_X_WINDOWS */
324#endif /* HAVE_WINDOW_SYSTEM */
325
326/* lastfile must follow all files
327 whose initialized data areas should be dumped as pure by dump-emacs. */
328obj= dispnew.o frame.o scroll.o xdisp.o menu.o $(XMENU_OBJ) window.o \ 344obj= dispnew.o frame.o scroll.o xdisp.o menu.o $(XMENU_OBJ) window.o \
329 charset.o coding.o category.o ccl.o character.o chartab.o bidi.o \ 345 charset.o coding.o category.o ccl.o character.o chartab.o bidi.o \
330 cm.o term.o terminal.o xfaces.o $(XOBJ) $(GTK_OBJ) $(DBUS_OBJ) \ 346 cm.o term.o terminal.o xfaces.o $(XOBJ) $(GTK_OBJ) $(DBUS_OBJ) \
@@ -334,15 +350,14 @@ obj= dispnew.o frame.o scroll.o xdisp.o menu.o $(XMENU_OBJ) window.o \
334 cmds.o casetab.o casefiddle.o indent.o search.o regex.o undo.o \ 350 cmds.o casetab.o casefiddle.o indent.o search.o regex.o undo.o \
335 alloc.o data.o doc.o editfns.o callint.o \ 351 alloc.o data.o doc.o editfns.o callint.o \
336 eval.o floatfns.o fns.o font.o print.o lread.o \ 352 eval.o floatfns.o fns.o font.o print.o lread.o \
337 syntax.o @unexec@ bytecode.o \ 353 syntax.o $(UNEXEC_OBJ) bytecode.o \
338 process.o callproc.o \ 354 process.o callproc.o \
339 region-cache.o sound.o atimer.o \ 355 region-cache.o sound.o atimer.o \
340 doprnt.o strftime.o intervals.o textprop.o composite.o md5.o \ 356 doprnt.o strftime.o intervals.o textprop.o composite.o md5.o \
341 $(MSDOS_OBJ) $(NS_OBJ) $(CYGWIN_OBJ) $(FONT_DRIVERS) 357 $(MSDOS_OBJ) $(MSDOS_X_OBJ) $(NS_OBJ) $(CYGWIN_OBJ) $(FONT_DRIVERS)
342 358
343/* Object files used on some machine or other. 359/* Object files used on some machine or other.
344 These go in the DOC file on all machines 360 These go in the DOC file on all machines in case they are needed. */
345 in case they are needed there. */
346SOME_MACHINE_OBJECTS = dosfns.o msdos.o \ 361SOME_MACHINE_OBJECTS = dosfns.o msdos.o \
347 xterm.o xfns.o xmenu.o xselect.o xrdb.o xsmfns.o fringe.o image.o \ 362 xterm.o xfns.o xmenu.o xselect.o xrdb.o xsmfns.o fringe.o image.o \
348 fontset.o dbusbind.o \ 363 fontset.o dbusbind.o \
@@ -374,47 +389,6 @@ POST_ALLOC_OBJ=@POST_ALLOC_OBJ@
374otherobj= $(TERMCAP_OBJ) $(PRE_ALLOC_OBJ) $(gmallocobj) $(rallocobj) \ 389otherobj= $(TERMCAP_OBJ) $(PRE_ALLOC_OBJ) $(gmallocobj) $(rallocobj) \
375 $(POST_ALLOC_OBJ) $(WIDGET_OBJ) $(LIBOBJS) 390 $(POST_ALLOC_OBJ) $(WIDGET_OBJ) $(LIBOBJS)
376 391
377#ifdef HAVE_MOUSE
378#define MOUSE_SUPPORT ${lispsource}mouse.elc \
379 ${lispsource}select.elc ${lispsource}scroll-bar.elc
380#else
381#define MOUSE_SUPPORT $(GPM_MOUSE_SUPPORT)
382#endif
383
384#ifdef MSDOS
385#define MSDOS_SUPPORT ${lispsource}ls-lisp.elc ${lispsource}disp-table.elc \
386 ${lispsource}dos-fns.elc ${lispsource}dos-w32.elc ${lispsource}dos-vars.elc \
387 ${lispsource}term/internal.elc ${lispsource}term/pc-win.elc
388
389#else
390#define MSDOS_SUPPORT
391#endif
392
393#ifdef HAVE_WINDOW_SYSTEM
394#ifdef HAVE_X_WINDOWS
395#define WINDOW_SUPPORT $(BASE_WINDOW_SUPPORT) $(X_WINDOW_SUPPORT)
396#else
397#define WINDOW_SUPPORT $(BASE_WINDOW_SUPPORT)
398#endif
399#else
400#define WINDOW_SUPPORT
401#endif
402
403#ifdef WINDOWSNT
404#define WINNT_SUPPORT ${lispsource}ls-lisp.elc ${lispsource}disp-table.elc \
405 ${lispsource}dos-w32.elc ${lispsource}w32-vars.elc \
406 ${lispsource}w32-fns.elc ${lispsource}term/common-win.elc \
407 ${lispsource}term/w32-win.elc
408#else
409#define WINNT_SUPPORT
410#endif
411
412#ifdef HAVE_WINDOW_SYSTEM
413#define TOOLTIP_SUPPORT ${lispsource}tooltip.elc
414#else
415#define TOOLTIP_SUPPORT
416#endif
417
418/* This is the platform-specific list of Lisp files loaded into the 392/* This is the platform-specific list of Lisp files loaded into the
419 dumped Emacs. It is arranged like this because it is easier to generate 393 dumped Emacs. It is arranged like this because it is easier to generate
420 it semi-mechanically from loadup.el this way. 394 it semi-mechanically from loadup.el this way.
@@ -448,7 +422,7 @@ lisp= \
448 ${lispsource}files.elc \ 422 ${lispsource}files.elc \
449 ${lispsource}format.elc \ 423 ${lispsource}format.elc \
450 ${lispsource}facemenu.elc \ 424 ${lispsource}facemenu.elc \
451 MOUSE_SUPPORT \ 425 ${MOUSE_SUPPORT} \
452 ${lispsource}emacs-lisp/float-sup.elc \ 426 ${lispsource}emacs-lisp/float-sup.elc \
453 ${lispsource}frame.elc \ 427 ${lispsource}frame.elc \
454 ${lispsource}help.elc \ 428 ${lispsource}help.elc \
@@ -511,10 +485,9 @@ lisp= \
511 ${lispsource}vc-hooks.elc \ 485 ${lispsource}vc-hooks.elc \
512 ${lispsource}ediff-hook.elc \ 486 ${lispsource}ediff-hook.elc \
513 ${lispsource}epa-hook.elc \ 487 ${lispsource}epa-hook.elc \
514 TOOLTIP_SUPPORT \ 488 ${TOOLTIP_SUPPORT} \
515 MSDOS_SUPPORT \ 489 ${MSDOS_SUPPORT} \
516 WINNT_SUPPORT \ 490 ${WINDOW_SUPPORT} \
517 WINDOW_SUPPORT \
518 ${NS_SUPPORT} \ 491 ${NS_SUPPORT} \
519 ${lispsource}widget.elc \ 492 ${lispsource}widget.elc \
520 ${lispsource}window.elc \ 493 ${lispsource}window.elc \
@@ -634,10 +607,10 @@ SOME_MACHINE_LISP = ../lisp/mouse.elc \
634 with GCC, we might need gnulib again after them. */ 607 with GCC, we might need gnulib again after them. */
635 608
636LIBES = $(LOADLIBES) $(LIBS) $(LIBX_BASE) $(LIBX_OTHER) $(LIBSOUND) \ 609LIBES = $(LOADLIBES) $(LIBS) $(LIBX_BASE) $(LIBX_OTHER) $(LIBSOUND) \
637 $(RSVG_LIBS) $(DBUS_LIBS) @LIBGPM@ @LIBRESOLV@ $(LIBS_SYSTEM) \ 610 $(RSVG_LIBS) $(DBUS_LIBS) $(LIBGPM) $(LIBRESOLV) $(LIBS_SYSTEM) \
638 $(LIBS_TERMCAP) $(GETLOADAVG_LIBS) ${GCONF_LIBS} ${LIBSELINUX_LIBS} \ 611 $(LIBS_TERMCAP) $(GETLOADAVG_LIBS) ${GCONF_LIBS} ${LIBSELINUX_LIBS} \
639 @FREETYPE_LIBS@ @FONTCONFIG_LIBS@ @LIBOTF_LIBS@ @M17N_FLT_LIBS@ \ 612 $(FREETYPE_LIBS) $(FONTCONFIG_LIBS) $(LIBOTF_LIBS) $(M17N_FLT_LIBS) \
640 $(GNULIB_VAR) @LIB_MATH@ @LIB_STANDARD@ $(GNULIB_VAR) 613 $(GNULIB_VAR) $(LIB_MATH) $(LIB_STANDARD) $(GNULIB_VAR)
641 614
642all: emacs${EXEEXT} $(OTHER_FILES) 615all: emacs${EXEEXT} $(OTHER_FILES)
643 616
@@ -682,7 +655,7 @@ buildobj.h: Makefile
682temacs${EXEEXT}: $(LOCALCPP) $(START_FILES) stamp-oldxmenu ${obj} ${otherobj} prefix-args${EXEEXT} 655temacs${EXEEXT}: $(LOCALCPP) $(START_FILES) stamp-oldxmenu ${obj} ${otherobj} prefix-args${EXEEXT}
683#ifdef NS_IMPL_GNUSTEP 656#ifdef NS_IMPL_GNUSTEP
684 $(CC) -rdynamic YMF_PASS_LDFLAGS ( ${TEMACS_LDFLAGS} \ 657 $(CC) -rdynamic YMF_PASS_LDFLAGS ( ${TEMACS_LDFLAGS} \
685 -L@GNUSTEP_SYSTEM_LIBRARIES@ -lgnustep-gui -lgnustep-base \ 658 -L$(GNUSTEP_SYSTEM_LIBRARIES) -lgnustep-gui -lgnustep-base \
686 -lobjc $(CONFIG_SYSTEM_LIBS) -lpthread ) -o temacs \ 659 -lobjc $(CONFIG_SYSTEM_LIBS) -lpthread ) -o temacs \
687 ${obj} ${otherobj} ${LIBES} 660 ${obj} ${otherobj} ${LIBES}
688#else 661#else
@@ -696,9 +669,8 @@ prefix-args${EXEEXT}: prefix-args.o $(config_h)
696 669
697#if defined (HAVE_X_WINDOWS) && defined (HAVE_X11) && defined (HAVE_MENUS) && ! defined (USE_GTK) 670#if defined (HAVE_X_WINDOWS) && defined (HAVE_X11) && defined (HAVE_MENUS) && ! defined (USE_GTK)
698 671
699/* We use stamp-xmenu with these two deps 672/* We use stamp-xmenu with these two deps to both ensure that lwlib
700 to both ensure that lwlib gets remade based on its dependencies 673 gets remade based on its dependencies in its own makefile,
701 in its own makefile,
702 and remake temacs if lwlib gets changed by this. */ 674 and remake temacs if lwlib gets changed by this. */
703stamp-oldxmenu: ${OLDXMENU} ../src/$(OLDXMENU) 675stamp-oldxmenu: ${OLDXMENU} ../src/$(OLDXMENU)
704 touch stamp-oldxmenu 676 touch stamp-oldxmenu
@@ -752,6 +724,8 @@ doc.o: buildobj.h
752Eg callproc.c only depends on w32.h for WINDOWSNT builds. 724Eg callproc.c only depends on w32.h for WINDOWSNT builds.
753One way to fix this would be to replace w32.h (etc) by $(W32_H), 725One way to fix this would be to replace w32.h (etc) by $(W32_H),
754a variable set by configure. Does not seem worth the trouble. 726a variable set by configure. Does not seem worth the trouble.
727Since the w32 build does not even use this file, you might ask
728why these dependencies are here at all...
755 729
756nsgui.h: In fact, every .o file depends directly or indirectly on 730nsgui.h: In fact, every .o file depends directly or indirectly on
757dispextern.h and hence nsgui.h under NS. But the ones that actually 731dispextern.h and hence nsgui.h under NS. But the ones that actually
@@ -961,8 +935,8 @@ xsmfns.o: xsmfns.c lisp.h $(config_h) systime.h sysselect.h termhooks.h xterm.h
961xsettings.o: xterm.h xsettings.h lisp.h frame.h termhooks.h $(config_h) \ 935xsettings.o: xterm.h xsettings.h lisp.h frame.h termhooks.h $(config_h) \
962 dispextern.h keyboard.h systime.h coding.h composite.h blockinput.h atimer.h \ 936 dispextern.h keyboard.h systime.h coding.h composite.h blockinput.h atimer.h \
963 termopts.h 937 termopts.h
964/* The files of Lisp proper */
965 938
939/* The files of Lisp proper. */
966alloc.o: alloc.c process.h frame.h window.h buffer.h puresize.h syssignal.h \ 940alloc.o: alloc.c process.h frame.h window.h buffer.h puresize.h syssignal.h \
967 keyboard.h blockinput.h atimer.h systime.h character.h lisp.h $(config_h) \ 941 keyboard.h blockinput.h atimer.h systime.h character.h lisp.h $(config_h) \
968 $(INTERVALS_H) termhooks.h 942 $(INTERVALS_H) termhooks.h
@@ -984,7 +958,7 @@ lread.o: lread.c commands.h keyboard.h buffer.h epaths.h character.h \
984 charset.h lisp.h $(config_h) $(INTERVALS_H) termhooks.h coding.h msdos.h \ 958 charset.h lisp.h $(config_h) $(INTERVALS_H) termhooks.h coding.h msdos.h \
985 systime.h frame.h blockinput.h atimer.h 959 systime.h frame.h blockinput.h atimer.h
986 960
987/* Text properties support */ 961/* Text properties support. */
988composite.o: composite.c buffer.h character.h coding.h font.h ccl.h \ 962composite.o: composite.c buffer.h character.h coding.h font.h ccl.h \
989 frame.h termhooks.h $(INTERVALS_H) window.h lisp.h $(config_h) 963 frame.h termhooks.h $(INTERVALS_H) window.h lisp.h $(config_h)
990intervals.o: intervals.c buffer.h $(INTERVALS_H) keyboard.h puresize.h \ 964intervals.o: intervals.c buffer.h $(INTERVALS_H) keyboard.h puresize.h \
@@ -995,8 +969,7 @@ textprop.o: textprop.c buffer.h window.h $(INTERVALS_H) \
995#endif /* ! AUTO_DEPEND */ 969#endif /* ! AUTO_DEPEND */
996 970
997/* System-specific programs to be made. 971/* System-specific programs to be made.
998 OTHER_FILES 972 OTHER_FILES select which of these should be compiled. */
999 select which of these should be compiled. */
1000 973
1001#ifdef HAVE_NS 974#ifdef HAVE_NS
1002${ns_appdir}: ${ns_appsrc} 975${ns_appdir}: ${ns_appsrc}
diff --git a/src/config.in b/src/config.in
index 5fb0cd7d569..35530943682 100644
--- a/src/config.in
+++ b/src/config.in
@@ -44,12 +44,6 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
44/* Define to 1 if using `getloadavg.c'. */ 44/* Define to 1 if using `getloadavg.c'. */
45#undef C_GETLOADAVG 45#undef C_GETLOADAVG
46 46
47/* Define C_SWITCH_X_SITE to contain any special flags your compiler may need
48 to deal with X Windows. For instance, if you've defined HAVE_X_WINDOWS
49 above and your X include files aren't in a place that your compiler can
50 find on its own, you might want to add "-I/..." or something similar. */
51#undef C_SWITCH_X_SITE
52
53/* Define to 1 for DGUX with <sys/dg_sys_info.h>. */ 47/* Define to 1 for DGUX with <sys/dg_sys_info.h>. */
54#undef DGUX 48#undef DGUX
55 49
@@ -488,6 +482,9 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
488/* Define to 1 if you have a working `mmap' system call. */ 482/* Define to 1 if you have a working `mmap' system call. */
489#undef HAVE_MMAP 483#undef HAVE_MMAP
490 484
485/* Define if you have mouse support. */
486#undef HAVE_MOUSE
487
491/* Define to 1 if you have the `mremap' function. */ 488/* Define to 1 if you have the `mremap' function. */
492#undef HAVE_MREMAP 489#undef HAVE_MREMAP
493 490
@@ -743,6 +740,9 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
743/* Define to 1 if you have the <vfork.h> header file. */ 740/* Define to 1 if you have the <vfork.h> header file. */
744#undef HAVE_VFORK_H 741#undef HAVE_VFORK_H
745 742
743/* Define if you have a window system. */
744#undef HAVE_WINDOW_SYSTEM
745
746/* Define to 1 if `fork' works. */ 746/* Define to 1 if `fork' works. */
747#undef HAVE_WORKING_FORK 747#undef HAVE_WORKING_FORK
748 748
@@ -804,12 +804,6 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
804/* Define to use Kerberos 5 instead of Kerberos 4. */ 804/* Define to use Kerberos 5 instead of Kerberos 4. */
805#undef KERBEROS5 805#undef KERBEROS5
806 806
807/* Define LD_SWITCH_X_SITE to contain any special flags your loader may need
808 to deal with X Windows. For instance, if you've defined HAVE_X_WINDOWS
809 above and your X libraries aren't in a place that your loader can find on
810 its own, you might want to add "-L/..." or something similar. */
811#undef LD_SWITCH_X_SITE
812
813/* Define to 1 if localtime caches TZ. */ 807/* Define to 1 if localtime caches TZ. */
814#undef LOCALTIME_CACHE 808#undef LOCALTIME_CACHE
815 809
@@ -1016,12 +1010,6 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
1016#undef volatile 1010#undef volatile
1017 1011
1018 1012
1019/* If we're using X11/Carbon/GNUstep, define some consequences. */
1020#if defined(HAVE_X_WINDOWS) || defined(HAVE_NS)
1021#define HAVE_WINDOW_SYSTEM
1022#define HAVE_MOUSE
1023#endif
1024
1025/* Define AMPERSAND_FULL_NAME if you use the convention 1013/* Define AMPERSAND_FULL_NAME if you use the convention
1026 that & in the full name stands for the login id. */ 1014 that & in the full name stands for the login id. */
1027/* Turned on June 1996 supposing nobody will mind it. */ 1015/* Turned on June 1996 supposing nobody will mind it. */
@@ -1046,7 +1034,7 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
1046#endif 1034#endif
1047#endif /* __FreeBSD__ || __NetBSD__ || __linux__ */ 1035#endif /* __FreeBSD__ || __NetBSD__ || __linux__ */
1048 1036
1049/* If using GNU, then support inline function declarations. */ 1037/* If using GNU, then support inline function declarations. */
1050/* Don't try to switch on inline handling as detected by AC_C_INLINE 1038/* Don't try to switch on inline handling as detected by AC_C_INLINE
1051 generally, because even if non-gcc compilers accept `inline', they 1039 generally, because even if non-gcc compilers accept `inline', they
1052 may reject `extern inline'. */ 1040 may reject `extern inline'. */
@@ -1071,7 +1059,7 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
1071/* Set up some defines, C and LD flags for NeXTstep interface on GNUstep. 1059/* Set up some defines, C and LD flags for NeXTstep interface on GNUstep.
1072 (There is probably a better place to do this, but right now the Cocoa 1060 (There is probably a better place to do this, but right now the Cocoa
1073 side does this in s/darwin.h and we cannot 1061 side does this in s/darwin.h and we cannot
1074 parallel this exactly since GNUstep is multi-OS. */ 1062 parallel this exactly since GNUstep is multi-OS. */
1075#ifdef HAVE_NS 1063#ifdef HAVE_NS
1076# ifdef NS_IMPL_GNUSTEP 1064# ifdef NS_IMPL_GNUSTEP
1077/* GNUstep needs a bit more pure memory. Of the existing knobs, 1065/* GNUstep needs a bit more pure memory. Of the existing knobs,
@@ -1168,7 +1156,7 @@ extern char *getenv ();
1168#include "string.h" 1156#include "string.h"
1169#endif 1157#endif
1170#ifdef HAVE_STRINGS_H 1158#ifdef HAVE_STRINGS_H
1171#include "strings.h" /* May be needed for bcopy & al. */ 1159#include "strings.h" /* May be needed for bcopy & al. */
1172#endif 1160#endif
1173#ifdef HAVE_STDLIB_H 1161#ifdef HAVE_STDLIB_H
1174#include <stdlib.h> 1162#include <stdlib.h>
diff --git a/src/s/netbsd.h b/src/s/netbsd.h
index b8df9014ecc..4874ec9af56 100644
--- a/src/s/netbsd.h
+++ b/src/s/netbsd.h
@@ -26,8 +26,6 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
26 26
27#define PENDING_OUTPUT_COUNT(FILE) ((FILE)->_p - (FILE)->_bf._base) 27#define PENDING_OUTPUT_COUNT(FILE) ((FILE)->_p - (FILE)->_bf._base)
28 28
29#define AMPERSAND_FULL_NAME
30
31/* On post 1.3 releases of NetBSD, gcc -nostdlib also clears 29/* On post 1.3 releases of NetBSD, gcc -nostdlib also clears
32 the library search parth, i.e. it won't search /usr/lib 30 the library search parth, i.e. it won't search /usr/lib
33 for libc and friends. Using -nostartfiles instead avoids 31 for libc and friends. Using -nostartfiles instead avoids