Now on revision 107038. ------------------------------------------------------------ revno: 107038 committer: Glenn Morris branch nick: trunk timestamp: Tue 2012-01-31 23:32:21 -0800 message: Copy 2012-01-25 compilation-next-error-function change to another function. * lisp/progmodes/compile.el (compilation-internal-error-properties): Respect compilation-first-column in the "*compilation*" buffer. diff: === modified file 'lisp/ChangeLog' --- lisp/ChangeLog 2012-02-01 02:17:17 +0000 +++ lisp/ChangeLog 2012-02-01 07:32:21 +0000 @@ -1,5 +1,8 @@ 2012-02-01 Glenn Morris + * progmodes/compile.el (compilation-internal-error-properties): + Respect compilation-first-column in the "*compilation*" buffer. + * emacs-lisp/easy-mmode.el (define-minor-mode): Relax :variable's test for a named function. === modified file 'lisp/progmodes/compile.el' --- lisp/progmodes/compile.el 2012-01-25 02:01:22 +0000 +++ lisp/progmodes/compile.el 2012-02-01 07:32:21 +0000 @@ -1058,6 +1058,7 @@ (marker (if marker-line (compilation--loc->marker (cadr marker-line)))) (screen-columns compilation-error-screen-columns) + (first-column compilation-first-column) end-marker loc end-loc) (if (not (and marker (marker-buffer marker))) (setq marker nil) ; no valid marker for this file @@ -1078,7 +1079,10 @@ ;; Obey the compilation-error-screen-columns of the target ;; buffer if its major mode set it buffer-locally. (if (local-variable-p 'compilation-error-screen-columns) - compilation-error-screen-columns screen-columns))) + compilation-error-screen-columns screen-columns)) + (compilation-first-column + (if (local-variable-p 'compilation-first-column) + compilation-first-column first-column))) (save-excursion (save-restriction (widen) ------------------------------------------------------------ revno: 107037 committer: Paul Eggert branch nick: trunk timestamp: Tue 2012-01-31 22:04:34 -0800 message: Port to older Solaris 10 versions (Bug#10677). Bug reported by Chong Yidong for SunOS 5.10 Generic_127111-11 sparc. I cannot reproduce it on SunOS 5.10 Generic_141444-09 sparc but possibly this is because Sun fixed the 'stat' bug in my version. * Makefile.in (GNULIB_TOOL_FLAGS): Do not avoid the pathmax module. * lib/pathmax.h, m4/pathmax.m4: New files, from gnulib. * lib/gnulib.mk, m4/gl-comp.m4: Regenerate. These changes are based on gnulib version 4f11d6bebc3098c64ffde27079ab0d0cecfd0cdc dated 2011-10-07 20:59:10, because Emacs is in feature freeze and we do not want to merge any more-recent changes from gnulib. diff: === modified file 'ChangeLog' --- ChangeLog 2012-01-31 03:47:51 +0000 +++ ChangeLog 2012-02-01 06:04:34 +0000 @@ -1,3 +1,17 @@ +2012-02-01 Paul Eggert + + Port to older Solaris 10 versions (Bug#10677). + Bug reported by Chong Yidong for SunOS 5.10 Generic_127111-11 sparc. + I cannot reproduce it on SunOS 5.10 Generic_141444-09 sparc but + possibly this is because Sun fixed the 'stat' bug in my version. + * Makefile.in (GNULIB_TOOL_FLAGS): Do not avoid the pathmax module. + * lib/pathmax.h, m4/pathmax.m4: New files, from gnulib. + * lib/gnulib.mk, m4/gl-comp.m4: Regenerate. + These changes are based on gnulib version + 4f11d6bebc3098c64ffde27079ab0d0cecfd0cdc dated 2011-10-07 20:59:10, + because Emacs is in feature freeze and we do not want to merge any + more-recent changes from gnulib. + 2012-01-31 Glenn Morris * configure.in: Throw an explicit error if Motif toolkit was === modified file 'Makefile.in' --- Makefile.in 2012-01-19 07:21:25 +0000 +++ Makefile.in 2012-02-01 06:04:34 +0000 @@ -341,7 +341,7 @@ mktime pthread_sigmask readlink \ socklen stdarg stdio strftime strtoimax strtoumax symlink sys_stat GNULIB_TOOL_FLAGS = \ - --avoid=msvc-inval --avoid=msvc-nothrow --avoid=pathmax \ + --avoid=msvc-inval --avoid=msvc-nothrow \ --avoid=raise --avoid=threadlib \ --conditional-dependencies --import --no-changelog --no-vc-files \ --makefile-name=gnulib.mk === modified file 'lib/gnulib.mk' --- lib/gnulib.mk 2011-09-26 21:30:18 +0000 +++ lib/gnulib.mk 2012-02-01 06:04:34 +0000 @@ -21,7 +21,7 @@ # the same distribution terms as the rest of that program. # # Generated by gnulib-tool. -# Reproduce by: gnulib-tool --import --dir=. --lib=libgnu --source-base=lib --m4-base=m4 --doc-base=doc --tests-base=tests --aux-dir=build-aux --avoid=msvc-inval --avoid=msvc-nothrow --avoid=pathmax --avoid=raise --avoid=threadlib --makefile-name=gnulib.mk --conditional-dependencies --no-libtool --macro-prefix=gl --no-vc-files alloca-opt careadlinkat crypto/md5 crypto/sha1 crypto/sha256 crypto/sha512 dtoastr dup2 filemode getloadavg getopt-gnu ignore-value intprops lstat mktime pthread_sigmask readlink socklen stdarg stdio strftime strtoimax strtoumax symlink sys_stat +# Reproduce by: gnulib-tool --import --dir=. --lib=libgnu --source-base=lib --m4-base=m4 --doc-base=doc --tests-base=tests --aux-dir=build-aux --avoid=msvc-inval --avoid=msvc-nothrow --avoid=raise --avoid=threadlib --makefile-name=gnulib.mk --conditional-dependencies --no-libtool --macro-prefix=gl --no-vc-files alloca-opt careadlinkat crypto/md5 crypto/sha1 crypto/sha256 crypto/sha512 dtoastr dup2 filemode getloadavg getopt-gnu ignore-value intprops lstat mktime pthread_sigmask readlink socklen stdarg stdio strftime strtoimax strtoumax symlink sys_stat MOSTLYCLEANFILES += core *.stackdump @@ -258,6 +258,15 @@ ## end gnulib module mktime +## begin gnulib module pathmax + +if gl_GNULIB_ENABLED_pathmax + +endif +EXTRA_DIST += pathmax.h + +## end gnulib module pathmax + ## begin gnulib module pthread_sigmask === added file 'lib/pathmax.h' --- lib/pathmax.h 1970-01-01 00:00:00 +0000 +++ lib/pathmax.h 2012-02-01 06:04:34 +0000 @@ -0,0 +1,84 @@ +/* Define PATH_MAX somehow. Requires sys/types.h. + Copyright (C) 1992, 1999, 2001, 2003, 2005, 2009-2011 Free Software + Foundation, Inc. + + This program is free software; you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation; either version 3, or (at your option) + any later version. + + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this program; if not, write to the Free Software Foundation, + Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. */ + +#ifndef _PATHMAX_H +# define _PATHMAX_H + +/* POSIX:2008 defines PATH_MAX to be the maximum number of bytes in a filename, + including the terminating NUL byte. + + PATH_MAX is not defined on systems which have no limit on filename length, + such as GNU/Hurd. + + This file does *not* define PATH_MAX always. Programs that use this file + can handle the GNU/Hurd case in several ways: + - Either with a package-wide handling, or with a per-file handling, + - Either through a + #ifdef PATH_MAX + or through a fallback like + #ifndef PATH_MAX + # define PATH_MAX 8192 + #endif + or through a fallback like + #ifndef PATH_MAX + # define PATH_MAX pathconf ("/", _PC_PATH_MAX) + #endif + */ + +# include + +# include + +# ifndef _POSIX_PATH_MAX +# define _POSIX_PATH_MAX 256 +# endif + +/* Don't include sys/param.h if it already has been. */ +# if defined HAVE_SYS_PARAM_H && !defined PATH_MAX && !defined MAXPATHLEN +# include +# endif + +# if !defined PATH_MAX && defined MAXPATHLEN +# define PATH_MAX MAXPATHLEN +# endif + +# ifdef __hpux +/* On HP-UX, PATH_MAX designates the maximum number of bytes in a filename, + *not* including the terminating NUL byte, and is set to 1023. + Additionally, when _XOPEN_SOURCE is defined to 500 or more, PATH_MAX is + not defined at all any more. */ +# undef PATH_MAX +# define PATH_MAX 1024 +# endif + +# if (defined _WIN32 || defined __WIN32__) && ! defined __CYGWIN__ +/* The page "Naming Files, Paths, and Namespaces" on msdn.microsoft.com, + section "Maximum Path Length Limitation", + + explains that the maximum size of a filename, including the terminating + NUL byte, is 260 = 3 + 256 + 1. + This is the same value as + - FILENAME_MAX in , + - _MAX_PATH in , + - MAX_PATH in . + Undefine the original value, because mingw's gets it wrong. */ +# undef PATH_MAX +# define PATH_MAX 260 +# endif + +#endif /* _PATHMAX_H */ === modified file 'm4/gl-comp.m4' --- m4/gl-comp.m4 2011-10-07 21:15:00 +0000 +++ m4/gl-comp.m4 2012-02-01 06:04:34 +0000 @@ -65,6 +65,7 @@ # Code from module mktime: # Code from module multiarch: # Code from module nocrash: + # Code from module pathmax: # Code from module pthread_sigmask: # Code from module readlink: # Code from module signal-h: @@ -217,6 +218,7 @@ gl_UNISTD_H gl_gnulib_enabled_dosname=false gl_gnulib_enabled_be453cec5eecf5731a274f2de7f2db36=false + gl_gnulib_enabled_pathmax=false gl_gnulib_enabled_sigprocmask=false gl_gnulib_enabled_stat=false gl_gnulib_enabled_strtoll=false @@ -236,6 +238,13 @@ gl_gnulib_enabled_be453cec5eecf5731a274f2de7f2db36=true fi } + func_gl_gnulib_m4code_pathmax () + { + if ! $gl_gnulib_enabled_pathmax; then +gl_PATHMAX + gl_gnulib_enabled_pathmax=true + fi + } func_gl_gnulib_m4code_sigprocmask () { if ! $gl_gnulib_enabled_sigprocmask; then @@ -262,6 +271,9 @@ func_gl_gnulib_m4code_dosname fi if test $REPLACE_STAT = 1; then + func_gl_gnulib_m4code_pathmax + fi + if test $REPLACE_STAT = 1; then func_gl_gnulib_m4code_verify fi fi @@ -326,6 +338,7 @@ m4_pattern_allow([^gl_GNULIB_ENABLED_]) AM_CONDITIONAL([gl_GNULIB_ENABLED_dosname], [$gl_gnulib_enabled_dosname]) AM_CONDITIONAL([gl_GNULIB_ENABLED_be453cec5eecf5731a274f2de7f2db36], [$gl_gnulib_enabled_be453cec5eecf5731a274f2de7f2db36]) + AM_CONDITIONAL([gl_GNULIB_ENABLED_pathmax], [$gl_gnulib_enabled_pathmax]) AM_CONDITIONAL([gl_GNULIB_ENABLED_sigprocmask], [$gl_gnulib_enabled_sigprocmask]) AM_CONDITIONAL([gl_GNULIB_ENABLED_stat], [$gl_gnulib_enabled_stat]) AM_CONDITIONAL([gl_GNULIB_ENABLED_strtoll], [$gl_gnulib_enabled_strtoll]) @@ -502,6 +515,7 @@ lib/md5.h lib/mktime-internal.h lib/mktime.c + lib/pathmax.h lib/pthread_sigmask.c lib/readlink.c lib/sha1.c @@ -552,6 +566,7 @@ m4/mktime.m4 m4/multiarch.m4 m4/nocrash.m4 + m4/pathmax.m4 m4/pthread_sigmask.m4 m4/readlink.m4 m4/sha1.m4 === added file 'm4/pathmax.m4' --- m4/pathmax.m4 1970-01-01 00:00:00 +0000 +++ m4/pathmax.m4 2012-02-01 06:04:34 +0000 @@ -0,0 +1,42 @@ +# pathmax.m4 serial 10 +dnl Copyright (C) 2002-2003, 2005-2006, 2009-2011 Free Software Foundation, +dnl Inc. +dnl This file is free software; the Free Software Foundation +dnl gives unlimited permission to copy and/or distribute it, +dnl with or without modifications, as long as this notice is preserved. + +AC_DEFUN([gl_PATHMAX], +[ + dnl Prerequisites of lib/pathmax.h. + AC_CHECK_HEADERS_ONCE([sys/param.h]) +]) + +# Expands to a piece of C program that defines PATH_MAX in the same way as +# "pathmax.h" will do. +AC_DEFUN([gl_PATHMAX_SNIPPET], [[ +/* Arrange to define PATH_MAX, like "pathmax.h" does. */ +#if HAVE_UNISTD_H +# include +#endif +#include +#if defined HAVE_SYS_PARAM_H && !defined PATH_MAX && !defined MAXPATHLEN +# include +#endif +#if !defined PATH_MAX && defined MAXPATHLEN +# define PATH_MAX MAXPATHLEN +#endif +#ifdef __hpux +# undef PATH_MAX +# define PATH_MAX 1024 +#endif +#if (defined _WIN32 || defined __WIN32__) && ! defined __CYGWIN__ +# undef PATH_MAX +# define PATH_MAX 260 +#endif +]]) + +# Prerequisites of gl_PATHMAX_SNIPPET. +AC_DEFUN([gl_PATHMAX_SNIPPET_PREREQ], +[ + AC_CHECK_HEADERS_ONCE([unistd.h sys/param.h]) +]) ------------------------------------------------------------ revno: 107036 committer: Glenn Morris branch nick: trunk timestamp: Tue 2012-01-31 21:17:17 -0500 message: Tweak previous define-minor-mode change * lisp/emacs-lisp/easy-mmode.el (define-minor-mode): Relax :variable's test for a named function. diff: === modified file 'lisp/ChangeLog' --- lisp/ChangeLog 2012-01-31 21:59:58 +0000 +++ lisp/ChangeLog 2012-02-01 02:17:17 +0000 @@ -1,3 +1,8 @@ +2012-02-01 Glenn Morris + + * emacs-lisp/easy-mmode.el (define-minor-mode): + Relax :variable's test for a named function. + 2012-01-31 Alan Mackenzie * progmodes/cc-engine.el (c-guess-basic-syntax): CASE 5B.1: Fix an === modified file 'lisp/emacs-lisp/easy-mmode.el' --- lisp/emacs-lisp/easy-mmode.el 2012-01-31 04:52:29 +0000 +++ lisp/emacs-lisp/easy-mmode.el 2012-02-01 02:17:17 +0000 @@ -182,15 +182,9 @@ (:require (setq require (pop body))) (:keymap (setq keymap (pop body))) (:variable (setq variable (pop body)) - (setq tmp (cdr-safe variable)) - (if (not (or (functionp tmp) - (and tmp - (symbolp tmp) - ;; Hack to allow for named functions not within - ;; eval-when-compile. - ;; Cf define-compilation-mode. - (boundp 'byte-compile-function-environment) - (assq tmp byte-compile-function-environment)))) + (if (not (and (setq tmp (cdr-safe variable)) + (or (symbolp tmp) + (functionp tmp)))) ;; PLACE is not of the form (GET . SET). (setq mode variable) (setq mode (car variable)) ------------------------------------------------------------ revno: 107035 committer: Glenn Morris branch nick: trunk timestamp: Tue 2012-01-31 18:47:33 -0500 message: Fix previous change. diff: === modified file 'lisp/progmodes/gdb-mi.el' --- lisp/progmodes/gdb-mi.el 2012-01-31 23:43:05 +0000 +++ lisp/progmodes/gdb-mi.el 2012-01-31 23:47:33 +0000 @@ -45,7 +45,7 @@ ;; This file uses GDB/MI as the primary interface to GDB. It runs gdb with ;; GDB/MI (-interp=mi) and access CLI using "-interpreter-exec console -;; cli-command". This code works replaces gdb-ui.el and uses MI tokens instead +;; cli-command". This code replaces gdb-ui.el and uses MI tokens instead ;; of queues. Eventually MI should be asynchronous. ;; Windows Platforms: ------------------------------------------------------------ revno: 107034 committer: Glenn Morris branch nick: trunk timestamp: Tue 2012-01-31 18:43:05 -0500 message: Comment trivia. diff: === modified file 'lisp/progmodes/gdb-mi.el' --- lisp/progmodes/gdb-mi.el 2012-01-05 09:46:05 +0000 +++ lisp/progmodes/gdb-mi.el 2012-01-31 23:43:05 +0000 @@ -1,6 +1,6 @@ ;;; gdb-mi.el --- User Interface for running GDB -;; Copyright (C) 2007-2012 Free Software Foundation, Inc. +;; Copyright (C) 2007-2012 Free Software Foundation, Inc. ;; Author: Nick Roberts ;; Maintainer: FSF @@ -26,7 +26,7 @@ ;;; Credits: ;; This file was written by Nick Roberts following the general design -;; used in gdb-ui.el for Emacs 22.1 - 23.1. It is currently being developed +;; used in gdb-ui.el for Emacs 22.1 - 23.1. It was further developed ;; by Dmitry Dzhus as part of the Google Summer ;; of Code 2009 Project "Emacs GDB/MI migration". @@ -45,7 +45,7 @@ ;; This file uses GDB/MI as the primary interface to GDB. It runs gdb with ;; GDB/MI (-interp=mi) and access CLI using "-interpreter-exec console -;; cli-command". This code works without gdb-ui.el and uses MI tokens instead +;; cli-command". This code works replaces gdb-ui.el and uses MI tokens instead ;; of queues. Eventually MI should be asynchronous. ;; Windows Platforms: ------------------------------------------------------------ revno: 107033 committer: Alan Mackenzie branch nick: trunk timestamp: Tue 2012-01-31 21:59:58 +0000 message: Fix an off by one error in c-guess-basic-syntax CASE 5B.1. diff: === modified file 'lisp/ChangeLog' --- lisp/ChangeLog 2012-01-31 16:15:03 +0000 +++ lisp/ChangeLog 2012-01-31 21:59:58 +0000 @@ -1,3 +1,8 @@ +2012-01-31 Alan Mackenzie + + * progmodes/cc-engine.el (c-guess-basic-syntax): CASE 5B.1: Fix an + off by one error. + 2012-01-31 Chong Yidong * frame.el (set-frame-font): New arg ALL-FRAMES. === modified file 'lisp/progmodes/cc-engine.el' --- lisp/progmodes/cc-engine.el 2012-01-19 07:21:25 +0000 +++ lisp/progmodes/cc-engine.el 2012-01-31 21:59:58 +0000 @@ -9447,7 +9447,7 @@ ;; CASE 5B.1: Member init list. ((eq (char-after tmp-pos) ?:) - (if (or (> tmp-pos indent-point) + (if (or (>= tmp-pos indent-point) (= (c-point 'bosws) (1+ tmp-pos))) (progn ;; There is no preceding member init clause. ------------------------------------------------------------ revno: 107032 committer: Juanma Barranquero branch nick: trunk timestamp: Tue 2012-01-31 17:15:03 +0100 message: Fix typos in ChangeLogs. diff: === modified file 'doc/emacs/ChangeLog' --- doc/emacs/ChangeLog 2012-01-31 06:32:14 +0000 +++ doc/emacs/ChangeLog 2012-01-31 16:15:03 +0000 @@ -13,7 +13,7 @@ * buffers.texi (Select Buffer): Clarify explanation of switching to new buffers. Fix description of next-buffer and - previous-buffer (Bug#10334). + previous-buffer (Bug#10334). (Misc Buffer): Add xref to View Mode. * text.texi (Fill Commands): Fix description of === modified file 'doc/lispintro/ChangeLog' --- doc/lispintro/ChangeLog 2012-01-28 19:16:02 +0000 +++ doc/lispintro/ChangeLog 2012-01-31 16:15:03 +0000 @@ -1,7 +1,7 @@ 2012-01-28 Andreas Schwab * emacs-lisp-intro.texi (Top): Move setting of COUNT-WORDS outside - of @menu. (Bug#10628) + of @menu. (Bug#10628) 2012-01-19 Juanma Barranquero === modified file 'lisp/ChangeLog' --- lisp/ChangeLog 2012-01-31 08:38:58 +0000 +++ lisp/ChangeLog 2012-01-31 16:15:03 +0000 @@ -69,8 +69,8 @@ * progmodes/python.el: Require ansi-color at top-level. - * emacs-lisp/lisp-mode.el (emacs-lisp-mode-abbrev-table): Define - and use in Emacs Lisp mode (Bug#9360). + * emacs-lisp/lisp-mode.el (emacs-lisp-mode-abbrev-table): + Define and use in Emacs Lisp mode (Bug#9360). (lisp-mode-abbrev-table): Add doc. (lisp-mode-variables): Don't set local-abbrev-table. (lisp-interaction-mode): Use emacs-lisp-mode-abbrev-table. @@ -184,8 +184,8 @@ 2012-01-25 Jérémy Compostella - * window.el (window--state-get-1, window--state-put-2): Don't - save and restore the mark. + * window.el (window--state-get-1, window--state-put-2): + Don't save and restore the mark. 2012-01-25 Chong Yidong @@ -532,7 +532,7 @@ first prompt in `sql-interacive-mode'. (sql-mode-oracle-font-lock-keywords): Add CONNECT_BY_* builtin keywords. - (sql-mode-mysql-font-lock-keywords): Add ELSEIF keyword. + (sql-mode-mysql-font-lock-keywords): Add ELSEIF keyword. (sql-product-interactive): Bug fix: Set `sql-buffer' in context of original buffer. Invoke `sql-login-hook'. @@ -4046,7 +4046,7 @@ * cus-start.el (all): Add entry for bidi-paragraph-direction. - * international/uni-bidi.el: Regenerated. + * international/uni-bidi.el: Regenerate. 2011-08-23 Kenichi Handa === modified file 'lisp/gnus/ChangeLog' --- lisp/gnus/ChangeLog 2012-01-30 23:30:22 +0000 +++ lisp/gnus/ChangeLog 2012-01-31 16:15:03 +0000 @@ -7153,7 +7153,7 @@ "failed" all the time. * gnus.el: Throughout all files, replace (save-excursion (set-buffer - ...)) with (with-current-buffer ... ). + ...)) with (with-current-buffer ...). * nntp.el (nntp-open-server): Return whether the open was successful or not. === modified file 'lisp/mh-e/ChangeLog' --- lisp/mh-e/ChangeLog 2012-01-19 07:21:25 +0000 +++ lisp/mh-e/ChangeLog 2012-01-31 16:15:03 +0000 @@ -52,7 +52,7 @@ pop-to-buffer-same-window. * mh-folder.el (mh-inc-folder, mh-modify, mh-scan-folder) (mh-make-folder): Call mh-pop-to-buffer-same-window instead of - switch-to-buffer. The previous change which used pop-to-buffer + switch-to-buffer. The previous change which used pop-to-buffer produced the wrong behavior. 2011-07-12 Henrique Martins (tiny change) @@ -73,8 +73,8 @@ * mh-folder.el (mh-inc-folder, mh-modify, mh-scan-folder) (mh-make-folder): Replace calls to switch-to-buffer with of - pop-to-buffer. The former is intended for interactive use only and - generates warnings in Emacs 24. + pop-to-buffer. The former is intended for interactive use only + and generates warnings in Emacs 24. 2011-07-09 Bill Wohler @@ -96,7 +96,7 @@ * mh-e.el: Just require mh-loaddefs since loading it in an eval-and-compile block causes compilation errors in XEmacs. - * mh-acros.el, mh-comp.el, mh-e.el, mh-folder.el, mh-letter.el: + * mh-acros.el, mh-comp.el, mh-e.el, mh-folder.el, mh-letter.el: * mh-mime.el, mh-search.el, mh-seq.el: Shush XEmacs compiler in mh-do-in-xemacs block. @@ -107,7 +107,7 @@ * mh-letter.el (mh-letter-mode-map, mh-letter-complete) (mh-complete-word): Remove FIXME comments since these functions - are still needed in other Emacsen. However, they can probably + are still needed in other Emacsen. However, they can probably stand to be generalized like completion-at-point. (mh-letter-complete-or-space): Remove unused variable. @@ -173,7 +173,7 @@ 2010-05-14 Peter S Galbraith * mh-mime.el (mh-decode-message-subject): New function to decode - RFC2047 encoded Subject lines. Used for reply drafts. + RFC2047 encoded Subject lines. Used for reply drafts. * mh-comp.el (mh-compose-and-send-mail): Call `mh-decode-message-subject' on (reply or forward) message drafts. === modified file 'lisp/org/ChangeLog' --- lisp/org/ChangeLog 2012-01-19 07:21:25 +0000 +++ lisp/org/ChangeLog 2012-01-31 16:15:03 +0000 @@ -924,8 +924,8 @@ 2012-01-03 Matt Lundin - * org-agenda.el: (org-class): Fix holidays symbol in - org-class. This was resulting in an "Bad sexp..." warning. + * org-agenda.el (org-class): Fix holidays symbol in org-class. + This was resulting in an "Bad sexp..." warning. 2012-01-03 Carsten Dominik @@ -968,13 +968,13 @@ 2012-01-03 Eric Schulte - * ob-sql.el (org-babel-header-arg-names:sql): Sql specific header + * ob-sql.el (org-babel-header-arg-names:sql): SQL specific header argument names which should be inherited. 2012-01-03 Nicolas Goaziou - * org.el (org-in-block-p): Return matched name of block, if - any. It can be useful when a list of block names is provided as + * org.el (org-in-block-p): Return matched name of block, if any. + It can be useful when a list of block names is provided as an argument. 2012-01-03 Nicolas Goaziou @@ -1038,10 +1038,10 @@ * org-exp.el (org-export-protect-quoted-subtrees): More accurate regexp. Also use new regexp to match generic headlines. - * org-html.el (org-export-as-html): More accurate regexp. Also - use new regexp to match generic headlines. + * org-html.el (org-export-as-html): More accurate regexp. + Also use new regexp to match generic headlines. - * org-mouse.el (org-mouse-match-todo-keyword): Removed unused + * org-mouse.el (org-mouse-match-todo-keyword): Remove unused and now erroneous function. * org.el (org-heading-regexp, org-heading-keyword-regexp-format): @@ -1071,8 +1071,8 @@ 2012-01-03 David Maus - * org.el (org-loop-over-headlines-in-active-region): New - customization variable. Loop over headlines in active region. + * org.el (org-loop-over-headlines-in-active-region): + New customization variable. Loop over headlines in active region. (org-schedule, org-deadline): Apply to headlines in region depending on new customization variable. @@ -1092,8 +1092,8 @@ 2012-01-03 Bastien Guerry - * org.el (org-format-agenda-item, org-scan-tags): Rename - `org-format-agenda-item' to `org-agenda-format-item'. + * org.el (org-format-agenda-item, org-scan-tags): + Rename `org-format-agenda-item' to `org-agenda-format-item'. 2012-01-03 Bastien Guerry === modified file 'lisp/url/ChangeLog' --- lisp/url/ChangeLog 2012-01-19 07:21:25 +0000 +++ lisp/url/ChangeLog 2012-01-31 16:15:03 +0000 @@ -86,16 +86,15 @@ 2011-05-02 Lars Magne Ingebrigtsen * url-queue.el: New file. - (url-queue-run-queue): Pick the first waiting job, and not the - last. + (url-queue-run-queue): Pick the first waiting job, and not the last. (url-queue-parallel-processes): Lower the concurrency level, since Emacs doesn't seem to like too many async processes. (url-queue-prune-old-entries): Fix up the pruning code. 2011-04-16 Lars Magne Ingebrigtsen - * url-http.el (url-http-wait-for-headers-change-function): Protect - against malformed headerless responses from servers. + * url-http.el (url-http-wait-for-headers-change-function): + Protect against malformed headerless responses from servers. 2011-04-02 Chong Yidong @@ -123,9 +122,9 @@ 2011-02-03 Lars Ingebrigtsen - * url-http.el (url-http-wait-for-headers-change-function): Don't - move point if the callback function has moved changed/killed the - process buffer. + * url-http.el (url-http-wait-for-headers-change-function): + Don't move point if the callback function has moved/changed/killed + the process buffer. 2010-12-16 Miles Bader @@ -198,8 +197,8 @@ 2010-10-01 Lars Magne Ingebrigtsen - * url-cookie.el (url-cookie-handle-set-cookie): Use - url-lazy-message for the cookie warning, which isn't very interesting. + * url-cookie.el (url-cookie-handle-set-cookie): Use url-lazy-message + for the cookie warning, which isn't very interesting. * url-http.el (url-http-async-sentinel): Check that the buffer is still alive before switching to it. @@ -265,13 +264,13 @@ 2010-07-01 Mark A. Hershberger * url-http.el (url-http-create-request): Add a CRLF on the end so - that POSTs with content to https urls work. + that POSTs with content to https URLs work. See 2010-06-22 Mark A. Hershberger * url-parse.el (url-user-for-url, url-password-for-url): - Convenience functions that get usernames and passwords for urls + Convenience functions that get usernames and passwords for URLs from auth-source functions. 2010-06-12 Štěpán Němec (tiny change) === modified file 'msdos/ChangeLog' --- msdos/ChangeLog 2012-01-19 07:21:25 +0000 +++ msdos/ChangeLog 2012-01-31 16:15:03 +0000 @@ -642,7 +642,7 @@ b-emacs.exe to 3072K. * mainmake.v2 (emacs lispref lispintro): Chdir under doc/. - (emacs): Renamed from `man', to reflect changes in doc directory + (emacs): Rename from `man', to reflect changes in doc directory structure. All callers changed. (clean mostlyclean distclean maintainer-clean extraclean): Chdir into doc/ for manuals. Add misc subdirectory. @@ -1097,7 +1097,7 @@ 1996-08-04 Richard Stallman - * is_exec.c: Renamed from is-exec.c. + * is_exec.c: Rename from is-exec.c. 1996-07-27 Richard Stallman @@ -1132,7 +1132,7 @@ * mainmake.v2 (src): Create a file with sed commands instead of using a long sed command line (some versions of Sed don't handle that). - (gdb): Merged back into src, undoing April 13 change. + (gdb): Merge back into src, undoing April 13 change. (install): Do use if statements, but not a loop. 1996-04-13 Richard Stallman === modified file 'nextstep/ChangeLog' --- nextstep/ChangeLog 2012-01-19 07:21:25 +0000 +++ nextstep/ChangeLog 2012-01-31 16:15:03 +0000 @@ -99,8 +99,8 @@ 2009-02-01 Adrian Robert - * Cocoa/Emacs.base/Contents/Resources/preferences.nib: Remove - cursor blink slider, add confirm quit checkbox. + * Cocoa/Emacs.base/Contents/Resources/preferences.nib: + Remove cursor blink slider, add confirm quit checkbox. 2009-01-05 Glenn Morris === modified file 'nt/ChangeLog' --- nt/ChangeLog 2012-01-19 07:21:25 +0000 +++ nt/ChangeLog 2012-01-31 16:15:03 +0000 @@ -4,8 +4,8 @@ (UINT64_MAX) [_WIN64]: Fix definition. (uintmax_t, intmax_t): Fix definitions. - * inc/inttypes.h (strtoumax, strtoimax) [!__MINGW32__]: Provide - correct definitions. + * inc/inttypes.h (strtoumax, strtoimax) [!__MINGW32__]: + Provide correct definitions. * config.nt (HAVE_DECL_STRTOLL): Define. (va_copy) [_WIN64]: Provide a better definition. === modified file 'src/ChangeLog' --- src/ChangeLog 2012-01-31 03:33:16 +0000 +++ src/ChangeLog 2012-01-31 16:15:03 +0000 @@ -14,7 +14,6 @@ 2012-01-28 Chong Yidong - * minibuf.c (syms_of_minibuf): Doc fix (Bug#10550). 2012-01-26 Chong Yidong @@ -2369,7 +2368,7 @@ Remove unreachable code. (read_hex, load_charset_map_from_file): Check for integer overflow. - * xterm.c: don't go over XClientMessageEvent limit + * xterm.c: Don't go over XClientMessageEvent limit. (scroll_bar_windows_size): Now ptrdiff_t, as we prefer signed. (x_send_scroll_bar_event): Likewise. Check that the size does not exceed limits imposed by XClientMessageEvent, as well as the usual @@ -5660,7 +5659,7 @@ * ccl.c (ccl_driver): Redo slightly to avoid the need for 'unsigned'. - ccl: add integer overflow checks + ccl: Add integer overflow checks. * ccl.c (CCL_CODE_MAX, GET_CCL_RANGE, GET_CCL_CODE, GET_CCL_INT): (IN_INT_RANGE): New macros. (ccl_driver): Use them to check for integer overflow when === modified file 'test/ChangeLog' --- test/ChangeLog 2012-01-29 12:28:20 +0000 +++ test/ChangeLog 2012-01-31 16:15:03 +0000 @@ -7,7 +7,7 @@ * automated/compile-tests.el (compile-tests--test-regexps-data): Increase column numbers by one to reflect change in how - compilation-message is recorded (Bug#10172). + compilation-message is recorded (Bug#10172). 2011-11-22 Glenn Morris @@ -26,7 +26,7 @@ 2011-10-30 Ulf Jasper * automated/newsticker-tests.el - (newsticker--group-manage-orphan-feeds): Removed fsetting of + (newsticker--group-manage-orphan-feeds): Remove fsetting of newsticker--treeview-tree-update. 2011-10-29 Ulf Jasper @@ -63,7 +63,7 @@ (icalendar--format-ical-event) (icalendar--parse-summary-and-rest) (icalendar-tests--do-test-import) - (icalendar-tests--do-test-cycle) : Changed argument order of + (icalendar-tests--do-test-cycle): Change argument order of string= to EXPECTED ACTUAL. (icalendar--import-format-sample) (icalendar--format-ical-event) @@ -71,7 +71,7 @@ (icalendar-import-rrule) (icalendar-import-duration) (icalendar-import-bug-6766) - (icalendar-real-world): Adjusted to string= instead of + (icalendar-real-world): Adjust to string= instead of icalendar-tests--compare-strings. (icalendar-import-multiple-vcalendars): New. @@ -258,8 +258,8 @@ 2010-02-19 Ulf Jasper * icalendar-testsuite.el - (icalendar-testsuite--run-function-tests): Added new tests. - (icalendar-testsuite--test-diarytime-to-isotime): Added another + (icalendar-testsuite--run-function-tests): Add new tests. + (icalendar-testsuite--test-diarytime-to-isotime): Add another testcase. (icalendar-testsuite--test-convert-ordinary-to-ical): New. (icalendar-testsuite--test-convert-weekly-to-ical): New. @@ -284,14 +284,14 @@ 2009-12-18 Ulf Jasper * icalendar-testsuite.el - (icalendar-testsuite--run-function-tests): Added + (icalendar-testsuite--run-function-tests): Add icalendar-testsuite--test-parse-vtimezone. (icalendar-testsuite--test-parse-vtimezone): New. (icalendar-testsuite--do-test-cycle): Doc changes. - (icalendar-testsuite--run-real-world-tests): Removed trailing + (icalendar-testsuite--run-real-world-tests): Remove trailing whitespace -- see change of icalendar--add-diary-entry in icalendar.el. - (icalendar-testsuite--run-cycle-tests): Re-enabled all tests. + (icalendar-testsuite--run-cycle-tests): Re-enable all tests. 2009-09-30 Glenn Morris @@ -312,12 +312,12 @@ 2009-01-25 Ulf Jasper * icalendar-testsuite.el - (icalendar-testsuite--run-function-tests): Added - icalendar-testsuite--test-diarytime-to-isotime. - (icalendar-testsuite--test-parse-summary-and-rest): Adjusted to + (icalendar-testsuite--run-function-tests): + Add icalendar-testsuite--test-diarytime-to-isotime. + (icalendar-testsuite--test-parse-summary-and-rest): Adjust to recent icalendar fixes. (icalendar-testsuite--test-diarytime-to-isotime): New. - (icalendar-testsuite--test-create-uid): Adjusted to recent + (icalendar-testsuite--test-create-uid): Adjust to recent icalendar changes. 2008-11-30 Shigeru Fukaya ------------------------------------------------------------ revno: 107031 committer: Glenn Morris branch nick: trunk timestamp: Tue 2012-01-31 06:17:47 -0500 message: Auto-commit of generated files. diff: === modified file 'autogen/configure' --- autogen/configure 2012-01-30 11:17:52 +0000 +++ autogen/configure 2012-01-31 11:17:47 +0000 @@ -12190,6 +12190,14 @@ CPPFLAGS=$OLD_CPPFLAGS fi fi + ac_fn_c_check_header_mongrel "$LINENO" "Xm/BulletinB.h" "ac_cv_header_Xm_BulletinB_h" "$ac_includes_default" +if test "x$ac_cv_header_Xm_BulletinB_h" = x""yes; then : + +else + as_fn_error "Motif toolkit requested but requirements not found." "$LINENO" 5 +fi + + fi @@ -12201,7 +12209,7 @@ HAVE_XAW3D=no USE_TOOLKIT_SCROLL_BARS=yes - elif test "${HAVE_XAW3D}" = "yes"; then + elif test "${HAVE_XAW3D}" = "yes" || test "${USE_X_TOOLKIT}" = "LUCID"; then $as_echo "#define USE_TOOLKIT_SCROLL_BARS 1" >>confdefs.h USE_TOOLKIT_SCROLL_BARS=yes ------------------------------------------------------------ revno: 107030 committer: Chong Yidong branch nick: trunk timestamp: Tue 2012-01-31 16:38:58 +0800 message: Fix menu-set-font interaction with Custom themes. In particular, prevent it from setting non-font-related attributes like the foreground and background color. This requires a bugfix to face-spec-reset-face to make "resetting" the default face work. * lisp/faces.el (face-spec-reset-face): Don't apply unspecified attribute values to the default face. * lisp/frame.el (set-frame-font): New arg ALL-FRAMES. * lisp/menu-bar.el (menu-set-font): Use set-frame-font. diff: === modified file 'lisp/ChangeLog' --- lisp/ChangeLog 2012-01-31 04:50:04 +0000 +++ lisp/ChangeLog 2012-01-31 08:38:58 +0000 @@ -1,3 +1,12 @@ +2012-01-31 Chong Yidong + + * frame.el (set-frame-font): New arg ALL-FRAMES. + + * menu-bar.el (menu-set-font): Use set-frame-font. + + * faces.el (face-spec-reset-face): Don't apply unspecified + attribute values to the default face. + 2012-01-31 Juanma Barranquero * progmodes/cwarn.el (cwarn): Remove dead link. === modified file 'lisp/faces.el' --- lisp/faces.el 2012-01-19 07:21:25 +0000 +++ lisp/faces.el 2012-01-31 08:38:58 +0000 @@ -1513,11 +1513,12 @@ (defun face-spec-reset-face (face &optional frame) "Reset all attributes of FACE on FRAME to unspecified." - (let (reset-args) - (dolist (attr-and-name face-attribute-name-alist) - (push 'unspecified reset-args) - (push (car attr-and-name) reset-args)) - (apply 'set-face-attribute face frame reset-args))) + (unless (eq face 'default) + (let (reset-args) + (dolist (attr-and-name face-attribute-name-alist) + (push 'unspecified reset-args) + (push (car attr-and-name) reset-args)) + (apply 'set-face-attribute face frame reset-args)))) (defun face-spec-set (face spec &optional for-defface) "Set FACE's face spec, which controls its appearance, to SPEC. === modified file 'lisp/frame.el' --- lisp/frame.el 2012-01-29 14:22:51 +0000 +++ lisp/frame.el 2012-01-31 08:38:58 +0000 @@ -1052,15 +1052,22 @@ (pattern &optional face frame maximum width)) (define-obsolete-function-alias 'set-default-font 'set-frame-font "23.1") -(defun set-frame-font (font-name &optional keep-size) - "Set the font of the selected frame to FONT-NAME. -When called interactively, prompt for the name of the font to use. -To get the frame's current default font, use `frame-parameters'. - -The default behavior is to keep the numbers of lines and columns in -the frame, thus may change its pixel size. If optional KEEP-SIZE is -non-nil (interactively, prefix argument) the current frame size (in -pixels) is kept by adjusting the numbers of the lines and columns." + +(defun set-frame-font (font-name &optional keep-size all-frames) + "Set the default font to FONT-NAME. +When called interactively, prompt for the name of a font, and use +that font on the selected frame. + +If KEEP-SIZE is nil, keep the number of frame lines and columns +fixed. If KEEP-SIZE is non-nil (or with a prefix argument), try +to keep the current frame size fixed (in pixels) by adjusting the +number of lines and columns. + +If ALL-FRAMES is nil, apply the font to the selected frame only. +If ALL-FRAMES is non-nil, apply the font to all frames; in +addition, alter the user's Customization settings as though the +font-related attributes of the `default' face had been \"set in +this session\", so that the font is applied to future frames." (interactive (let* ((completion-ignore-case t) (font (completing-read "Font name: " @@ -1069,19 +1076,52 @@ (x-list-fonts "*" nil (selected-frame)) nil nil nil nil (frame-parameter nil 'font)))) - (list font current-prefix-arg))) - (let (fht fwd) - (if keep-size - (setq fht (* (frame-parameter nil 'height) (frame-char-height)) - fwd (* (frame-parameter nil 'width) (frame-char-width)))) - (modify-frame-parameters (selected-frame) - (list (cons 'font font-name))) - (if keep-size - (modify-frame-parameters - (selected-frame) - (list (cons 'height (round fht (frame-char-height))) - (cons 'width (round fwd (frame-char-width))))))) - (run-hooks 'after-setting-font-hook 'after-setting-font-hooks)) + (list font current-prefix-arg nil))) + (when (stringp font-name) + (let* ((this-frame (selected-frame)) + (frames (if all-frames (frame-list) (list this-frame))) + height width) + (dolist (f frames) + (when (display-multi-font-p f) + (if keep-size + (setq height (* (frame-parameter f 'height) + (frame-char-height f)) + width (* (frame-parameter f 'width) + (frame-char-width f)))) + ;; When set-face-attribute is called for :font, Emacs + ;; guesses the best font according to other face attributes + ;; (:width, :weight, etc.) so reset them too (Bug#2476). + (set-face-attribute 'default f + :width 'normal :weight 'normal + :slant 'normal :font font-name) + (if keep-size + (modify-frame-parameters + f + (list (cons 'height (round height (frame-char-height f))) + (cons 'width (round width (frame-char-width f)))))))) + (when all-frames + ;; Alter the user's Custom setting of the `default' face, but + ;; only for font-related attributes. + (let ((specs (cadr (assq 'user (get 'default 'theme-face)))) + (attrs '(:family :foundry :slant :weight :height :width)) + (new-specs nil)) + (if (null specs) (setq specs '((t nil)))) + (dolist (spec specs) + ;; Each SPEC has the form (DISPLAY ATTRIBUTE-PLIST) + (let ((display (nth 0 spec)) + (plist (copy-tree (nth 1 spec)))) + ;; Alter only DISPLAY conditions matching this frame. + (when (or (memq display '(t default)) + (face-spec-set-match-display display this-frame)) + (dolist (attr attrs) + (setq plist (plist-put plist attr + (face-attribute 'default attr))))) + (push (list display plist) new-specs))) + (setq new-specs (nreverse new-specs)) + (put 'default 'customized-face new-specs) + (custom-push-theme 'theme-face 'default 'user 'set new-specs) + (put 'default 'face-modified nil)))) + (run-hooks 'after-setting-font-hook 'after-setting-font-hooks))) (defun set-frame-parameter (frame parameter value) "Set frame parameter PARAMETER to VALUE on FRAME. === modified file 'lisp/menu-bar.el' --- lisp/menu-bar.el 2012-01-19 07:21:25 +0000 +++ lisp/menu-bar.el 2012-01-31 08:38:58 +0000 @@ -683,29 +683,10 @@ (defun menu-set-font () "Interactively select a font and make it the default." (interactive) - (let ((font (if (fboundp 'x-select-font) - (x-select-font) - (mouse-select-font))) - spec) - (when font - ;; Be careful here: when set-face-attribute is called for the - ;; :font attribute, Emacs tries to guess the best matching font - ;; by examining the other face attributes (Bug#2476). - (set-face-attribute 'default (selected-frame) - :width 'normal - :weight 'normal - :slant 'normal - :font font) - (let ((font-object (face-attribute 'default :font))) - (dolist (f (frame-list)) - (and (not (eq f (selected-frame))) - (display-graphic-p f) - (set-face-attribute 'default f :font font-object))) - (set-face-attribute 'default t :font font-object)) - (setq spec (list (list t (face-attr-construct 'default)))) - (put 'default 'customized-face spec) - (custom-push-theme 'theme-face 'default 'user 'set spec) - (put 'default 'face-modified nil)))) + (set-frame-font (if (fboundp 'x-select-font) + (x-select-font) + (mouse-select-font)) + nil t)) (defun menu-bar-options-save () "Save current values of Options menu items using Custom." ------------------------------------------------------------ revno: 107029 fixes bug(s): http://debbugs.gnu.org/10657 committer: Chong Yidong branch nick: trunk timestamp: Tue 2012-01-31 14:51:33 +0800 message: Minor tweaks to the Lisp manual. * syntax.texi (Parsing Expressions): Clarify intro. (Parser State): Remove unnecessary statement (Bug#10661). * eval.texi (Intro Eval): Add footnote about "sexp" terminology. diff: === modified file 'doc/lispref/ChangeLog' --- doc/lispref/ChangeLog 2012-01-31 05:03:09 +0000 +++ doc/lispref/ChangeLog 2012-01-31 06:51:33 +0000 @@ -1,3 +1,10 @@ +2012-01-31 Chong Yidong + + * syntax.texi (Parsing Expressions): Clarify intro (Bug#10657). + (Parser State): Remove unnecessary statement (Bug#10661). + + * eval.texi (Intro Eval): Add footnote about "sexp" terminology. + 2012-01-31 Glenn Morris * modes.texi (Defining Minor Modes): === modified file 'doc/lispref/eval.texi' --- doc/lispref/eval.texi 2012-01-23 04:23:50 +0000 +++ doc/lispref/eval.texi 2012-01-31 06:51:33 +0000 @@ -39,12 +39,15 @@ @cindex form @cindex expression - A Lisp object that is intended for evaluation is called an -@dfn{expression} or a @dfn{form}. The fact that forms are data -objects and not merely text is one of the fundamental differences -between Lisp-like languages and typical programming languages. Any -object can be evaluated, but in practice only numbers, symbols, lists -and strings are evaluated very often. +@cindex S-expression + A Lisp object that is intended for evaluation is called a @dfn{form} +or @dfn{expression}@footnote{It is sometimes also referred to as an +@dfn{S-expression} or @dfn{sexp}, but we generally do not use this +terminology in this manual.}. The fact that forms are data objects +and not merely text is one of the fundamental differences between +Lisp-like languages and typical programming languages. Any object can +be evaluated, but in practice only numbers, symbols, lists and strings +are evaluated very often. In subsequent sections, we will describe the details of what evaluation means for each kind of form. @@ -96,12 +99,12 @@ @node Forms @section Kinds of Forms - A Lisp object that is intended to be evaluated is called a @dfn{form}. -How Emacs evaluates a form depends on its data type. Emacs has three -different kinds of form that are evaluated differently: symbols, lists, -and ``all other types.'' This section describes all three kinds, one by -one, starting with the ``all other types'' which are self-evaluating -forms. + A Lisp object that is intended to be evaluated is called a +@dfn{form} (or an @dfn{expression}). How Emacs evaluates a form +depends on its data type. Emacs has three different kinds of form +that are evaluated differently: symbols, lists, and ``all other +types.'' This section describes all three kinds, one by one, starting +with the ``all other types'' which are self-evaluating forms. @menu * Self-Evaluating Forms:: Forms that evaluate to themselves. === modified file 'doc/lispref/syntax.texi' --- doc/lispref/syntax.texi 2012-01-29 07:35:58 +0000 +++ doc/lispref/syntax.texi 2012-01-31 06:51:33 +0000 @@ -606,11 +606,13 @@ @section Parsing Expressions This section describes functions for parsing and scanning balanced -expressions, also known as @dfn{sexps}. Basically, a sexp is either a -balanced parenthetical grouping, a string, or a symbol name (a -sequence of characters whose syntax is either word constituent or -symbol constituent). However, characters whose syntax is expression -prefix are treated as part of the sexp if they appear next to it. +expressions. We will refer to such expressions as @dfn{sexps}, +following the terminology of Lisp, even though these functions can act +on languages other than Lisp. Basically, a sexp is either a balanced +parenthetical grouping, a string, or a ``symbol'' (i.e.@: a sequence +of characters whose syntax is either word constituent or symbol +constituent). However, characters whose syntax is expression prefix +are treated as part of the sexp if they appear next to it. The syntax table controls the interpretation of characters, so these functions can be used for Lisp expressions when in Lisp mode and for C @@ -830,10 +832,6 @@ arrived at a top level position. @end defun - We have provided this access function rather than document how the -data is represented in the state, because we plan to change the -representation in the future. - @node Low-Level Parsing @subsection Low-Level Parsing