diff -u auctex-11.87.tmp/tex-buf.el auctex-11.87/tex-buf.el --- auctex-11.87.tmp/tex-buf.el 2014-08-24 12:20:09.911400123 +0200 +++ auctex-11.87/tex-buf.el 2014-08-24 12:01:40.451359465 +0200 @@ -321,8 +321,8 @@ (TeX-process-set-variable file 'TeX-command-next TeX-command-Show) (funcall hook name command file))) -(defun TeX-command-expand (command file &optional list) - "Expand COMMAND for FILE as described in LIST. +(defun TeX-command-expand (command filefunc &optional list) + "Expand COMMAND for FILEFUNC as described in LIST. LIST default to `TeX-expand-list'. As a special exception, `%%' can be used to produce a single `%' sign in the output without further expansion." @@ -332,7 +332,7 @@ (file `(lambda (&rest args) (shell-quote-argument (concat (and (stringp TeX-command-pos) TeX-command-pos) - (apply ',file args) + (apply ',filefunc args) (and (stringp TeX-command-pos) TeX-command-pos))))) expansion-res case-fold-search string expansion arguments) (setq list (cons diff -u auctex-11.87.tmp/tex.el auctex-11.87/tex.el --- auctex-11.87.tmp/tex.el 2014-08-24 12:22:03.527404286 +0200 +++ auctex-11.87/tex.el 2014-08-24 11:57:35.895350503 +0200 @@ -494,7 +494,7 @@ (setq pos (+ pos (length TeX-command-text) 9) TeX-command-pos (and (string-match " " - (funcall file t t)) + (funcall filefunc t t)) "\"")) (concat TeX-command-text " \"\\input\"")) (setq TeX-command-pos nil)