[elpa] externals/svg-tag-mode a152bc90a7 2/2: Merge pull request #59 from wojnicki/cursor_function_fix

[ELPA Syncer]

branch: externals/svg-tag-mode
commit a152bc90a7c9dc17112893a19ddf91078b909057
Merge: f01307dd77 d57a84ca14
Author: Nicolas P. Rougier <Nicolas.Rougier@inria.fr>
Commit: GitHub <noreply@github.com>

    Merge pull request #59 from wojnicki/cursor_function_fix
    
    svg-tag--cursor-function fix for finding tag boundary
---
 svg-tag-mode.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/svg-tag-mode.el b/svg-tag-mode.el
index fa6d9976ee..815abc45ff 100644
--- a/svg-tag-mode.el
+++ b/svg-tag-mode.el
@@ -224,11 +224,11 @@ attribute from ``svg-tag-default-face''."
 - Display the textual tag inline (this allow to edit it
 - Do nothing"
   (let ((beg (if (eq direction 'entered)
-                 (previous-property-change (+ (point) 1))
-               (previous-property-change (+ position 1))))
+                 (previous-single-property-change (+ (point) 1) 'display)
+               (previous-single-property-change (+ position 1) 'display)))
         (end (if (eq direction 'entered)
-                 (next-property-change (point))
-               (next-property-change position))))
+                 (next-single-property-change (point) 'display) 
+               (next-single-property-change position 'display))))
 
     (if (eq svg-tag-action-at-point 'edit)
         (if (eq direction 'left)