Jak dodać funkcję (wariant latexmk) do listy poleceń TeX w AUCTeX?

Question

używam następującą funkcję z Latex, Emacs: automatically open *TeX Help* buffer on error and close it after correction of the error? do opracowania dokumentów .tex poprzez latexmk:

(defun run-latexmk() 
    (interactive) 
    (let ((TeX-save-query nil) 
     (TeX-process-asynchronous nil) 
     (master-file (TeX-master-file))) 
    (TeX-save-document "") 
    (TeX-run-TeX "latexmk" 
       (TeX-command-expand "latexmk -pdf %s" 'TeX-master-file); adjusted 
       master-file) 
    (if (plist-get TeX-error-report-switches (intern master-file)) 
     (TeX-next-error t) 
     (progn 
    (demolish-tex-help) 
    (minibuffer-message "latexmk: Done"))))) 

Jak mogę „dodać” tę funkcję do TeX-command-list tak że C-c C-c w plikach .tex wykonuje tę funkcję? [C-c C-c powinien używać run-latexmk jako domyślny, gdy wykonywane na plikach .tex]

Próbowałem

(add-hook 'LaTeX-mode-hook 
     (lambda() 
     (add-to-list 'TeX-command-list 
      '("latexmk" #'run-latexmk 
       TeX-run-command nil t :help "Run latexmk") t) 
     (setq TeX-command-default "latexmk"))) 

ale nie jest on z komunikatem: TeX-command-expand: Wrong type argument: stringp, (function run-latexmk) (wzięte od * Messages *)

Answer 1

nie chcesz używać TeX-run-command, ponieważ służy do uruchamiania polecenia powłoki. Będziesz chciał uruchomić TeX-run-function, ale nadal przyjmuje "funkcję" jako ciąg, więc powinieneś powiedzieć (untested):

(add-hook 'LaTeX-mode-hook 
    (lambda() 
    (add-to-list 'TeX-command-list 
      '("latexmk" "(run-latexmk)" 
      TeX-run-function nil t :help "Run latexmk") t) 
    (setq TeX-command-default "latexmk")))