Send strings literally

When a command in the tmux source code block ended with a semi-colon,
it was previously ignored. Now we send the keys with the -l option to
send the line literally.
hello-test
Allard Hendriksen 2018-04-19 10:49:41 +02:00
parent 43f815da1c
commit c8ee803a5f
1 changed files with 10 additions and 4 deletions

View File

@ -129,11 +129,17 @@ must be created."
"If SESSION exists, send a line of text to it."
(let ((alive (org-babel-tmux-session-alive-p session)))
(when alive
(start-process "tmux-send-keys" "*Messages*"
"tmux" "send-keys"
"-t" (org-babel-tmux-target-session session)
(start-process "tmux-send-keys"
"*Messages*"
"tmux"
"send-keys"
"-l"
"-t"
(concat (org-babel-tmux-session session)
":"
(org-babel-tmux-window-default session))
line
"Enter"))))
"\n"))))
(defun org-babel-tmux-session-execute-string (session body)
"If SESSION exists, send BODY to it."