mirror/org-mode
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-12-29 11:02:33 +00:00
Code

Bugfix: Avoid raising buffer-modified flag during LaTeX export

Browse Source 
This had, as usually, to do with changing text properties.

Report by Russel Adams.
This commit is contained in:
Carsten Dominik 2009-02-22 20:50:12 +01:00
parent 244a330cb5
commit a93c5d2e2e
2 changed files with 10 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/ChangeLog
View File

@ -1,5 +1,9 @@
2009-02-22 Carsten Dominik <carsten.dominik@gmail.com>
* org-export-latex.el (org-export-as-latex)
(org-export-latex-first-lines): Avoid modification flag when
adding or removing text properties.
* org.el (orgstruct++-mode): New function.
(turn-on-orgstruct++): Call `orgstruct++-mode'.
(org-context-p): Allow detecting item context after the first line

10
lisp/org-export-latex.el
View File

@ -388,8 +388,9 @@ when PUB-DIR is set, use this as the publishing directory."
(error "Need a file name to be able to export")))
(message "Exporting to LaTeX...")
(remove-text-properties (point-min) (point-max)
'(:org-license-to-kill nil))
(org-unmodified
(remove-text-properties (point-min) (point-max)
'(:org-license-to-kill nil)))
(org-update-radio-target-regexp)
(org-export-latex-set-initial-vars ext-plist arg)
(let* ((wcf (current-window-configuration))
@ -803,8 +804,9 @@ If BEG is non-nil, the is the beginning of he region."
:LaTeX-fragments nil
:timestamps (plist-get opt-plist :timestamps)
:footnotes (plist-get opt-plist :footnotes)))
(add-text-properties pt (max pt (1- end))
'(:org-license-to-kill t))))))
(org-unmodified
(add-text-properties pt (max pt (1- end))
'(:org-license-to-kill t)))))))
(defun org-export-latex-collect-header-macros (&optional title)
"Find the various definitions in #+... lines and define TeX macros for them."