Mercurial > hgrepos > hgweb.cgi > yatex
diff yatexprc.el @ 605:38a414d755c1 draft dev
PDFnative typesetter
author | HIROSE Yuuji <yuuji@gentei.org> |
---|---|
date | Fri, 02 Dec 2022 08:42:22 +0859 |
parents | 638284a7a9d0 |
children |
line wrap: on
line diff
--- a/yatexprc.el Thu Dec 01 18:55:43 2022 +0859 +++ b/yatexprc.el Fri Dec 02 08:42:22 2022 +0859 @@ -1,7 +1,7 @@ ;;; yatexprc.el --- YaTeX process handler -*- coding: sjis -*- ;;; ;;; (c)1993-2022 by HIROSE Yuuji.[yuuji@yatex.org] -;;; Last modified Thu Sep 29 09:56:02 2022 on firestorm +;;; Last modified Thu Dec 1 19:13:20 2022 on firestorm ;;; $Id$ ;;; Code: @@ -184,7 +184,8 @@ (ppprop (get 'YaTeX-typeset-process 'ppcmd)) (ppcmd (cdr (assq proc ppprop))) (bcprop (get 'YaTeX-typeset-process 'bibcmd)) - (bibcmd (cdr (assq proc bcprop)))) + (bibcmd (cdr (assq proc bcprop))) + (useluatex (string-match "lua.*tex" thiscmd))) (put 'YaTeX-typeset-process 'ppcmd ;erase ppcmd (delq (assq proc ppprop) ppprop)) (put 'YaTeX-typeset-process 'bibcmd ;erase bibcmd @@ -286,8 +287,14 @@ ;; If ppcmd is set and it is a function symbol, ;; call it whenever command succeeded or not (funcall ppcmd)) - ((and ppcmd (string-match "finish" mes)) - (insert (format "=======> Success! Calling %s\n" ppcmd)) + ((and ppcmd (string-match "finish" mes) + ;; It is bad way to detect the necessity of + ;; pdf-conversion by seeing typesetter name because + ;; new typesetter other than lua(la)tex might come. + ;; More reasonable way is to determine by the + ;; existence of PDF file. + (not useluatex)) + (insert (format "=======> Success! Calling %s\n" ppcmd)) (setq mode-name ; set process name (concat mode-name "+"