added 'var' as a possible header argument to be read from outline properties

This commit is contained in:
Eric Schulte 2009-08-01 18:10:17 -06:00
parent 735a1556b6
commit 8506995b9d
2 changed files with 4 additions and 2 deletions

View File

@ -325,7 +325,7 @@ may be specified in the properties of the current outline entry."
(when val (when val
;; (message "param-from-property %s=%s" header-arg val) ;; debugging statement ;; (message "param-from-property %s=%s" header-arg val) ;; debugging statement
(cons (intern (concat ":" header-arg)) val)))) (cons (intern (concat ":" header-arg)) val))))
'("results" "exports" "tangle"))))) '("results" "exports" "tangle" "var")))))
(defun org-babel-parse-src-block-match () (defun org-babel-parse-src-block-match ()
(let* ((lang (org-babel-clean-text-properties (match-string 1))) (let* ((lang (org-babel-clean-text-properties (match-string 1)))

View File

@ -1144,6 +1144,7 @@ to the command if BUFF is not given.)
*** test-header with properties *** test-header with properties
:PROPERTIES: :PROPERTIES:
:tangle: yes :tangle: yes
:var: def=8
:END: :END:
Ahh... as is so often the case, just had to wrap Ahh... as is so often the case, just had to wrap
@ -1154,8 +1155,9 @@ Ahh... as is so often the case, just had to wrap
#+srcname: default-props-implementation #+srcname: default-props-implementation
#+begin_src emacs-lisp :tangle no :var my-lis=why-def-props-cause-probs :results silent #+begin_src emacs-lisp :tangle no :var my-lis=why-def-props-cause-probs :results silent
(length my-lis) (+ (length my-lis) def)
#+end_src #+end_src
** DONE new reference syntax *inside* source code blocks ** DONE new reference syntax *inside* source code blocks
This is from an email discussion on the org-mode mailing list with This is from an email discussion on the org-mode mailing list with
Sébastien. The goal here is to mimic the source-block reference style Sébastien. The goal here is to mimic the source-block reference style