summaryrefslogtreecommitdiff
path: root/elisp/geiser-plt.el
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2009-05-08 01:48:52 +0200
committerJose Antonio Ortega Ruiz <jao@gnu.org>2009-05-08 01:48:52 +0200
commit923c12119ca6b43c17a5543fb162c85356682a52 (patch)
tree61f78d4d48c93057ffc07b1c70ae7698f3b71e0d /elisp/geiser-plt.el
parent5170efb520bad180bfca68828c644b59834457c8 (diff)
downloadgeiser-923c12119ca6b43c17a5543fb162c85356682a52.tar.gz
geiser-923c12119ca6b43c17a5543fb162c85356682a52.tar.bz2
Module completion generalized and implemented for PLT.
Diffstat (limited to 'elisp/geiser-plt.el')
-rw-r--r--elisp/geiser-plt.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/elisp/geiser-plt.el b/elisp/geiser-plt.el
index b93dc1d..1b539f8 100644
--- a/elisp/geiser-plt.el
+++ b/elisp/geiser-plt.el
@@ -101,6 +101,9 @@ This function uses `geiser-plt-init-file' if it exists."
((null module) (buffer-file-name))
(t module)))
+(defun geiser-plt-symbol-begin (module)
+ (save-excursion (skip-syntax-backward "^-()>") (point)))
+
;;; External help
(defun geiser-plt-external-help (symbol module)