branch: externals/org commit 80d1bc63fff8bb0f92ab4dab9c3b534ccb4d4d69 Merge: 001e114936 93339de71b Author: Ihor Radchenko <yanta...@posteo.net> Commit: Ihor Radchenko <yanta...@posteo.net>
Merge branch 'bugfix' --- lisp/ob-shell.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/ob-shell.el b/lisp/ob-shell.el index ba435966fe..7b2d5192c7 100644 --- a/lisp/ob-shell.el +++ b/lisp/ob-shell.el @@ -80,7 +80,7 @@ is modified outside the Customize interface." ,(format "Execute a block of %s commands with Babel." name) (let ((shell-file-name ,name) (org-babel-prompt-command - (or (alist-get ,name org-babel-shell-set-prompt-commands) + (or (cdr (assoc ,name org-babel-shell-set-prompt-commands)) (alist-get t org-babel-shell-set-prompt-commands)))) (org-babel-execute:shell body params)))) (eval `(defalias ',(intern (concat "org-babel-variable-assignments:" name))