diff options
| author | Aaron Ecay <aaronecay@gmail.com> | 2013-04-01 01:42:16 -0400 |
|---|---|---|
| committer | Eric Schulte <schulte.eric@gmail.com> | 2013-04-03 09:17:22 -0600 |
| commit | 5b3508698bae853173984974d67b3431e7b621bc (patch) | |
| tree | 43151b88b1b862548779dadc86bef0bcad5b084f | |
| parent | 252238a60d28f1a77b2688001e11f7e9586ded5a (diff) | |
| download | org-mode-5b3508698bae853173984974d67b3431e7b621bc.tar.gz | |
Clean up org-babel-expand-body: functions for awk and picolisp
* lisp/ob-awk.el (org-babel-expand-body:awk),
lisp/ob-picolisp.el (org-babel-expand-body:picolisp): remove optional
arg from these functions
The optional argument is apparently never passed by org-babel code.
Maybe this is a relic of an earlier calling convention?
| -rw-r--r-- | lisp/ob-awk.el | 2 | ||||
| -rw-r--r-- | lisp/ob-picolisp.el | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/lisp/ob-awk.el b/lisp/ob-awk.el index f717fec..373d5fd 100644 --- a/lisp/ob-awk.el +++ b/lisp/ob-awk.el @@ -44,7 +44,7 @@ (defvar org-babel-awk-command "awk" "Name of the awk executable command.") -(defun org-babel-expand-body:awk (body params &optional processed-params) +(defun org-babel-expand-body:awk (body params) "Expand BODY according to PARAMS, return the expanded body." (dolist (pair (mapcar #'cdr (org-babel-get-header params :var))) (setf body (replace-regexp-in-string diff --git a/lisp/ob-picolisp.el b/lisp/ob-picolisp.el index e785366..1d17919 100644 --- a/lisp/ob-picolisp.el +++ b/lisp/ob-picolisp.el @@ -78,7 +78,7 @@ :version "24.1" :type 'string) -(defun org-babel-expand-body:picolisp (body params &optional processed-params) +(defun org-babel-expand-body:picolisp (body params) "Expand BODY according to PARAMS, return the expanded body." (let ((vars (mapcar #'cdr (org-babel-get-header params :var))) (result-params (cdr (assoc :result-params params))) |