summaryrefslogtreecommitdiff
path: root/lisp/cus-start.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/cus-start.el')
-rw-r--r--lisp/cus-start.el24
1 files changed, 15 insertions, 9 deletions
diff --git a/lisp/cus-start.el b/lisp/cus-start.el
index 451e7f762f4..f31d1df3097 100644
--- a/lisp/cus-start.el
+++ b/lisp/cus-start.el
@@ -414,6 +414,10 @@ Leaving \"Default\" unchecked is equivalent with specifying a default of
;; msdos.c
(dos-unsupported-char-glyph display integer)
;; nsterm.m
+ ;;
+ ;; FIXME: Why does ⌃ use nil instead of none? Also the
+ ;; description is confusing; setting it to nil disables ⌃
+ ;; entirely.
(ns-control-modifier
ns
(choice (const :tag "No modifier" nil)
@@ -430,13 +434,13 @@ Leaving \"Default\" unchecked is equivalent with specifying a default of
(const super)) "24.1")
(ns-command-modifier
ns
- (choice (const :tag "No modifier" nil)
+ (choice (const :tag "No modifier (work as layout switch)" none)
(const control) (const meta)
(const alt) (const hyper)
(const super)) "23.1")
(ns-right-command-modifier
ns
- (choice (const :tag "No modifier (work as command)" none)
+ (choice (const :tag "No modifier (work as layout switch)" none)
(const :tag "Use the value of ns-command-modifier"
left)
(const control) (const meta)
@@ -706,13 +710,15 @@ since it could result in memory overflow and make Emacs crash."
(put symbol 'risky-local-variable (cadr prop)))
(if (setq prop (memq :set rest))
(put symbol 'custom-set (cadr prop)))
- ;; Note this is the _only_ initialize property we handle.
- (if (eq (cadr (memq :initialize rest)) 'custom-initialize-delay)
- ;; These vars are defined early and should hence be initialized
- ;; early, even if this file happens to be loaded late. so add them
- ;; to the end of custom-delayed-init-variables. Otherwise,
- ;; auto-save-file-name-transforms will appear in M-x customize-rogue.
- (add-to-list 'custom-delayed-init-variables symbol 'append))
+ ;; Don't re-add to custom-delayed-init-variables post-startup.
+ (unless after-init-time
+ ;; Note this is the _only_ initialize property we handle.
+ (if (eq (cadr (memq :initialize rest)) 'custom-initialize-delay)
+ ;; These vars are defined early and should hence be initialized
+ ;; early, even if this file happens to be loaded late. so add them
+ ;; to the end of custom-delayed-init-variables. Otherwise,
+ ;; auto-save-file-name-transforms will appear in customize-rogue.
+ (add-to-list 'custom-delayed-init-variables symbol 'append)))
;; If this is NOT while dumping Emacs, set up the rest of the
;; customization info. This is the stuff that is not needed
;; until someone does M-x customize etc.