diff options
author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-05-20 22:40:36 +0200 |
---|---|---|
committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-05-20 22:40:36 +0200 |
commit | 85e02446e1c721049d789c4d2f86d6bf96f46c26 (patch) | |
tree | c4298bf2e9fbf677c5de5b3ade1e3a93a40a55e0 /elisp/geiser-guile.el | |
parent | a628778c084178653570ea423d530324fb0ce07c (diff) | |
download | geiser-chez-85e02446e1c721049d789c4d2f86d6bf96f46c26.tar.gz geiser-chez-85e02446e1c721049d789c4d2f86d6bf96f46c26.tar.bz2 |
Fixes for module names reading and evaluation result display.
Diffstat (limited to 'elisp/geiser-guile.el')
-rw-r--r-- | elisp/geiser-guile.el | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/elisp/geiser-guile.el b/elisp/geiser-guile.el index f4362ca..e6e0c9a 100644 --- a/elisp/geiser-guile.el +++ b/elisp/geiser-guile.el @@ -85,9 +85,6 @@ This function uses `geiser-guile-init-file' if it exists." ;;; Evaluation support: (defun geiser-guile-geiser-procedure (proc) - "Translate a bare procedure symbol to one executable in Guile's -context. Return NULL for unsupported ones; at the very least, -EVAL, COMPILE, LOAD-FILE and COMPILE-FILE should be supported." (let ((proc (intern (format "ge:%s" (if (and geiser-guile-use-compiler-in-eval (eq proc 'eval)) @@ -99,8 +96,6 @@ EVAL, COMPILE, LOAD-FILE and COMPILE-FILE should be supported." "(define-module +\\(([^)]+)\\)") (defun geiser-guile-get-module (&optional module) - "Return a scheme datum representing the current module. -If MODULE is provided, transform it to such a datum." (cond ((null module) (save-excursion (goto-char (point-min)) |