Pārlūkot izejas kodu

added some `sit-for' statements to make ruby inf session prep more reliable

Eric Schulte 16 gadi atpakaļ
vecāks
revīzija
f2444e39e9
1 mainītis faili ar 5 papildinājumiem un 2 dzēšanām
  1. 5 2
      lisp/langs/org-babel-ruby.el

+ 5 - 2
lisp/langs/org-babel-ruby.el

@@ -62,7 +62,7 @@ called by `org-babel-execute-src-block'."
 
 (defun org-babel-prep-session:ruby (session params)
   "Prepare SESSION according to the header arguments specified in PARAMS."
-  (message "prep called with %S %S" session params)
+  ;; (message "params=%S" params) ;; debugging
   (let* ((session (org-babel-ruby-initiate-session session))
          (vars (org-babel-ref-variables params))
          (var-lines (mapcar ;; define any variables
@@ -71,10 +71,13 @@ called by `org-babel-execute-src-block'."
                                (car pair)
                                (org-babel-ruby-var-to-ruby (cdr pair))))
                      vars)))
+    ;; (message "vars=%S" vars) ;; debugging
     (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)) var-lines))))
+              (org-babel-comint-wait-for-output session)
+              (sit-for .1) (goto-char (point-max))) var-lines))))
 
 ;; helper functions