From 775f2461405df9dec4842b80f32bc8564e44ee84 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 17 Jul 1997 21:59:31 +0000 Subject: [PATCH] (delete-selection-mode): Add custom-loads property. --- lisp/delsel.el | 16 +++++----------- 1 file changed, 5 insertions(+), 11 deletions(-) diff --git a/lisp/delsel.el b/lisp/delsel.el index bc6bea59871..0aea9cf221a 100644 --- a/lisp/delsel.el +++ b/lisp/delsel.el @@ -67,18 +67,12 @@ You must modify via \\[customize] for this variable to have an effect." :type 'boolean :group 'editing-basics :require 'delsel) +;; Force loading of this file in order to customize delete-selection-mode. +(put 'delete-selection-mode 'custom-loads '(delsel)) -;; Since the above autoloaded option contains a `:set' form, this file would -;; get loaded from loaddefs.el. We can use the above `:initialize' keyword, -;; and the below `when' form, to the prevent automatic loading of this file, or -;; an `:initialize' keyword of the form: -;; -;; :initialize (lambda (symbol value) -;; (if value -;; (delete-selection-mode t) -;; (custom-initialize-default symbol nil)) -;; -;; We choose the former as it is the general mechanism for such toggle options. +;; This is the standard way mechanism to put the mode into effect +;; if delete-selection-mode has already been set to t +;; when this file is loaded. (when delete-selection-mode (delete-selection-mode t)) -- 2.39.5