[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: expand-file-name
From: |
luis . finotti |
Subject: |
Re: expand-file-name |
Date: |
Mon, 10 Mar 2014 10:57:44 -0700 (PDT) |
User-agent: |
G2/1.0 |
On Thursday, March 6, 2014 5:25:06 PM UTC-5, Michael Heerdegen wrote:
> luis.finotti@gmail.com writes:
>
>
>
> > where %(dir) is defined (in custom-set-variables) as
>
> >
>
> > ("%(dir)" (lambda nil (expand-file-name default-directory)))
>
>
>
> What does "defined" mean - do you add this to `TeX-expand-list'?
What I meant was it appears like this in my .emacs:
(custom-set-variables
;; custom-set-variables was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
'(TeX-expand-list (quote (("%p" TeX-printer-query) ("%q" (lambda nil
(TeX-printer-query t))) ("%V" (lambda nil
(TeX-source-correlate-start-server-maybe) (TeX-view-command-raw))) ("%vv"
(lambda nil (TeX-source-correlate-start-server-maybe) (TeX-output-style-check
TeX-output-view-style))) ("%v" (lambda nil
(TeX-source-correlate-start-server-maybe) (TeX-style-check TeX-view-style)))
("%r" (lambda nil (TeX-style-check TeX-print-style))) ("%l" (lambda nil
(TeX-style-check LaTeX-command-style))) ("%(PDF)" (lambda nil (if (and (eq
TeX-engine (quote default)) (or TeX-PDF-mode TeX-DVI-via-PDFTeX)) "pdf" "")))
("%(PDFout)" (lambda nil (cond ((and (eq TeX-engine (quote xetex)) (not
TeX-PDF-mode)) " -no-pdf") ((and (eq TeX-engine (quote luatex)) (not
TeX-PDF-mode)) " --output-format=dvi") ((and (eq TeX-engine (quote default))
(not TeX-PDF-mode) TeX-DVI-via-PDFTeX) " \"\\pdfoutput=0 \"") (t ""))))
("%(mode)" (lambda nil (if TeX-interactive-mode "" "
-interaction=nonstopmode"))) ("%(o?)" (lambda nil (if (eq TeX-engine (quote
omega)) "o" ""))) ("%(tex)" (lambda nil (eval (nth 2 (assq TeX-engine
(TeX-engine-alist)))))) ("%(latex)" (lambda nil (eval (nth 3 (assq TeX-engine
(TeX-engine-alist)))))) ("%(execopts)" ConTeXt-expand-options) ("%S"
TeX-source-correlate-expand-options) ("%dS"
TeX-source-specials-view-expand-options) ("%cS"
TeX-source-specials-view-expand-client) ("%(outpage)" (lambda nil (if
TeX-source-correlate-output-page-function (funcall
TeX-source-correlate-output-page-function) "1"))) ("%s" file nil t) ("%t" file
t t) ("%`" (lambda nil (setq TeX-command-pos t TeX-command-text ""))) (" \"\\"
(lambda nil (if (eq TeX-command-pos t) (setq TeX-command-pos pos pos (+ 3 pos))
(setq pos (1+ pos))))) ("\"" (lambda nil (if (numberp TeX-command-pos) (setq
TeX-command-text (concat TeX-command-text (substring command TeX-command-pos
(1+ pos))) command (concat (substring command 0 TeX-command-pos) (substring
command (1+ pos))) pos TeX-command-pos TeX-command-pos t) (setq pos (1+
pos))))) ("%'" (lambda nil (prog1 (if (stringp TeX-command-text) (progn (setq
pos (+ (length TeX-command-text) 9) TeX-command-pos (and (string-match " "
(funcall file t t)) "\"")) (concat TeX-command-text " \"\\input\"")) (setq
TeX-command-pos nil) "") (setq TeX-command-text nil)))) ("%n" TeX-current-line)
("%d" file "dvi" t) ("%f" file "ps" t) ("%o" (lambda nil (funcall file
(TeX-output-extension) t))) ("%b" TeX-current-file-name-master-relative) ("%m"
preview-create-subdirectory) ("%(dir)" (lambda nil (expand-file-name
default-directory)))))))
(custom-set-faces
;; custom-set-faces was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
)
OTOH, it is now working again. I am not sure what was the problem... Sorry
for the noise...
Best to all,
Luis