Hi,

Why use command to match against TeX-command-output-list instead of *name* ?


For example, in =tex-buf.el=,

(defun TeX-run-set-command (name command)
>   "Remember TeX command to use to NAME and set corresponding output
> extension."
>   (setq TeX-command-default name
> TeX-output-extension
> (if (and (null (TeX-PDF-from-DVI)) TeX-PDF-mode) "pdf" "dvi"))
>   (let ((case-fold-search t)
> (lst TeX-command-output-list))
>     (while lst
>       ******************          (if (string-match (car (car lst))
> command) **********************************
>  (setq TeX-output-extension (car (cdr (car lst)))
> lst nil)
> (setq lst (cdr lst))))))



Matching against *name* instead of *command* will be more natural and
flexible.
-- 
Best,
Shiyao

Reply via email to