comparison lisp/delsel.el @ 18840:c8c67c398475

(delete-selection-mode): Add custom-loads property.

18839:1405083241e8

	 (delete-selection-mode (or value 0)))
  :initialize 'custom-initialize-default
  :type 'boolean
  :group 'editing-basics
  :require '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.
(when delete-selection-mode
  (delete-selection-mode t))

(defun delete-active-region (&optional killp)
  (if killp

18840:c8c67c398475

	 (delete-selection-mode (or value 0)))
  :initialize 'custom-initialize-default
  :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))

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

(defun delete-active-region (&optional killp)
  (if killp