From 04010556fa1c0043472048516a70044c8850d45d Mon Sep 17 00:00:00 2001 From: Mario Rodas Date: Mon, 28 Sep 2015 19:48:52 -0500 Subject: Skip expression quote when getting a racket symbol --- elisp/geiser-racket.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/elisp/geiser-racket.el b/elisp/geiser-racket.el index 23c6083..80e47b8 100644 --- a/elisp/geiser-racket.el +++ b/elisp/geiser-racket.el @@ -178,7 +178,7 @@ using start-geiser, a procedure in the geiser/server module." (t nil))) (defun geiser-racket--symbol-begin (module) - (save-excursion (skip-syntax-backward "^-()>") (point))) + (save-excursion (skip-syntax-backward "^'-()>") (point))) (defun geiser-racket--import-command (module) (and (stringp module) -- cgit v1.2.3