Fix LaTeX export of subtrees and inline tasks

This commit is contained in:
Nicolas Goaziou 2010-11-06 13:24:27 +01:00
parent 5ecd79ea74
commit 9be9f727f8
3 changed files with 4 additions and 3 deletions

View File

@ -984,7 +984,7 @@ value of `org-export-run-in-background'."
(set-process-sentinel p 'org-export-process-sentinel)
(message "Background process \"%s\": started" p))
;; background processing not requested, or not possible
(if subtree-p (progn (outline-mark-subtree) (activate-mark)))
(if subtree-p (progn (org-mark-subtree) (activate-mark)))
(call-interactively (nth 1 ass))
(when (and bpos (get-buffer-window cbuf))
(let ((cw (selected-window)))

View File

@ -1325,7 +1325,7 @@ If END is non-nil, it is the end of the region."
(save-excursion
(goto-char (or beg (point-min)))
(let* ((pt (point))
(end (if (re-search-forward "^\\*+ " end t)
(end (if (re-search-forward (org-get-limited-outline-regexp) end t)
(goto-char (match-beginning 0))
(goto-char (or end (point-max))))))
(prog1

View File

@ -18593,7 +18593,8 @@ If point is in an inline task, mark that task instead."
(cond
(inline-task-p (org-inlinetask-goto-beginning))
((org-at-heading-p) (beginning-of-line))
(t (outline-previous-visible-heading 1)))
(t (let ((outline-regexp (org-get-limited-outline-regexp)))
(outline-previous-visible-heading 1))))
(setq beg (point))
;; Get end of it
(if inline-task-p