From 49aca643da436c7f33d55bb1fb8304e2fbdc842b Mon Sep 17 00:00:00 2001 From: Jose Antonio Ortega Ruiz Date: Fri, 11 Feb 2011 23:00:15 +0100 Subject: Bug fix: M-x geiser-edit-module works again in the REPL --- elisp/geiser-repl.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'elisp') 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) -- cgit v1.2.3