branch: elpa/isl
commit 7d326d1b5cc1c7f0b509be443e726808331551bc
Author: Thierry Volpiatto <[email protected]>
Commit: Thierry Volpiatto <[email protected]>
Allow jumping over spaces when yanking word at point
---
isl.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/isl.el b/isl.el
index 87b0b7b27bc..be19bf9eb94 100644
--- a/isl.el
+++ b/isl.el
@@ -410,9 +410,9 @@ the initial position i.e. the position before launching
`isl-search'."
(interactive)
(let (str)
(with-current-buffer isl-current-buffer
- (when (or (memq (char-syntax (or (char-after) 0)) '(?w ?_))
+ (when (or (memq (char-syntax (or (char-after) 0)) '(?w ?_ ? ))
(memq (char-syntax (or (char-after (1+ (point))) 0))
- '(?w ?_)))
+ '(?w ?_ ? )))
(setq str (buffer-substring-no-properties (or isl--yank-point (point))
(save-excursion
(forward-word)
