emacs - 在 .emacs 中获取不带扩展名的缓冲区文件名

Question

我正在尝试为链接到可移植 LaTeX 编译器和 R for Sweave 的可移植 emacs 创建快捷方式，但我对 .emacs 中使用的语言知之甚少(这是 Lisp？)

目前我正在使用从Link 获得的fullpath-relative-to-current-file获取 .emacs 的路径(在 USBDRIVE/Documents 中)，然后获取编译器的相对路径并在 buffer-file-name 上调用它 这是完整的路径和文件名，包括扩展名的扩展名:

(global-set-key (kbd "C-c s")
        (lambda ()
          (interactive)
            (cond ((string-equal (file-name-extension (buffer-file-name)) "tex") 
                (shell-command (concat (fullpath-relative-to-current-file "../PortableApps/miktex/miktex/bin/pdflatex ") buffer-file-name)))
            )
            (cond ((string-equal (file-name-extension (buffer-file-name)) "Rnw") 
                (shell-command (concat (fullpath-relative-to-current-file "../PortableApps/R/R-2.14.1/bin/R CMD Sweave ") buffer-file-name " --pdf")))
            )
        )
)   

这让我可以使用 C-c s 在 tex 文件上运行 LaTeX，在 Rnw 文件上运行 Sweave。现在我想包括对 bibtex 的调用，但为此我需要没有扩展名的 tex 文件的文件名和路径。我该怎么做？

Answer 1

试试 file-name-sans-extension。有关详细信息，请阅读 File Name Components手册的一部分。