[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 26da0b5: Set the normal-erase-is-backspace variable from Customiz
From: |
Lars Ingebrigtsen |
Subject: |
master 26da0b5: Set the normal-erase-is-backspace variable from Customize |
Date: |
Sat, 24 Jul 2021 12:21:58 -0400 (EDT) |
branch: master
commit 26da0b5ecb44ba5a8954be98b97ab59ccb391531
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
Set the normal-erase-is-backspace variable from Customize
* lisp/simple.el (normal-erase-is-backspace): Always set the
variable so that Customize is up-to-date (bug#49593).
---
lisp/simple.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/lisp/simple.el b/lisp/simple.el
index 1a49fe2..5ec7fd8 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -9535,9 +9535,9 @@ call `normal-erase-is-backspace-mode' (which see)
instead."
:set (lambda (symbol value)
;; The fboundp is because of a problem with :set when
;; dumping Emacs. It doesn't really matter.
- (if (fboundp 'normal-erase-is-backspace-mode)
- (normal-erase-is-backspace-mode (or value 0))
- (set-default symbol value))))
+ (when (fboundp 'normal-erase-is-backspace-mode)
+ (normal-erase-is-backspace-mode (or value 0)))
+ (set-default symbol value)))
(defun normal-erase-is-backspace-setup-frame (&optional frame)
"Set up `normal-erase-is-backspace-mode' on FRAME, if necessary."
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 26da0b5: Set the normal-erase-is-backspace variable from Customize,
Lars Ingebrigtsen <=