iankelling.org
/
git
/
spray
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
280e554
)
fix highlight-symbol integration
author
Ian Kelling
<ian@iankelling.org>
Wed, 2 Jul 2014 00:40:29 +0000
(17:40 -0700)
committer
Ian Kelling
<ian@iankelling.org>
Wed, 2 Jul 2014 00:40:29 +0000
(17:40 -0700)
spray.el
patch
|
blob
|
history
diff --git
a/spray.el
b/spray.el
index afefae2541f06ae66cc38f2af4e5da1e9967c3f9..8f25a9328fdd9209f1b3c5360181022987afc123 100644
(file)
--- a/
spray.el
+++ b/
spray.el
@@
-118,10
+118,13
@@
buffer-face-mode
buffer-face-mode-face)
spray--saved-smartparens-enabled (and (boundp 'smartparens-mode)
buffer-face-mode
buffer-face-mode-face)
spray--saved-smartparens-enabled (and (boundp 'smartparens-mode)
- smartparens-mode))
+ smartparens-mode)
+ spray--saved-highlight-symbol-enabled (and (boundp 'highlight-symbol-mode)
+ highlight-symbol-mode))
;; smartparens wrapping of all letter binds can cause problems.
;; for example, it can cause auto-complete to activate
(and spray--saved-smartparens-enabled (smartparens-mode -1))
;; smartparens wrapping of all letter binds can cause problems.
;; for example, it can cause auto-complete to activate
(and spray--saved-smartparens-enabled (smartparens-mode -1))
+ (and spray--saved-highlight-symbol-enabled (highlight-symbol-mode -1))
(setq cursor-type nil)
(let ((buffer-face-mode-face `(:height ,spray-height)))
(buffer-face-mode 1))
(setq cursor-type nil)
(let ((buffer-face-mode-face `(:height ,spray-height)))
(buffer-face-mode 1))
@@
-132,6
+135,7
@@
(spray-start))
(t
(and spray--saved-smartparens-enabled (smartparens-mode 1))
(spray-start))
(t
(and spray--saved-smartparens-enabled (smartparens-mode 1))
+ (and spray--saved-highlight-symbol-enabled (highlight-symbol-mode 1))
(setq cursor-type spray--saved-cursor-type)
(if spray--saved-restriction
(narrow-to-region (car spray--saved-restriction)
(setq cursor-type spray--saved-cursor-type)
(if spray--saved-restriction
(narrow-to-region (car spray--saved-restriction)