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).

diff --git a/lisp/simple.el b/lisp/simple.el
index 1a49fe24252da670d5a790423c41a625967f573c..5ec7fd80eb5bc595f29f09b6de05798c45d73694 100644 (file)
--- 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."