From mboxrd@z Thu Jan 1 00:00:00 1970 From: stardiviner Subject: [PATCH] ob-shell initialize header arguments for other shell names too Date: Mon, 04 Jun 2018 12:07:21 +0800 Message-ID: <871sdnurd2.fsf@gmail.com> Reply-To: numbchild@gmail.com Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:41682) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1fPgmG-00010z-Ky for emacs-orgmode@gnu.org; Mon, 04 Jun 2018 00:07:29 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1fPgmC-00075B-4W for emacs-orgmode@gnu.org; Mon, 04 Jun 2018 00:07:28 -0400 Received: from [218.75.119.140] (port=35224 helo=dark.localdomain) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1fPgmB-00074k-OF for emacs-orgmode@gnu.org; Mon, 04 Jun 2018 00:07:24 -0400 List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: "Emacs-orgmode" To: org-mode --=-=-= Content-Type: text/x-patch Content-Disposition: attachment; filename=0001-ob-shell.el-Initialize-header-arguments-for-other-sh.patch >From 4519624de8543205533b89e05d14e308d891f45b Mon Sep 17 00:00:00 2001 From: stardiviner Date: Mon, 4 Jun 2018 12:02:55 +0800 Subject: [PATCH] ob-shell.el: Initialize header arguments for other shell names too * lisp/ob-shell.el (org-babel-shell-initialize) initialize org-babel-default-header-args: for shell names. --- lisp/ob-shell.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/ob-shell.el b/lisp/ob-shell.el index f7c6718c7..29086acd3 100644 --- a/lisp/ob-shell.el +++ b/lisp/ob-shell.el @@ -57,7 +57,8 @@ is modified outside the Customize interface." 'org-babel-variable-assignments:shell ,(format "Return list of %s statements assigning to the block's \ variables." - name))))) + name))) + (eval `(defvar ,(intern (concat "org-babel-default-header-args:" name)) '())))) (defcustom org-babel-shell-names '("sh" "bash" "zsh" "fish" "csh" "ash" "dash" "ksh" "mksh" "posh") -- 2.17.1 --=-=-= Content-Type: text/plain -- [ stardiviner ] don't need to convince with trends. Blog: https://stardiviner.github.io/ IRC(freenode): stardiviner GPG: F09F650D7D674819892591401B5DF1C95AE89AC3 --=-=-=--