diff options
| author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2010-11-11 03:01:33 +0100 |
|---|---|---|
| committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2010-11-11 03:01:33 +0100 |
| commit | f9ba2bb7d478b577a48af60be6eb9b54880b3f7c (patch) | |
| tree | 536f75afd2b87f221aabf385614016d1fc577f08 /elisp/geiser-eval.el | |
| parent | a7ad5704722b7fab966ac8fb4e6b62fe2e424756 (diff) | |
| download | geiser-f9ba2bb7d478b577a48af60be6eb9b54880b3f7c.tar.gz geiser-f9ba2bb7d478b577a48af60be6eb9b54880b3f7c.tar.bz2 | |
Partial work (connections working)
Diffstat (limited to 'elisp/geiser-eval.el')
| -rw-r--r-- | elisp/geiser-eval.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/elisp/geiser-eval.el b/elisp/geiser-eval.el index 3534312..72093cc 100644 --- a/elisp/geiser-eval.el +++ b/elisp/geiser-eval.el @@ -119,11 +119,11 @@ module-exports, autodoc, callers, callees and generic-methods.") ;;; Code sending: -(defvar geiser-eval--default-proc-function nil) +(defvar geiser-eval--default-connection-function nil) -(defsubst geiser-eval--proc () - (and geiser-eval--default-proc-function - (funcall geiser-eval--default-proc-function))) +(defsubst geiser-eval--connection () + (and geiser-eval--default-connection-function + (funcall geiser-eval--default-connection-function))) (defsubst geiser-eval--log (s) (geiser-log--info "RETORT: %S" s) @@ -138,7 +138,7 @@ module-exports, autodoc, callers, callees and generic-methods.") (defun geiser-eval--send/wait (code &optional timeout buffer) (setq geiser-eval--sync-retort nil) - (geiser-con--send-string/wait (geiser-eval--proc) + (geiser-con--send-string/wait (geiser-eval--connection) (geiser-eval--code-str code) 'geiser-eval--set-sync-retort timeout |