From 85e02446e1c721049d789c4d2f86d6bf96f46c26 Mon Sep 17 00:00:00 2001 From: Jose Antonio Ortega Ruiz Date: Wed, 20 May 2009 22:40:36 +0200 Subject: Fixes for module names reading and evaluation result display. --- elisp/geiser-guile.el | 5 ----- 1 file changed, 5 deletions(-) (limited to 'elisp/geiser-guile.el') 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)) -- cgit v1.2.3