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))  | 
