diff options
author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2011-02-11 23:00:15 +0100 |
---|---|---|
committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2011-02-11 23:01:19 +0100 |
commit | 6287a845e278af6ccb91fe9eb0e073fd913d3b89 (patch) | |
tree | 22484c0a47af0cdef9581434ad10b4e1dd30eb7f | |
parent | 168d46758ae03dc775293c60945cd6fd0513ce9a (diff) | |
download | geiser-chez-6287a845e278af6ccb91fe9eb0e073fd913d3b89.tar.gz geiser-chez-6287a845e278af6ccb91fe9eb0e073fd913d3b89.tar.bz2 |
Bug fix: M-x geiser-edit-module works again in the REPL
-rw-r--r-- | NEWS | 1 | ||||
-rw-r--r-- | elisp/geiser-repl.el | 5 |
2 files changed, 5 insertions, 1 deletions
@@ -8,6 +8,7 @@ Bug fixes: - Company mode integration fixes (including #32231) + - M-x geiser-edit-module in REPL buffers fixed * Version 0.1.1 (Jan 24, 2011) diff --git a/elisp/geiser-repl.el b/elisp/geiser-repl.el index 563332c..cbaaf24 100644 --- a/elisp/geiser-repl.el +++ b/elisp/geiser-repl.el @@ -418,7 +418,10 @@ module command as a string") (let ((beginning-of-defun-function nil)) (beginning-of-defun)))) -(defun geiser-repl--module-function (&optional ignore) :f) +(defun geiser-repl--module-function (&optional module) + (if module + (funcall geiser-eval--get-impl-module module) + :f)) (defun geiser-repl--doc-module () (interactive) |