summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2011-02-11 23:00:15 +0100
committerJose Antonio Ortega Ruiz <jao@gnu.org>2011-02-11 23:01:19 +0100
commit6287a845e278af6ccb91fe9eb0e073fd913d3b89 (patch)
tree22484c0a47af0cdef9581434ad10b4e1dd30eb7f
parent168d46758ae03dc775293c60945cd6fd0513ce9a (diff)
downloadgeiser-chez-6287a845e278af6ccb91fe9eb0e073fd913d3b89.tar.gz
geiser-chez-6287a845e278af6ccb91fe9eb0e073fd913d3b89.tar.bz2
Bug fix: M-x geiser-edit-module works again in the REPL
-rw-r--r--NEWS1
-rw-r--r--elisp/geiser-repl.el5
2 files changed, 5 insertions, 1 deletions
diff --git a/NEWS b/NEWS
index 63202df..0a6e859 100644
--- a/NEWS
+++ b/NEWS
@@ -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)