diff options
author | Lockywolf <lockywolf@gmail.com> | 2019-08-06 09:45:14 +0800 |
---|---|---|
committer | Lockywolf <lockywolf@gmail.com> | 2019-08-06 09:45:14 +0800 |
commit | 7ef02e25da30bf28a707f6eb6c5c533a42dd7dc0 (patch) | |
tree | fc845aadac1cf7475ec4eb2a4888efc189d2e7a8 /elisp | |
parent | 1881db7de8c1a0b2d2544dca8b755c6792c916c9 (diff) | |
download | geiser-guile-7ef02e25da30bf28a707f6eb6c5c533a42dd7dc0.tar.gz geiser-guile-7ef02e25da30bf28a707f6eb6c5c533a42dd7dc0.tar.bz2 |
Remove debug printing. Align par-style with geiser.
Diffstat (limited to 'elisp')
-rw-r--r-- | elisp/geiser-connection.el | 1 | ||||
-rw-r--r-- | elisp/geiser-eval.el | 1 |
2 files changed, 0 insertions, 2 deletions
diff --git a/elisp/geiser-connection.el b/elisp/geiser-connection.el index 560412f..510afe9 100644 --- a/elisp/geiser-connection.el +++ b/elisp/geiser-connection.el @@ -252,7 +252,6 @@ "Time limit, in msecs, blocking on synchronous evaluation requests") (defun geiser-con--send-string/wait (con str cont &optional timeout sbuf) - (message "lwf:g-c--s-s/w:%s" str) (save-current-buffer (let ((proc (and con (geiser-con--connection-process con)))) (unless proc (error "Geiser connection not active")) diff --git a/elisp/geiser-eval.el b/elisp/geiser-eval.el index c8059a6..6209dd3 100644 --- a/elisp/geiser-eval.el +++ b/elisp/geiser-eval.el @@ -161,7 +161,6 @@ module-exports, autodoc, callers, callees and generic-methods.") (and (listp ret) (or (assoc 'error ret) (assoc 'result ret)))) (defsubst geiser-eval--retort-result (ret) - (message "lwf:g-e--r-r:%s" ret) (let ((values (cdr (assoc 'result ret)))) (car (geiser-syntax--read-from-string (car values))))) |