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
commit49aca643da436c7f33d55bb1fb8304e2fbdc842b (patch)
treedd97d699f1601c48f3bc5377285d198c1463a0f1
parent9db33cc8c9366d71071610209dcb4c655eaa6e1f (diff)
downloadgeiser-49aca643da436c7f33d55bb1fb8304e2fbdc842b.tar.gz
geiser-49aca643da436c7f33d55bb1fb8304e2fbdc842b.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)