Fix LaTeX export of subtrees and inline tasks
This commit is contained in:
parent
5ecd79ea74
commit
9be9f727f8
|
@ -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)))
|
||||
|
|
|
@ -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
|
||||
|
|
|
@ -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
|
||||
|
|
Loading…
Reference in New Issue