branch: elpa/geiser-gauche
commit 5d8264b1ef71c534a62ddbb4b512ac10ecfbdcb3
Author: András Simonyi <[email protected]>
Commit: András Simonyi <[email protected]>
Add (commented out) debugging logging of commands in *scratch*
---
geiser-gauche.el | 3 +++
1 file changed, 3 insertions(+)
diff --git a/geiser-gauche.el b/geiser-gauche.el
index db8d7cd..3da96e7 100644
--- a/geiser-gauche.el
+++ b/geiser-gauche.el
@@ -80,6 +80,9 @@
;;; Evaluation support:
(defun geiser-gauche--geiser-procedure (proc &rest args)
+ ;; (with-current-buffer "*scratch*"
+ ;; (goto-char (point-max))
+ ;; (insert (format "\nGeiser FORM: %s" args)))
(cl-case proc
((eval compile)
(let ((form (mapconcat 'identity (cdr args) " "))
