[elpa] externals/relint c315148 6/9: Treat #' and , @ correctly when finding position

[Mattias Engdegård]

branch: externals/relint
commit c315148e489f3191fa32524431a3bdc6fa791a76
Author: Mattias Engdegård <address@hidden>
Commit: Mattias Engdegård <address@hidden>

    Treat #' and ,@ correctly when finding position
---
 relint.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/relint.el b/relint.el
index bbd1309..dc20c6f 100644
--- a/relint.el
+++ b/relint.el
@@ -107,8 +107,8 @@ and PATH (reversed list of list indices to follow to 
target)."
           (goto-char (match-end 0)))
         (let ((skip (car p)))
           (cond
-           ((looking-at (rx (any "'`,")))
-            (forward-char 1)
+           ((looking-at (rx (or "'" "#'" "`" "," ",@")))
+            (goto-char (match-end 0))
             (setq skip (1- skip)))
            ((looking-at (rx "("))
             (forward-char 1)))