From mboxrd@z Thu Jan 1 00:00:00 1970 From: Jarmo Hurri Subject: [PATCH] ob-java.el: Add header argument to pass command line args Date: Wed, 06 Nov 2019 12:29:57 +0200 Message-ID: <8736f18fh6.fsf@iki.fi> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Return-path: Received: from eggs.gnu.org ([2001:470:142:3::10]:44421) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1iSIZl-0005hb-4V for emacs-orgmode@gnu.org; Wed, 06 Nov 2019 05:30:10 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1iSIZk-000284-11 for emacs-orgmode@gnu.org; Wed, 06 Nov 2019 05:30:08 -0500 Received: from 195-159-176-226.customer.powertech.no ([195.159.176.226]:60712 helo=blaine.gmane.org) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1iSIZj-00026v-OA for emacs-orgmode@gnu.org; Wed, 06 Nov 2019 05:30:07 -0500 Received: from list by blaine.gmane.org with local (Exim 4.89) (envelope-from ) id 1iSIZg-000dxn-NL for emacs-orgmode@gnu.org; Wed, 06 Nov 2019 11:30:04 +0100 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: emacs-orgmode@gnu.org --=-=-= Content-Type: text/plain ... attached Jarmo --=-=-= Content-Type: text/x-patch Content-Disposition: attachment; filename=0001-ob-java.el-Add-header-argument-to-pass-command-line-.patch Content-Description: patch >From bbc3f977d6b98240834af8fb009a2a080813f30b Mon Sep 17 00:00:00 2001 From: Jarmo Hurri Date: Wed, 6 Nov 2019 12:21:16 +0200 Subject: [PATCH] ob-java.el: Add header argument to pass command line args. * lisp/ob-java.el (org-babel-execute:java): Handle new header argument `:cmdargs` and pass its value as the last element in call to java. --- lisp/ob-java.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/ob-java.el b/lisp/ob-java.el index b055f85e5..80308ec32 100644 --- a/lisp/ob-java.el +++ b/lisp/ob-java.el @@ -58,6 +58,7 @@ parameters may be used, like javac -verbose" (src-file (concat classname ".java")) (cmpflag (or (cdr (assq :cmpflag params)) "")) (cmdline (or (cdr (assq :cmdline params)) "")) + (cmdargs (or (cdr (assq :cmdargs params)) "")) (full-body (org-babel-expand-body:generic body params))) (with-temp-file src-file (insert full-body)) (org-babel-eval @@ -66,7 +67,7 @@ parameters may be used, like javac -verbose" (unless (or (not packagename) (file-exists-p packagename)) (make-directory packagename 'parents)) (let ((results (org-babel-eval (concat org-babel-java-command - " " cmdline " " classname) ""))) + " " cmdline " " classname " " cmdargs) ""))) (org-babel-reassemble-table (org-babel-result-cond (cdr (assq :result-params params)) (org-babel-read results) -- 2.21.0 --=-=-=--