From 5a32c9ee1240ecfc5d43cd2b975a448878dcc396 Mon Sep 17 00:00:00 2001 From: Jose Antonio Ortega Ruiz Date: Sun, 2 Jan 2011 19:58:16 +0100 Subject: Fix for quack users Apparently, quack makes (thing-at-point 'symbol) to return "#" when point is looking at a hash symbol, causing havoc to geiser. This patch defends us about this behaviour. --- elisp/geiser-syntax.el | 1 + 1 file changed, 1 insertion(+) (limited to 'elisp/geiser-syntax.el') diff --git a/elisp/geiser-syntax.el b/elisp/geiser-syntax.el index 8428f49..4921831 100644 --- a/elisp/geiser-syntax.el +++ b/elisp/geiser-syntax.el @@ -294,6 +294,7 @@ implementation-specific entries for font-lock-keywords.") (forward-sexp) (let ((s (thing-at-point 'symbol))) (cond ((not s) (push s elems)) + ((member s '("#" "`" "'")) (push nil elems)) ((not (equal "." s)) (push (make-symbol s) elems))))))) (nreverse elems))))) -- cgit v1.2.3