summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRavi R Kiran <aine.marina@gmail.com>2014-03-10 05:28:06 (GMT)
committerRavikiran Rajagopal <aine.marina@gmail.com>2014-03-10 05:28:06 (GMT)
commite9fbf031de47041ba9b720e5a45aea463f8afceb (patch)
tree65bb13233c305af22f3e391fc21b61862d256ba0
parentb721f4b5763881fc6b8cd2fd3aa4209539cc54df (diff)
downloaddotemacs-e9fbf031de47041ba9b720e5a45aea463f8afceb.zip
dotemacs-e9fbf031de47041ba9b720e5a45aea463f8afceb.tar.gz
dotemacs-e9fbf031de47041ba9b720e5a45aea463f8afceb.tar.bz2
Overlay map for modal highlight-symbol
-rw-r--r--ravi-init-navigation.el17
1 files changed, 16 insertions, 1 deletions
diff --git a/ravi-init-navigation.el b/ravi-init-navigation.el
index 87cd636..c0a5a82 100644
--- a/ravi-init-navigation.el
+++ b/ravi-init-navigation.el
@@ -222,9 +222,24 @@
:bind (("H-g" . grep)))
(use-package highlight-symbol
- :bind (("H-n" . highlight-symbol-next)
+ :bind (("H-n" . ravi/highlight-symbol-next)
("H-N" . highlight-symbol-prev)
("H-s" . highlight-symbol-query-replace))
+ :commands highlight-symbol-next
+ :config
+ (progn
+ (defvar ravi/highlight-symbol-overlay-map
+ (let ((map (make-sparse-keymap)))
+ (define-key map (kbd "j") 'highlight-symbol-prev)
+ (define-key map (kbd "k") 'highlight-symbol-next)
+ (define-key map (kbd "s") 'highlight-symbol-query-replace)
+ (define-key map (kbd "o") 'highlight-symbol-occur)
+ map))
+ (defun ravi/highlight-symbol-next ()
+ (interactive)
+ (highlight-symbol-next)
+ (set-temporary-overlay-map ravi/highlight-symbol-overlay-map t))
+ )
:ensure t
)