[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] master e0f5357 3/9: Add a missing 'delete-selection property

From: Artur Malabarba
Subject: [elpa] master e0f5357 3/9: Add a missing 'delete-selection property
Date: Wed, 09 Sep 2015 11:08:19 +0000

branch: master
commit e0f5357e370c39b33ec4cf653a2c81eade6f2583
Author: Clément Pit--Claudel <address@hidden>
Commit: Clément Pit--Claudel <address@hidden>

    Add a missing 'delete-selection property
    This is needed for delete-selection-mode to work properly:
    > Commands which will delete the selection need a 'delete-selection
    > property on their symbols; commands which insert text but don't have
    > this property won't delete the selection.
 nameless.el |    2 ++
 1 files changed, 2 insertions(+), 0 deletions(-)

diff --git a/nameless.el b/nameless.el
index 26b1024..c2837e2 100644
--- 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\\)"))

reply via email to

[Prev in Thread] Current Thread [Next in Thread]