------------------------------------------------------------ revno: 118234 committer: Glenn Morris branch nick: trunk timestamp: Wed 2014-10-29 22:39:21 -0700 message: Update some version numbers for trunk version change diff: === modified file 'lisp/obsolete/gulp.el' --- lisp/obsolete/gulp.el 2014-03-26 01:41:13 +0000 +++ lisp/obsolete/gulp.el 2014-10-30 05:39:21 +0000 @@ -5,7 +5,7 @@ ;; Author: Sam Shteingold ;; Maintainer: emacs-devel@gnu.org ;; Keywords: maint -;; Obsolete-since: 24.5 +;; Obsolete-since: 25.1 ;; This file is part of GNU Emacs. === modified file 'lisp/progmodes/ps-mode.el' --- lisp/progmodes/ps-mode.el 2014-04-28 04:40:41 +0000 +++ lisp/progmodes/ps-mode.el 2014-10-30 05:39:21 +0000 @@ -61,7 +61,7 @@ ;; User variables. -(make-obsolete-variable 'ps-mode-auto-indent 'electric-indent-mode "24.5") +(make-obsolete-variable 'ps-mode-auto-indent 'electric-indent-mode "25.1") (defcustom ps-mode-tab 4 "Number of spaces to use when indenting." ------------------------------------------------------------ revno: 118233 committer: Glenn Morris branch nick: trunk timestamp: Wed 2014-10-29 22:23:50 -0700 message: * NEWS: Remove items backported to NEWS.24 diff: === modified file 'etc/NEWS' --- etc/NEWS 2014-10-29 00:37:37 +0000 +++ etc/NEWS 2014-10-30 05:23:50 +0000 @@ -64,9 +64,6 @@ ** New var `truncate-string-ellipsis' to choose how to indicate truncation. ---- -** The default value of `history-length' has increased to 100. - +++ ** The new variable `term-file-aliases' replaces some files from lisp/term. The function `tty-run-terminal-initialization' consults this variable @@ -271,14 +268,6 @@ --- *** gulp.el ---- -*** crisp.el, tpu-edt.el, ws-mode.el -These emulations of old editors are believed to be no longer relevant - - contact emacs-devel@gnu.org if you disagree. - ---- -*** vi.el, vip.el (try M-x viper instead) - * New Modes and Packages in Emacs 25.1 @@ -315,9 +304,6 @@ *** x-get-selection-value is renamed to gui-get-primary-selection. *** x-set-selection is renamed to gui-set-selection -** call-process-shell-command and process-file-shell-command -don't take "&rest args" any more. - ** New function `alist-get', which is also a valid place (aka lvalue). ** New function `funcall-interactively', which works like `funcall' ------------------------------------------------------------ revno: 118232 [merge] committer: Glenn Morris branch nick: trunk timestamp: Wed 2014-10-29 22:15:28 -0700 message: Merge from emacs-24; up to 117634 diff: === modified file 'doc/emacs/ChangeLog' --- doc/emacs/ChangeLog 2014-10-22 13:30:16 +0000 +++ doc/emacs/ChangeLog 2014-10-30 05:15:28 +0000 @@ -1,3 +1,20 @@ +2014-10-30 Eli Zaretskii + + * frames.texi (Scroll Bars): Improve indexing of faces. + + * killing.texi (Secondary Selection): Improve indexing of faces. + + * search.texi (Basic Isearch, Query Replace): Improve indexing of faces. + + * display.texi (Standard Faces, Text Display) + (Useless Whitespace): Improve indexing of faces. + + * frames.texi (Frame Commands): Document and index + 'frame-resize-pixelwise'. + + * windows.texi (Split Window): Document and index + 'window-resize-pixelwise'. + 2014-10-22 Tassilo Horn * misc.texi (Document View): Adapt to latest doc-view changes wrt === modified file 'doc/emacs/display.texi' --- doc/emacs/display.texi 2014-10-04 06:35:55 +0000 +++ doc/emacs/display.texi 2014-10-24 09:13:01 +0000 @@ -578,6 +578,7 @@ @node Standard Faces @section Standard Faces +@cindex standard faces Here are the standard faces for specifying text appearance. You can apply them to specific text when you want the effects they produce. @@ -598,8 +599,10 @@ This face forces use of a fixed-width font. It's reasonable to customize this face to use a different fixed-width font, if you like, but you should not make it a variable-width font. +@cindex variable-pitch face @item variable-pitch This face forces use of a variable-width font. +@cindex shadow face @item shadow This face is used for making the text less noticeable than the surrounding ordinary text. Usually this can be achieved by using shades of gray in @@ -647,25 +650,34 @@ @table @code @item mode-line +@cindex mode-line face +@cindex faces for mode lines This face is used for the mode line of the currently selected window, and for menu bars when toolkit menus are not used. By default, it's drawn with shadows for a ``raised'' effect on graphical displays, and drawn as the inverse of the default face on non-windowed terminals. @item mode-line-inactive +@cindex mode-line-inactive face Like @code{mode-line}, but used for mode lines of the windows other than the selected one (if @code{mode-line-in-non-selected-windows} is non-@code{nil}). This face inherits from @code{mode-line}, so changes in that face affect mode lines in all windows. @item mode-line-highlight -Like @code{highlight}, but used for portions of text on mode lines. +@cindex mode-line-highlight face +Like @code{highlight}, but used for mouse-sensitive portions of text +on mode lines. Such portions of text typically pop up tooltips +(@pxref{Tooltips}) when the mouse pointer hovers above them. @item mode-line-buffer-id +@cindex mode-line-buffer-id face This face is used for buffer identification parts in the mode line. @item header-line +@cindex header-line face Similar to @code{mode-line} for a window's header line, which appears at the top of a window just as the mode line appears at the bottom. Most windows do not have a header line---only some special modes, such Info mode, create one. @item vertical-border +@cindex vertical-border face This face is used for the vertical divider between windows on text terminals. @item minibuffer-prompt @@ -1110,6 +1122,7 @@ cases, this @dfn{trailing whitespace} has no effect, but sometimes it can be a nuisance. +@cindex trailing-whitespace face You can make trailing whitespace at the end of a line visible by setting the buffer-local variable @code{show-trailing-whitespace} to @code{t}. Then Emacs displays trailing whitespace, using the face @@ -1418,6 +1431,8 @@ @cindex non-breaking space @cindex non-breaking hyphen @cindex soft hyphen +@cindex escape-glyph face +@cindex nobreak-space face Some non-@acronym{ASCII} characters have the same appearance as an @acronym{ASCII} space or hyphen (minus) character. Such characters can cause problems if they are entered into a buffer without your === modified file 'doc/emacs/frames.texi' --- doc/emacs/frames.texi 2014-10-04 08:20:24 +0000 +++ doc/emacs/frames.texi 2014-10-30 05:15:28 +0000 @@ -376,6 +376,9 @@ between two side-by-side mode lines, you can move the vertical boundary to the left or right. + Note that resizing windows is affected by the value of +@code{window-resize-pixelwise}, see @ref{Split Window}. + @node Creating Frames @section Creating Frames @cindex creating frames @@ -469,9 +472,13 @@ Emacs itself.) @end table +@vindex frame-resize-pixelwise Note that with some window managers you may have to customize the variable @code{frame-resize-pixelwise} to a non-@code{nil} value in -order to make a frame truly ``maximized'' or ``fullscreen''. +order to make a frame truly ``maximized'' or ``fullscreen''. This +variable, when set to a non-@code{nil} value, in general allows +resizing frames at pixel resolution, rather than in integral multiples +of lines and columns. The @kbd{C-x 5 0} (@code{delete-frame}) command deletes the selected frame. However, it will refuse to delete the last frame in an Emacs @@ -955,6 +962,10 @@ bottom when the end of the buffer is shown. You can not over-scroll when the entire buffer is visible. +@cindex scroll-bar face + The visual appearance of the scroll bars is controlled by the +@code{scroll-bar} face. + @cindex Horizontal Scroll Bar @cindex Horizontal Scroll Bar mode On graphical displays with toolkit support, Emacs may also supply a @@ -987,7 +998,6 @@ scroll bar height, change the @code{scroll-bar-height} frame parameter (@pxref{Frame Parameters,,, elisp, The Emacs Lisp Reference Manual}). - @node Drag and Drop @section Drag and Drop @cindex drag and drop === modified file 'doc/emacs/killing.texi' --- doc/emacs/killing.texi 2014-10-04 02:36:49 +0000 +++ doc/emacs/killing.texi 2014-10-24 09:13:01 +0000 @@ -588,6 +588,7 @@ @table @kbd @findex mouse-set-secondary @kindex M-Drag-Mouse-1 +@cindex secondary-selection face @item M-Drag-Mouse-1 Set the secondary selection, with one end at the place where you press down the button, and the other end at the place where you release it === modified file 'doc/emacs/search.texi' --- doc/emacs/search.texi 2014-10-04 16:46:21 +0000 +++ doc/emacs/search.texi 2014-10-24 09:13:01 +0000 @@ -86,6 +86,7 @@ the cursor moves to just after the first @samp{FOO}. @cindex faces for highlighting search matches +@cindex isearch face At each step, Emacs highlights the @dfn{current match}---the buffer text that matches the search string---using the @code{isearch} face (@pxref{Faces}). The current search string is also displayed in the @@ -1280,6 +1281,8 @@ like @code{query-replace}. @cindex faces for highlighting query replace +@cindex query-replace face +@cindex lazy-highlight face These commands highlight the current match using the face @code{query-replace}. They highlight other matches using @code{lazy-highlight} just like incremental search (@pxref{Incremental === modified file 'doc/emacs/windows.texi' --- doc/emacs/windows.texi 2014-01-01 07:43:34 +0000 +++ doc/emacs/windows.texi 2014-10-23 16:54:25 +0000 @@ -134,6 +134,18 @@ divider where you click (this feature does not work when Emacs uses GTK+ scroll bars). +@vindex window-resize-pixelwise + By default, when you split a window, Emacs gives each of the +resulting windows dimensions that are an integral multiple of the +default font size of the frame. That might subdivide the screen +estate unevenly between the resulting windows. If you set the +variable @code{window-resize-pixelwise} to a non-@code{nil} value, +Emacs will give each window the same number of pixels (give or take +one pixel if the initial dimension was an odd number of pixels). Note +that when a frame's pixel size is not a multiple of the frame's +character size, at least one window may get resized pixelwise even if +this option is @code{nil}. + @node Other Window @section Using Other Windows === modified file 'doc/misc/ChangeLog' --- doc/misc/ChangeLog 2014-10-29 01:42:51 +0000 +++ doc/misc/ChangeLog 2014-10-30 05:15:28 +0000 @@ -1,3 +1,12 @@ +2014-10-30 Glenn Morris + + * efaq.texi (Gnus does not work with NNTP): Remove; ancient. + +2014-10-30 Stefan Monnier + + * eieio.texi (Accessing Slots, CLOS compatibility): Adjust wording + since `setf' is in core rather than in CL nowadays. + 2014-10-29 Paul Eggert Simplify use of current-time and friends. === modified file 'doc/misc/efaq.texi' --- doc/misc/efaq.texi 2014-10-26 15:43:38 +0000 +++ doc/misc/efaq.texi 2014-10-30 05:15:28 +0000 @@ -4190,7 +4190,6 @@ * Replying to the sender of a message:: * Automatically starting a mail or news reader:: * Reading news with Emacs:: -* Gnus does not work with NNTP:: * Making Gnus faster:: * Catching up in all newsgroups:: @end menu @@ -4384,27 +4383,6 @@ Questions,, the Gnus FAQ, gnus, The Gnus Manual}. -@node Gnus does not work with NNTP -@section Why doesn't Gnus work via NNTP? -@cindex Gnus and NNTP -@cindex NNTP, Gnus fails to work with - -There is a bug in NNTP version 1.5.10, such that when multiple requests -are sent to the NNTP server, the server only handles the first one -before blocking waiting for more input which never comes. NNTP version -1.5.11 claims to fix this. - -You can work around the bug inside Emacs like this: - -@lisp -(setq nntp-maximum-request 1) -@end lisp - -You can find out what version of NNTP your news server is running by -telnetting to the NNTP port (usually 119) on the news server machine -(i.e., @kbd{telnet server-machine 119}). The server should give its -version number in the welcome message. Type @kbd{quit} to get out. - @node Making Gnus faster @section How do I make Gnus faster? @cindex Faster, starting Gnus === modified file 'doc/misc/eieio.texi' --- doc/misc/eieio.texi 2014-06-10 02:20:31 +0000 +++ doc/misc/eieio.texi 2014-10-30 05:15:28 +0000 @@ -755,8 +755,8 @@ @defun set-slot-value object slot value @anchor{set-slot-value} -This is not a CLOS function, but is meant to mirror @code{slot-value} if -you don't want to use the cl package's @code{setf} function. This +This is not a CLOS function, but is the setter for @code{slot-value} +used by the @code{setf} macro. This function sets the value of @var{slot} from @var{object}. Unlike @code{oset}, the symbol for @var{slot} must be quoted. @end defun @@ -790,7 +790,7 @@ the instance named by the given slot-names as though they were variables. Within such a context the value of the slot can be specified by using its slot name, as if it were a lexically bound -variable. Both setf and setq can be used to set the value of the +variable. Both @code{setf} and @code{setq} can be used to set the value of the slot. @var{spec-list} is of a form similar to @dfn{let}. For example: @@ -1850,10 +1850,6 @@ in @eieio{} this function accepts replacement arguments. This permits subclasses to modify arguments as they are passed up the tree. If no arguments are given, the expected CLOS behavior is used. -@item setf -If the common-lisp subsystem is loaded, the setf parameters are also -loaded so the form @code{(setf (slot-value object slot) t)} should -work. @end table CLOS supports the @code{describe} command, but @eieio{} provides === modified file 'etc/DEBUG' --- etc/DEBUG 2014-07-26 13:40:53 +0000 +++ etc/DEBUG 2014-10-22 15:19:44 +0000 @@ -398,9 +398,13 @@ Don't assume Emacs is `hung'--it may instead be in an infinite loop. To find out which, make the problem happen under GDB and stop Emacs once it is not responding. (If Emacs is using X Windows directly, you -can stop Emacs by typing C-z at the GDB job.) Then try stepping with -`step'. If Emacs is hung, the `step' command won't return. If it is -looping, `step' will return. +can stop Emacs by typing C-z at the GDB job. On MS-Windows, run Emacs +as usual, and then attach GDB to it -- that will usually interrupt +whatever Emacs is doing and let you perform the steps described +below.) + +Then try stepping with `step'. If Emacs is hung, the `step' command +won't return. If it is looping, `step' will return. If this shows Emacs is hung in a system call, stop it again and examine the arguments of the call. If you report the bug, it is very @@ -420,10 +424,11 @@ the data being used in the loop and try to determine why the loop does not exit when it should. -You can also trying sending Emacs SIGUSR2, which, if `debug-on-event' -has its default value, will cause Emacs to attempt to break it out of -its current loop and into the Lisp debugger. This feature is useful -when a C-level debugger is not conveniently available. +On GNU and Unix systems, you can also trying sending Emacs SIGUSR2, +which, if `debug-on-event' has its default value, will cause Emacs to +attempt to break it out of its current loop and into the Lisp +debugger. This feature is useful when a C-level debugger is not +conveniently available. ** If certain operations in Emacs are slower than they used to be, here is some advice for how to find out why. === modified file 'etc/NEWS.24' --- etc/NEWS.24 2014-10-14 18:10:37 +0000 +++ etc/NEWS.24 2014-10-30 05:15:28 +0000 @@ -14,6 +14,37 @@ You can narrow news to a specific version by calling `view-emacs-news' with a prefix argument or by typing C-u C-h C-n. +Temporary note: ++++ indicates that all necessary documentation updates are complete. + (This means all relevant manuals in doc/ AND lisp doc-strings.) +--- means no change in the manuals is needed. +When you add a new item, use the appropriate mark if you are sure it applies, +otherwise leave it unmarked. + + +* Changes in Emacs 24.5 + +--- +** The default value of `history-length' has increased to 100. + + +* Changes in Specialized Modes and Packages in Emacs 24.5 + +** `call-process-shell-command' and `process-file-shell-command' +don't take "&rest args" any more. + +** Obsolete packages + +*** cc-compat.el + +--- +*** crisp.el, tpu-edt.el, ws-mode.el +These emulations of old editors are believed to be no longer relevant + - contact emacs-devel@gnu.org if you disagree. + +--- +*** vi.el, vip.el (try M-x viper instead) + * Installation Changes in Emacs 24.4 === modified file 'lisp/ChangeLog' --- lisp/ChangeLog 2014-10-29 17:40:26 +0000 +++ lisp/ChangeLog 2014-10-30 05:15:28 +0000 @@ -1,3 +1,27 @@ +2014-10-30 Stefan Monnier + + * progmodes/cc-defs.el (c--macroexpand-all): New function (bug#18845). + (c-lang-defconst): + * progmodes/cc-langs.el (c-make-init-lang-vars-fun): Use it. + +2014-10-30 Eli Zaretskii + + * progmodes/compile.el (compilation-start): + If compilation-scroll-output is non-nil, don't force window-start of + the compilation buffer to be at beginning of buffer. (Bug#18874) + + * startup.el (fancy-about-text): Read the entire tutorial, not + just its first 256 bytes. (Bug#18760) + +2014-10-30 Stefan Monnier + + * emacs-lisp/bytecomp.el: Require cl-extra (bug#18804). + * emacs-lisp/cl-extra.el: Add missing provide. + + * emacs-lisp/bytecomp.el (byte-compile-and-folded): Optimize case where + all args are copyable (bug#18767). + (=, <, >, <=, >=): Re-enable the optimization. + 2014-10-29 Glenn Morris * net/rcirc.el (rcirc-fill-column): Unbump :version. Mark :risky. === modified file 'lisp/emacs-lisp/bytecomp.el' --- lisp/emacs-lisp/bytecomp.el 2014-10-23 13:33:25 +0000 +++ lisp/emacs-lisp/bytecomp.el 2014-10-30 05:15:28 +0000 @@ -120,7 +120,11 @@ (require 'backquote) (require 'macroexp) (require 'cconv) -(eval-when-compile (require 'cl-lib)) + +;; During bootstrap, cl-loaddefs.el is not created yet, so loading cl-lib +;; doesn't setup autoloads for things like cl-every, which is why we have to +;; require cl-extra instead (bug#18804). +(require 'cl-extra) (or (fboundp 'defsubst) ;; This really ought to be loaded already! @@ -3283,11 +3287,11 @@ (byte-defop-compiler cons 2) (byte-defop-compiler aref 2) (byte-defop-compiler set 2) -(byte-defop-compiler (= byte-eqlsign) 2) ;; -and bug#18767 -(byte-defop-compiler (< byte-lss) 2) ;; -and bug#18767 -(byte-defop-compiler (> byte-gtr) 2) ;; -and bug#18767 -(byte-defop-compiler (<= byte-leq) 2) ;; -and bug#18767 -(byte-defop-compiler (>= byte-geq) 2) ;; -and bug#18767 +(byte-defop-compiler (= byte-eqlsign) 2-and) +(byte-defop-compiler (< byte-lss) 2-and) +(byte-defop-compiler (> byte-gtr) 2-and) +(byte-defop-compiler (<= byte-leq) 2-and) +(byte-defop-compiler (>= byte-geq) 2-and) (byte-defop-compiler get 2) (byte-defop-compiler nth 2) (byte-defop-compiler substring 2-3) @@ -3354,13 +3358,14 @@ (defun byte-compile-and-folded (form) "Compile calls to functions like `<='. These implicitly `and' together a bunch of two-arg bytecodes." - ;; FIXME: bug#18767 means we can't do it this way! (let ((l (length form))) (cond ((< l 3) (byte-compile-form `(progn ,(nth 1 form) t))) ((= l 3) (byte-compile-two-args form)) - (t (byte-compile-form `(and (,(car form) ,(nth 1 form) ,(nth 2 form)) - (,(car form) ,@(nthcdr 2 form)))))))) + ((cl-every #'macroexp-copyable-p (nthcdr 2 form)) + (byte-compile-form `(and (,(car form) ,(nth 1 form) ,(nth 2 form)) + (,(car form) ,@(nthcdr 2 form))))) + (t (byte-compile-normal-call form))))) (defun byte-compile-three-args (form) (if (not (= (length form) 4)) === modified file 'lisp/emacs-lisp/cl-extra.el' --- lisp/emacs-lisp/cl-extra.el 2014-10-08 22:05:48 +0000 +++ lisp/emacs-lisp/cl-extra.el 2014-10-30 05:15:28 +0000 @@ -720,4 +720,5 @@ ;; generated-autoload-file: "cl-loaddefs.el" ;; End: +(provide 'cl-extra) ;;; cl-extra.el ends here === modified file 'lisp/emulation/viper-util.el' --- lisp/emulation/viper-util.el 2014-01-01 07:43:34 +0000 +++ lisp/emulation/viper-util.el 2014-10-20 22:35:43 +0000 @@ -984,7 +984,7 @@ ;; macros, since it enables certain macros to be shared between X and TTY modes ;; by correctly mapping key sequences for Left/Right/... (on an ascii ;; terminal) into logical keys left, right, etc. -(defun viper-read-key () +(defun viper-read-key () ;; FIXME: Use `read-key'? (let ((overriding-local-map viper-overriding-map) (inhibit-quit t) help-char key) === modified file 'lisp/emulation/viper.el' --- lisp/emulation/viper.el 2014-06-29 02:33:50 +0000 +++ lisp/emulation/viper.el 2014-10-20 22:35:43 +0000 @@ -531,6 +531,7 @@ (if viper-mode () (setq viper-mode t) + ;; FIXME: Don't reload! (load-library "viper")) (if viper-first-time ; Important check. Prevents mix-up of startup @@ -887,6 +888,7 @@ ;; When viper-mode is executed in such a case, it will set the major mode ;; back to fundamental-mode. (if (eq (default-value 'major-mode) 'fundamental-mode) + ;; FIXME: We should use after-change-major-mode-hook instead! (setq-default major-mode 'viper-mode)) (viper-setup-ESC-to-escape t) @@ -936,6 +938,7 @@ (defadvice self-insert-command (around viper-self-insert-ad activate) "Ignore all self-inserting keys in the vi-state." + ;; FIXME: Use remapping? (if (and (eq viper-current-state 'vi-state) ;; Do not use called-interactively-p here. XEmacs does not have it ;; and interactive-p is just fine. === modified file 'lisp/erc/erc-track.el' --- lisp/erc/erc-track.el 2014-10-15 01:15:40 +0000 +++ lisp/erc/erc-track.el 2014-10-30 05:15:28 +0000 @@ -265,9 +265,7 @@ (erc-track-add-to-mode-line val)))) (defun erc-modified-channels-object (strings) - "Generate a new `erc-modified-channels-object' based on STRINGS. -If STRINGS is nil, we initialize `erc-modified-channels-object' to -an appropriate initial value for this flavor of Emacs." + "Generate a new `erc-modified-channels-object' based on STRINGS." (if strings (if (featurep 'xemacs) (let ((e-m-c-s '("["))) @@ -743,7 +741,7 @@ (defvar erc-modified-channels-update-inside nil "Variable to prevent running `erc-modified-channels-update' multiple times. Without it, you cannot debug `erc-modified-channels-display', -because the debugger also cases changes to the window-configuration.") +because the debugger also causes changes to the window-configuration.") (defun erc-modified-channels-update (&rest _args) "This function updates the information in `erc-modified-channels-alist' === modified file 'lisp/progmodes/cc-defs.el' --- lisp/progmodes/cc-defs.el 2014-10-04 04:03:49 +0000 +++ lisp/progmodes/cc-defs.el 2014-10-30 05:15:28 +0000 @@ -174,6 +174,10 @@ (put 'cc-eval-when-compile 'lisp-indent-hook 0)) +(eval-and-compile + (defalias 'c--macroexpand-all + (if (fboundp 'macroexpand-all) + 'macroexpand-all 'cl-macroexpand-all))) ;;; Macros. @@ -1841,7 +1845,7 @@ immediately, i.e. at the same time as the `c-lang-defconst' form itself is evaluated." ;; Evaluate at macro expansion time, i.e. in the - ;; `macroexpand-all' inside `c-lang-defconst'. + ;; `c--macroexpand-all' inside `c-lang-defconst'. (eval form)) (defmacro c-lang-defconst (name &rest args) @@ -1885,7 +1889,7 @@ (let* ((sym (intern (symbol-name name) c-lang-constants)) ;; Make `c-lang-const' expand to a straightforward call to - ;; `c-get-lang-constant' in `macroexpand-all' below. + ;; `c-get-lang-constant' in `c--macroexpand-all' below. ;; ;; (The default behavior, i.e. to expand to a call inside ;; `eval-when-compile' should be equivalent, since that macro @@ -1948,7 +1952,7 @@ ;; reason, but we also use this expansion handle ;; `c-lang-defconst-eval-immediately' and to register ;; dependencies on the `c-lang-const's in VAL.) - (setq val (macroexpand-all val)) + (setq val (c--macroexpand-all val)) (setq bindings `(cons (cons ',assigned-mode (lambda () ,val)) ,bindings) args (cdr args)))) === modified file 'lisp/progmodes/cc-langs.el' --- lisp/progmodes/cc-langs.el 2014-10-12 20:09:15 +0000 +++ lisp/progmodes/cc-langs.el 2014-10-30 05:15:28 +0000 @@ -3238,7 +3238,7 @@ `(lambda () ;; This let sets up the context for `c-mode-var' and similar - ;; that could be in the result from `macroexpand-all'. + ;; that could be in the result from `c--macroexpand-all'. (let ((c-buffer-is-cc-mode ',mode) current-var source-eval) (c-make-emacs-variables-local) @@ -3248,12 +3248,12 @@ (setq ,@(let ((c-buffer-is-cc-mode mode) (c-lang-const-expansion 'immediate)) ;; `c-lang-const' will expand to the evaluated - ;; constant immediately in `macroexpand-all' + ;; constant immediately in `c--macroexpand-all' ;; below. (mapcan (lambda (init) `(current-var ',(car init) - ,(car init) ,(macroexpand-all + ,(car init) ,(c--macroexpand-all (elt init 1)))) ;; Note: The following `append' copies the ;; first argument. That list is small, so === modified file 'lisp/progmodes/compile.el' --- lisp/progmodes/compile.el 2014-10-15 15:25:47 +0000 +++ lisp/progmodes/compile.el 2014-10-30 05:15:28 +0000 @@ -1676,7 +1676,16 @@ (list command mode name-function highlight-regexp)) (set (make-local-variable 'revert-buffer-function) 'compilation-revert-buffer) - (and outwin (set-window-start outwin (point-min))) + (and outwin + ;; Forcing the window-start overrides the usual redisplay + ;; feature of bringing point into view, so setting the + ;; window-start to top of the buffer risks losing the + ;; effect of moving point to EOB below, per + ;; compilation-scroll-output, if the command is long + ;; enough to push point outside of the window. This + ;; could happen, e.g., in `rgrep'. + (not compilation-scroll-output) + (set-window-start outwin (point-min))) ;; Position point as the user will see it. (let ((desired-visible-point === modified file 'lisp/startup.el' --- lisp/startup.el 2014-10-21 15:27:18 +0000 +++ lisp/startup.el 2014-10-30 05:15:28 +0000 @@ -1496,7 +1496,10 @@ (title (with-temp-buffer (insert-file-contents (expand-file-name tut tutorial-directory) - nil 0 256) + ;; Reat the entire file, to make sure any + ;; coding cookies and other local variables + ;; get acted upon. + nil) (search-forward ".") (buffer-substring (point-min) (1- (point)))))) ;; If there is a specific tutorial for the current language === modified file 'src/ChangeLog' --- src/ChangeLog 2014-10-28 20:33:12 +0000 +++ src/ChangeLog 2014-10-30 05:15:28 +0000 @@ -1,3 +1,12 @@ +2014-10-30 Eli Zaretskii + + * fileio.c (Fexpand_file_name): Use make_unibyte_string, not + build_string, when importing a home directory. (Bug#18873) + + * dispnew.c (buffer_posn_from_coords): Use + WINDOW_WANTS_HEADER_LINE_P, not WINDOW_WANTS_MODELINE_P, to + account for the header-line height. (Bug#18839) + 2014-10-28 Ulf Jasper * xml.c (parse_region): Do not forget the first document child. === modified file 'src/dispnew.c' --- src/dispnew.c 2014-10-14 12:45:41 +0000 +++ src/dispnew.c 2014-10-30 05:15:28 +0000 @@ -5205,7 +5205,7 @@ start position, i.e. it excludes the header-line row, but MATRIX_ROW includes the header-line row. Adjust for a possible header-line row. */ - it_vpos = it.vpos + WINDOW_WANTS_MODELINE_P (w); + it_vpos = it.vpos + WINDOW_WANTS_HEADER_LINE_P (w); if (it_vpos < w->current_matrix->nrows && (row = MATRIX_ROW (w->current_matrix, it_vpos), row->enabled_p)) === modified file 'src/fileio.c' --- src/fileio.c 2014-10-03 05:31:17 +0000 +++ src/fileio.c 2014-10-30 05:15:28 +0000 @@ -1163,7 +1163,7 @@ char newdir_utf8[MAX_UTF8_PATH]; filename_from_ansi (newdir, newdir_utf8); - tem = build_string (newdir_utf8); + tem = make_unibyte_string (newdir_utf8, strlen (newdir_utf8)); } else #endif @@ -1199,7 +1199,7 @@ /* `getpwnam' may return a unibyte string, which will bite us since we expect the directory to be multibyte. */ - tem = build_string (newdir); + tem = make_unibyte_string (newdir, strlen (newdir)); newdirlim = newdir + SBYTES (tem); if (multibyte && !STRING_MULTIBYTE (tem)) { ------------------------------------------------------------ revno: 118231 committer: Glenn Morris branch nick: trunk timestamp: Wed 2014-10-29 13:40:26 -0400 message: * lisp/net/rcirc.el (rcirc-fill-column): Unbump :version. A change in the possible :type with no change in the default does not merit a :version bump. Mark :risky. diff: === modified file 'lisp/ChangeLog' --- lisp/ChangeLog 2014-10-29 17:36:33 +0000 +++ lisp/ChangeLog 2014-10-29 17:40:26 +0000 @@ -1,5 +1,7 @@ 2014-10-29 Glenn Morris + * net/rcirc.el (rcirc-fill-column): Unbump :version. Mark :risky. + * version.el (emacs-bzr-version, emacs-bzr-get-version): Revert 2014-10-26 change. === modified file 'lisp/net/rcirc.el' --- lisp/net/rcirc.el 2014-10-29 01:42:51 +0000 +++ lisp/net/rcirc.el 2014-10-29 17:40:26 +0000 @@ -148,7 +148,7 @@ If nil, use value of `fill-column'. If a function (e.g., `frame-text-width' or `window-text-width'), call it to compute the number of columns." - :version "25.1" + :risky t ; can get funcalled :type '(choice (const :tag "Value of `fill-column'" nil) (integer :tag "Number of columns") (function :tag "Function returning the number of columns")) ------------------------------------------------------------ revno: 118230 committer: Glenn Morris branch nick: trunk timestamp: Wed 2014-10-29 13:36:33 -0400 message: * version.el (emacs-bzr-version, emacs-bzr-get-version): Revert 2014-10-26 change. diff: === modified file 'lisp/ChangeLog' --- lisp/ChangeLog 2014-10-29 01:42:51 +0000 +++ lisp/ChangeLog 2014-10-29 17:36:33 +0000 @@ -1,3 +1,8 @@ +2014-10-29 Glenn Morris + + * version.el (emacs-bzr-version, emacs-bzr-get-version): + Revert 2014-10-26 change. + 2014-10-29 Paul Eggert Simplify use of current-time and friends. === modified file 'lisp/version.el' --- lisp/version.el 2014-10-26 17:57:10 +0000 +++ lisp/version.el 2014-10-29 17:36:33 +0000 @@ -91,7 +91,7 @@ or if we could not determine the revision.") (define-obsolete-variable-alias 'emacs-bzr-version - 'emacs-repository-version "25.1") + 'emacs-repository-version "24.4") (defun emacs-bzr-version-dirstate (dir) "Try to return as a string the bzr revision ID of directory DIR. @@ -129,7 +129,7 @@ (buffer-string)))) (define-obsolete-function-alias 'emacs-bzr-get-version - 'emacs-repository-get-version "25.1") + 'emacs-repository-get-version "24.4") (defun emacs-repository-get-version (&optional dir external) "Try to return as a string the repository revision of the Emacs sources. ------------------------------------------------------------ revno: 118229 committer: Paul Eggert branch nick: trunk timestamp: Tue 2014-10-28 20:21:06 -0700 message: Port current-time change to XEmacs 21.4. See the buildbot log at: http://www.randomsample.de:4456/builders/xemacs21.4-linux/builds/1285 * lisp/erc/erc.el (erc-emacs-time-to-erc-time) (erc-emacs-time-to-erc-time): * lisp/gnus/gnus-util.el (gnus-float-time): * lisp/org/org-compat.el (org-float-time): Use 2-arg defalias, since XEmacs 21.4 doesn't support 3-arg. diff: === modified file 'lisp/erc/erc.el' --- lisp/erc/erc.el 2014-10-29 01:42:51 +0000 +++ lisp/erc/erc.el 2014-10-29 03:21:06 +0000 @@ -5957,14 +5957,9 @@ (truncate (mod n 65536))))) (defalias 'erc-emacs-time-to-erc-time - (if (featurep 'xemacs) 'time-to-seconds 'float-time) - "Convert time value TIME to a floating point number. -TIME defaults to the current time.") - -(defalias 'erc-current-time 'erc-emacs-time-to-erc-time - "Return the `current-time' as a number of seconds since the epoch. - -See also `erc-emacs-time-to-erc-time'.") + (if (featurep 'xemacs) 'time-to-seconds 'float-time)) + +(defalias 'erc-current-time 'erc-emacs-time-to-erc-time) (defun erc-time-diff (t1 t2) "Return the time difference in seconds between T1 and T2." === modified file 'lisp/gnus/gnus-util.el' --- lisp/gnus/gnus-util.el 2014-10-29 01:42:51 +0000 +++ lisp/gnus/gnus-util.el 2014-10-29 03:21:06 +0000 @@ -316,9 +316,7 @@ (defalias 'gnus-float-time (if (or (featurep 'emacs) (fboundp 'float-time)) - 'float-time 'time-to-seconds) - "Convert time value TIME to a floating point number. -TIME defaults to the current time.") + 'float-time 'time-to-seconds)) ;;; Keymap macros. === modified file 'lisp/org/org-compat.el' --- lisp/org/org-compat.el 2014-10-29 01:42:51 +0000 +++ lisp/org/org-compat.el 2014-10-29 03:21:06 +0000 @@ -412,9 +412,7 @@ (set-mouse-position frame (1- (frame-width frame)) 0))))) (defalias 'org-float-time - (if (featurep 'xemacs) 'time-to-seconds 'float-time) - "Convert time value TIME to a floating point number. -TIME defaults to the current time.") + (if (featurep 'xemacs) 'time-to-seconds 'float-time)) ;; `user-error' is only available from 24.2.50 on (unless (fboundp 'user-error) ------------------------------------------------------------ Use --include-merged or -n0 to see merged revisions.