From 85c8afb66c970003f8fe4155fae3f089aca3b346 Mon Sep 17 00:00:00 2001 From: Jose Antonio Ortega Ruiz Date: Sun, 1 Mar 2009 01:09:16 +0100 Subject: Fix for autodoc when point in a rest formal arg in define. --- elisp/geiser-syntax.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'elisp/geiser-syntax.el') diff --git a/elisp/geiser-syntax.el b/elisp/geiser-syntax.el index 8684f99..a41f152 100644 --- a/elisp/geiser-syntax.el +++ b/elisp/geiser-syntax.el @@ -89,7 +89,7 @@ (geiser-syntax--del-sexp -1) (insert "XXpointXX")) ((eq (char-after (point)) ?\() (geiser-syntax--del-sexp 1) (insert "XXpointXX"))) - (when (memq (char-after (1- (point))) (list ?@ ?, ?\' ?\` ?\#)) + (when (memq (char-after (1- (point))) (list ?. ?@ ?, ?\' ?\` ?\#)) (skip-syntax-backward "^-(") (delete-region (point) (point-max)) (insert "XXXpointXX")) -- cgit v1.2.3