Add a missing 'delete-selection property

[gnu-emacs-elpa] / nameless.el

diff --git a/nameless.el b/nameless.el
index 26b1024148d0e970c282396752c86e6afde9d45b..c2837e2b3724bd01bd00d426bcf8c74705fc3d4a 100644 (file)
--- a/nameless.el
+++ b/nameless.el
@@ -194,6 +194,8 @@ configured, or if `nameless-current-name' is nil."
     (or (nameless-insert-name 'noerror)
         (call-interactively #'self-insert-command))))
 
+(put 'nameless-insert-name-or-self-insert 'delete-selection t)
+
 (defun nameless--name-regexp (name)
   "Return a regexp of the current name."
   (concat "\\_<@?\\(" (regexp-quote name) "-\\)\\(\\s_\\|\\sw\\)"))