mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-05 22:20:24 -08:00
Code Issues Projects Releases Wiki Activity

; Fix recently introduced "ELisp".

Browse source
This commit is contained in:
Sean Whitton 2025-07-15 21:57:59 +01:00
parent c3f3fe136c
commit 6ee0093b21
3 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/recentf.el
View file

@ -1355,7 +1355,7 @@ Optional argument N must be a valid digit number. It defaults to 1.
;; ;;
(defconst recentf-save-file-header (defconst recentf-save-file-header
;; FIXME: This should arguably be a `lisp-data' file, but currently ;; FIXME: This should arguably be a `lisp-data' file, but currently
;; it contains and is used as an executable ELisp code. ;; it contains and is used as an executable Elisp code.
";;; Automatically generated by `recentf' on %s -*- mode: emacs-lisp; lexical-binding: t -*-\n" ";;; Automatically generated by `recentf' on %s -*- mode: emacs-lisp; lexical-binding: t -*-\n"
"Header to be written into the `recentf-save-file'.") "Header to be written into the `recentf-save-file'.")

2
lisp/savehist.el
View file

@ -256,7 +256,7 @@ Be careful to do it while preserving the current history data."
;; We don't know the relative age of the various entries in OLD and ;; We don't know the relative age of the various entries in OLD and
;; NEW; it's possible that most entries in NEW are much older than ;; NEW; it's possible that most entries in NEW are much older than
;; those in OLD or vice versa, or anything in-between. Maybe we should ;; those in OLD or vice versa, or anything in-between. Maybe we should
;; export the `lib/diffseq.h' to ELisp and use it here, but in the mean ;; export the `lib/diffseq.h' to Elisp and use it here, but in the mean
;; time we interleave the two lists, which should usually be tolerable. ;; time we interleave the two lists, which should usually be tolerable.
(let ((res ())) (let ((res ()))
(while (and old new) (while (and old new)

2
src/xdisp.c
View file

@ -3054,7 +3054,7 @@ hscrolling_current_line_p (struct window *w)
Lisp form evaluation Lisp form evaluation
***********************************************************************/ ***********************************************************************/
/* The redisplay is not re-entrant. But we can run ELisp code during /* The redisplay is not re-entrant. But we can run Elisp code during
redisplay, which in turn can trigger redisplay. redisplay, which in turn can trigger redisplay.
We try to make this inner redisplay work correctly, but it messes up We try to make this inner redisplay work correctly, but it messes up
the state of the outer redisplay, so when we return to this outer the state of the outer redisplay, so when we return to this outer