babel: bug fix in exporter wrt: contents of lob info lists

* contrib/babel/lisp/org-babel-exp.el (org-babel-exp-lob-one-liners):
  exportation of #+lob and #+call type lines is now correctly handling
  the addition of the indentation information to the info list
This commit is contained in:
Eric Schulte 2010-06-11 10:16:56 -07:00
parent a5712e4b0a
commit 1da53c668a
1 changed files with 13 additions and 11 deletions

View File

@ -135,6 +135,7 @@ options are taken from `org-babel-default-header-args'."
(while (and (< (point) end)
(re-search-forward org-babel-lob-one-liner-regexp nil t))
(setq replacement
(let ((lob-info (org-babel-lob-get-info)))
(save-match-data
(org-babel-exp-do-export
(list "emacs-lisp" "results"
@ -144,8 +145,9 @@ options are taken from `org-babel-default-header-args'."
(org-babel-clean-text-properties
(concat ":var results="
(mapconcat #'identity
(org-babel-lob-get-info) " "))))))
'lob)))
(butlast lob-info) " ")))))
(car (last lob-info)))
'lob))))
(setq end (+ end (- (length replacement) (length (match-string 0)))))
(replace-match replacement t t)))))