mirror/org-mode
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-11-21 06:55:35 +00:00
Code

ox-texinfo: Check for math support without warnings and quietly

Browse Source 
* lisp/ox-texinfo.el (org-texinfo-supports-math-p): Two
improvements: (1) Fix the incorrect `.info' extension used for the
temporary `.texi' file.  This removes the warning "makeinfo: warning:
input file testXXX.info; did you mean testXXX.texi?" (2) Suppress
output when compiling the "Is math supported?" test file.  This is to
avoid user confusion, as the user cares about their Texinfo file, not
implementation details.  This removes the message "Processing Texinfo
file /var/.../testXXX.info...".
This commit is contained in:
Rudolf Adamkovic 2024-08-27 11:10:56 +02:00 committed by Ihor Radchenko
parent d8fc26aefa
commit fac0787e16
No known key found for this signature in database
GPG Key ID: 6470762A7DA11D8B
1 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
lisp/ox-texinfo.el
View File

@ -2037,9 +2037,12 @@ Once computed, the results remain cached."
(unless (boundp 'org-texinfo-supports-math--cache)
(setq org-texinfo-supports-math--cache
(let ((math-example "1 + 1 = 2"))
(let* ((input-file (make-temp-file "test" nil ".info"))
(let* ((input-file (make-temp-file "test" nil ".texi"))
(output-file
(file-name-with-extension
(file-name-sans-extension input-file) "info"))
(input-content (string-join
(list (format "@setfilename %s" input-file)
(list (format "@setfilename %s" output-file)
"@node Top"
"@displaymath"
math-example
@ -2050,7 +2053,8 @@ Once computed, the results remain cached."
(when-let* ((output-file
;; If compilation fails, consider math to
;; be not supported.
(ignore-errors (org-texinfo-compile input-file)))
(ignore-errors (let ((inhibit-message t))
(org-texinfo-compile input-file))))
(output-content (with-temp-buffer
(insert-file-contents output-file)
(buffer-string))))