summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMario Rodas <marsam@users.noreply.github.com>2015-09-28 19:48:52 -0500
committerJose Antonio Ortega Ruiz <jao@gnu.org>2015-09-30 02:32:59 +0200
commit04010556fa1c0043472048516a70044c8850d45d (patch)
tree744e17890d8ac71095c2e9be598467b2d312d872
parent7ae1d4b3e6464f0a8b3416f6689c8b44ceb5bc42 (diff)
downloadgeiser-chez-04010556fa1c0043472048516a70044c8850d45d.tar.gz
geiser-chez-04010556fa1c0043472048516a70044c8850d45d.tar.bz2
Skip expression quote when getting a racket symbol
-rw-r--r--elisp/geiser-racket.el2
1 files changed, 1 insertions, 1 deletions
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)