emacs-elpa-diffs
[Top][All Lists]
Advanced

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

[elpa] master b2112e0 13/17: avy-jump.el (avy-goto-word-1): Fix for "."


From: Oleh Krehel
Subject: [elpa] master b2112e0 13/17: avy-jump.el (avy-goto-word-1): Fix for "."
Date: Fri, 08 May 2015 13:42:13 +0000

branch: master
commit b2112e0fe9000a0df6eb1837e4f00aa704c155d9
Author: Oleh Krehel <address@hidden>
Commit: Oleh Krehel <address@hidden>

    avy-jump.el (avy-goto-word-1): Fix for "."
    
    Fixes #7
---
 avy-jump.el |   15 +++++++++------
 1 files changed, 9 insertions(+), 6 deletions(-)

diff --git a/avy-jump.el b/avy-jump.el
index 6c7d961..520011a 100644
--- a/avy-jump.el
+++ b/avy-jump.el
@@ -315,12 +315,15 @@ The window scope is determined by `avy-all-windows' (ARG 
negates it)."
 The window scope is determined by `avy-all-windows' (ARG negates it)."
   (interactive "P")
   (let* ((str (string (read-char "char: ")))
-         (regex (if (and avy-word-punc-regexp
-                         (string-match avy-word-punc-regexp str))
-                    str
-                  (concat
-                   "\\b"
-                   str))))
+         (regex (cond ((string= str ".")
+                       "\\.")
+                      ((and avy-word-punc-regexp
+                            (string-match avy-word-punc-regexp str))
+                       str)
+                      (t
+                       (concat
+                        "\\b"
+                        str)))))
     (avy--generic-jump regex arg avy-goto-word-style)))
 
 (declare-function subword-backward "subword")



reply via email to

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