Merge branch 'bugfix'
This commit is contained in:
commit
7d90507420
10
lisp/ox.el
10
lisp/ox.el
|
@ -6776,6 +6776,11 @@ or FILE."
|
|||
',ext-plist)))
|
||||
(with-temp-buffer
|
||||
(insert output)
|
||||
;; Ensure final newline. This is what was done
|
||||
;; historically, when we used `write-file'.
|
||||
;; Note that adding a newline is only safe for
|
||||
;; non-binary data.
|
||||
(unless (bolp) (insert "\n"))
|
||||
(let ((coding-system-for-write ',encoding))
|
||||
(write-region nil nil ,file)))
|
||||
(or (ignore-errors (funcall ',post-process ,file)) ,file)))
|
||||
|
@ -6783,6 +6788,11 @@ or FILE."
|
|||
backend subtreep visible-only body-only ext-plist)))
|
||||
(with-temp-buffer
|
||||
(insert output)
|
||||
;; Ensure final newline. This is what was done
|
||||
;; historically, when we used `write-file'.
|
||||
;; Note that adding a newline is only safe for
|
||||
;; non-binary data.
|
||||
(unless (bolp) (insert "\n"))
|
||||
(let ((coding-system-for-write encoding))
|
||||
(write-region nil nil file)))
|
||||
(when (and (org-export--copy-to-kill-ring-p) (org-string-nw-p output))
|
||||
|
|
Loading…
Reference in New Issue