自动用重音符号替换开引号

自动用重音符号替换开引号

沙罗哈,

我的 Emacs/AUCTeX 组合曾经自动用重音符号 ` 替换单个左引号 ',这是 LaTeX 的要求。后来,许多机器和 .emacs 文件都不再这样做了。我想这是一个 AUCTeX 选项,但我找不到它。(我以为它会在 Tex Quote AUCTeX 自定义菜单中,但没有。)

我怎样才能让单引号 ' 自动替换为 `?

答案1

将以下代码添加到您的.emacs。它将键绑定到一个函数,如果前面的字符是字母、数字、反斜杠(因为和在 LaTeX 中给出两个不同的重音),则'该函数插入撇号,否则插入另一个撇号(以适应),否则插入反引号。\`\'LaTeX ``quotes''

(eval-after-load "tex"
  '(define-key TeX-mode-map "'"
     '(lambda ()
    (interactive)
    (if (string-match "\\([[:alnum:]]\\|\\\\\\|'\\)" (string (char-before)))
        (insert "'")
      (insert  "`")))))

相关内容