forked from mirrors/org-mode
org-babel-expand-body:screen
This commit is contained in:
parent
35434e1389
commit
e6c979f0d7
|
@ -50,6 +50,8 @@ In case you want to use a different screen than one selected by your $PATH")
|
|||
'((:results . "silent") (:session . "default") (:cmd . "sh") (:terminal . "xterm"))
|
||||
"Default arguments to use when running screen source blocks.")
|
||||
|
||||
(defun org-babel-expand-body:screen (body params &optional processed-params) body)
|
||||
|
||||
(defun org-babel-execute:screen (body params)
|
||||
"Send a block of code via screen to a terminal using org-babel.
|
||||
\"default\" session is be used when none is specified."
|
||||
|
@ -59,7 +61,8 @@ In case you want to use a different screen than one selected by your $PATH")
|
|||
(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))))
|
||||
(org-babel-screen-session-execute-string
|
||||
session (org-babel-expand-body:screen body)))))
|
||||
|
||||
(defun org-babel-prep-session:screen (session params)
|
||||
"Prepare SESSION according to the header arguments specified in PARAMS."
|
||||
|
|
Loading…
Reference in a new issue