Procházet zdrojové kódy

org-babel-screen: now parsing it's own parameters

Benjamin Andresen před 15 roky
rodič
revize
c1ee488f45
1 změnil soubory, kde provedl 3 přidání a 1 odebrání
  1. 3 1
      contrib/babel/lisp/langs/org-babel-screen.el

+ 3 - 1
contrib/babel/lisp/langs/org-babel-screen.el

@@ -55,7 +55,9 @@ In case you want to use a different screen than one selected by your $PATH")
 \"default\" session is be used when none is specified."
   (message "Sending source code block to interactive terminal session...")
   (save-window-excursion
-    (let ((socket (org-babel-screen-session-socketname session)))
+    (let* ((processed-params (org-babel-process-params params))
+           (session (first processed-params))
+           (socket (org-babel-screen-session-socketname session)))
       (unless socket (org-babel-prep-session:screen session params))
       (org-babel-screen-session-execute-string session body))))