(delsel-unload-function): Don't use `remprop'; it is not autoloaded,

and we wouldn't want to load CL just to unload delsel.el anyway.
Suggested by Martin Rudalics <rudalics@gmx.at>.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ca1387f..a80f7ef 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2008-01-24  Juanma Barranquero  <lekktu@gmail.com>
+
+       * delsel.el (delsel-unload-function): Don't use `remprop'; it is
+       not autoloaded, and we wouldn't want to load CL just to unload
+       delsel.el anyway.  Suggested by Martin Rudalics <rudalics@gmx.at>.
+
 2008-01-24  Martin Rudalics  <rudalics@gmx.at>
 
        * delsel.el (delete-selection-pre-hook): Avoid clearing out

diff --git a/lisp/delsel.el b/lisp/delsel.el
index 990ca91..3f9a0c7 100644 (file)
--- a/lisp/delsel.el
+++ b/lisp/delsel.el
@@ -173,7 +173,7 @@ then it takes a second \\[keyboard-quit] to abort the minibuffer."
   (dolist (sym '(self-insert-command self-insert-iso yank clipboard-yank
                 insert-register delete-backward-char backward-delete-char-untabify
                 delete-char newline-and-indent newline open-line))
-    (remprop sym 'delete-selection))
+    (put sym 'delete-selection nil))
   ;; continue standard unloading
   nil)