mirrors
/
ob-tmux
mirror of https://github.com/ahendriksen/ob-tmux.git
1
0
Fork 0
Code Issues Releases Wiki Activity

Remove :cmd support 

It was not used and tmux has sensible defaults. I think it defaults to
bash now.
hello-test
Allard Hendriksen 2018-01-11 22:20:40 +01:00
parent d4752b9ec1
commit f75eb08f0c
1 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
ob-tmux.el
View File

@ -27,10 +27,11 @@
;; Org-Babel support for interactive terminals. Mostly shell scripts. ;; Org-Babel support for interactive terminals. Mostly shell scripts.
;; Heavily inspired by 'eev' from Eduardo Ochs ;; Heavily inspired by 'eev' from Eduardo Ochs
;; ;;
;; Adding :cmd and :terminal as header arguments ;; Adding :terminal as header arguments
;; :terminal must support the -T (title) and -e (command) parameter ;; :terminal must support the -T (title) and -e (command) parameter
;; or allow for the command to be added after '--'
;; ;;
;; You can test the default setup. (xterm + sh) with ;; You can test the default setup. (gnome-terminal) with
;; M-x org-babel-tmux-test RET ;; M-x org-babel-tmux-test RET
;;; Code: ;;; Code:
@ -45,7 +46,9 @@ In case you want to use a different tmux than one selected by your $PATH")
"The string that will be prefixed to tmux sessions started by ob-tmux") "The string that will be prefixed to tmux sessions started by ob-tmux")
(defvar org-babel-default-header-args:tmux (defvar org-babel-default-header-args:tmux
'((:results . "silent") (:session . "default") (:cmd . "bash") (:terminal . "gnome-terminal")) '((:results . "silent")
(:session . "default")
(:terminal . "gnome-terminal"))
"Default arguments to use when running tmux source blocks.") "Default arguments to use when running tmux source blocks.")
(defun org-babel-execute:tmux (body params) (defun org-babel-execute:tmux (body params)
@ -68,7 +71,6 @@ PARAMS. Starts a terminal window if the tmux session does not yet
exist. No terminal window is started, if the only tmux window exist. No terminal window is started, if the only tmux window
must be created." must be created."
(let* ((session (cdr (assq :session params))) (let* ((session (cdr (assq :session params)))
(cmd (cdr (assq :cmd params)))
(terminal (cdr (assq :terminal params))) (terminal (cdr (assq :terminal params)))
(session-alive (org-babel-tmux-session-alive-p session)) (session-alive (org-babel-tmux-session-alive-p session))
(window-alive (org-babel-tmux-window-alive-p session))) (window-alive (org-babel-tmux-window-alive-p session)))