diff options
author | Glenn Morris <rgm@gnu.org> | 2021-02-28 15:13:07 -0800 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2021-02-28 15:13:07 -0800 |
commit | 18e1455c8ae851791a047dc56eef972cc24e5b6c (patch) | |
tree | f123b9d51147d4a290164c4dc074a9ba9cdd45ad | |
parent | 63026d8af38da0a380ef3db40c2a9911fc196e26 (diff) | |
download | emacs-18e1455c8ae851791a047dc56eef972cc24e5b6c.tar.gz |
Make generation of texi from org overwrite output
* doc/misc/Makefile.in (org_template): Don't delete output.
* lisp/org/ox-texinfo.el (org-texinfo-export-to-texinfo-batch):
Overwrite existing output.
-rw-r--r-- | doc/misc/Makefile.in | 1 | ||||
-rw-r--r-- | lisp/org/ox-texinfo.el | 7 |
2 files changed, 3 insertions, 5 deletions
diff --git a/doc/misc/Makefile.in b/doc/misc/Makefile.in index 662537b4512..060bffa638b 100644 --- a/doc/misc/Makefile.in +++ b/doc/misc/Makefile.in @@ -237,7 +237,6 @@ emacs = "${EMACS}" -batch --no-site-file --no-site-lisp # things like org-setup's "version" macro work. Sigh. define org_template $(1:.org=.texi): $(1) - @rm -f $$@ $${AM_V_GEN}cd "$${srcdir}" && $${emacs} -l ox-texinfo \ -f org-texinfo-export-to-texinfo-batch $$(notdir $$<) $$(notdir $$@) endef diff --git a/lisp/org/ox-texinfo.el b/lisp/org/ox-texinfo.el index 78d58beadd6..6e8d0d62141 100644 --- a/lisp/org/ox-texinfo.el +++ b/lisp/org/ox-texinfo.el @@ -1629,17 +1629,16 @@ Return output file's name." (defun org-texinfo-export-to-texinfo-batch () "Export Org file INFILE to Texinfo file OUTFILE, in batch mode. +Overwrites existing output file. Usage: emacs -batch -f org-texinfo-export-to-texinfo-batch INFILE OUTFILE" (or noninteractive (user-error "Batch mode use only")) (let ((infile (pop command-line-args-left)) (outfile (pop command-line-args-left)) - (org-export-coding-system org-texinfo-coding-system)) + (org-export-coding-system org-texinfo-coding-system) + (make-backup-files nil)) (unless (file-readable-p infile) (message "File `%s' not readable" infile) (kill-emacs 1)) - (when (file-exists-p outfile) - (message "File `%s' already exists" outfile) - (kill-emacs 1)) (with-temp-buffer (insert-file-contents infile) (org-export-to-file 'texinfo outfile)))) |