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 /elisp/geiser-repl.el | |
| 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
Diffstat (limited to 'elisp/geiser-repl.el')
| -rw-r--r-- | elisp/geiser-repl.el | 5 |
1 files changed, 4 insertions, 1 deletions
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) |