diff options
| author | stardiviner <numbchild@gmail.com> | 2018-03-25 11:26:37 +0800 |
|---|---|---|
| committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2018-03-25 22:47:27 +0200 |
| commit | 6bb4134cdd4027ae94ac710fc3b1ed433858a4d1 (patch) | |
| tree | 5172e57ee616e57d778cd7c269b154847387d0ca | |
| parent | 5ee6c459531b7d010b9825eab38822dec00e02d2 (diff) | |
| download | org-mode-6bb4134cdd4027ae94ac710fc3b1ed433858a4d1.tar.gz | |
ob-js: Small refactoring.
* lisp/ob-js.el (org-babel-prep-session:js): Replace `mapc' + `lambda'
with `dolist'.
| -rw-r--r-- | lisp/ob-js.el | 12 |
1 files changed, 7 insertions, 5 deletions
diff --git a/lisp/ob-js.el b/lisp/ob-js.el index f55960f..f18aa9d 100644 --- a/lisp/ob-js.el +++ b/lisp/ob-js.el @@ -140,11 +140,13 @@ specifying a variable of the same value." (var-lines (org-babel-variable-assignments:js params))) (when session (org-babel-comint-in-buffer session - (sit-for .5) (goto-char (point-max)) - (mapc (lambda (var) - (insert var) (comint-send-input nil t) - (org-babel-comint-wait-for-output session) - (sit-for .1) (goto-char (point-max))) var-lines))) + (goto-char (point-max)) + (dolist (var var-lines) + (insert var) + (comint-send-input nil t) + (org-babel-comint-wait-for-output session) + (sit-for .1) + (goto-char (point-max))))) session)) (defun org-babel-variable-assignments:js (params) |