mirrors
/
org-mode
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git
0
0
Fork 1
Code Releases Activity

Customizable wrapper for variables in perl code 

* lisp/ob-perl.el (org-babel-perl-var-wrap): Customizable wrapper for
  variables in perl code.
  (org-babel-perl-var-to-perl): Use said wrapper.
This commit is contained in:
Eric Schulte 2013-02-24 09:48:31 -07:00
parent ebf13a39fc
commit f30866b03b
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/ob-perl.el
View File

@ -69,13 +69,16 @@ This function is called by `org-babel-execute-src-block'."
;; helper functions
(defvar org-babel-perl-var-wrap "q(%s)"
"Wrapper for variables inserted into Perl code.")
(defun org-babel-perl-var-to-perl (var)
"Convert an elisp value to a perl variable.
The elisp value, VAR, is converted to a string of perl source code
specifying a var of the same value."
(if (listp var)
(concat "[" (mapconcat #'org-babel-perl-var-to-perl var ", ") "]")
(format "%S" var)))
(format org-babel-perl-var-wrap var)))
(defvar org-babel-perl-buffers '(:default . nil))