Mercurial > emacs
changeset 19132:73871027b629
(delete-selection-mode): Delete the :initialize keyword.
Don't explicitly check the value and call delete-selection-mode.
Don't put on a custom-loads property.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 04 Aug 1997 06:47:28 +0000 |
| parents | 962be4e083c2 |
| children | a5f15ed1907d |
| files | lisp/delsel.el |
| diffstat | 1 files changed, 1 insertions(+), 11 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/delsel.el Mon Aug 04 06:44:24 1997 +0000 +++ b/lisp/delsel.el Mon Aug 04 06:47:28 1997 +0000 @@ -1,11 +1,10 @@ ;;; delsel.el --- delete selection if you insert -;; Copyright (C) 1992 Free Software Foundation, Inc. +;; Copyright (C) 1992, 1997 Free Software Foundation, Inc. ;; Author: Matthieu Devin <devin@lucid.com> ;; Maintainer: FSF ;; Created: 14 Jul 92 -;; Last change 18-Feb-93, devin. ;; This file is part of GNU Emacs. @@ -63,18 +62,9 @@ You must modify via \\[customize] for this variable to have an effect." :set (lambda (symbol value) (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