如何使用文件局部变量设置Emacs缓冲区名称?

时间:2008-12-09 15:57:30

标签: emacs

我希望我的emacs缓冲区具有与文件名不同的名称。我不是每次都手动设置,而是希望根据文件内容自动执行此操作,例如:

//局部变量:
// buffer-name:MyName
//结束:

但这不起作用,因为buffer-name是一个函数,而不是一个变量。我怎么能这样做?

2 个答案:

答案 0 :(得分:12)

你可以说:

// Local Variables:
// eval: (rename-buffer "my-buffer-name-here")
// end:

虽然这是一招。

您可以在find-file-hook中编写.emacs钩子,将缓冲区重命名为特定的局部变量内容。类似的东西:

(defvar pdp-buffer-name nil)

(defun pdp-rename-buffer-if-necessary ()
  "Rename the current buffer according to the value of variable"
  (interactive)
  (if (and pdp-buffer-name (stringp pdp-buffer-name))
      (rename-buffer pdp-buffer-name)))

(add-hook 'find-file-hook 'pdp-rename-buffer-if-necessary)

然后在您的特定文件中

// Local Variables:
// pdp-buffer-name: "pierre" 
// end:

拥有更强大的脑力,你可以有更好的解决方案。

请注意,您的需求可能已经存在扩展。查看Emacs wiki

答案 1 :(得分:3)

谢谢皮埃尔。您的pdp-buffer-name elisp示例运行良好。

我做了一个增强,因为我注意到emacs将局部变量视为“不安全”,即始终提示询问是否应该应用该值。由于我希望这可以使用许多不同的值而不会使我的.emacs与“安全”值列表混淆,我添加了一条建议。使用上一个示例的命名法,它看起来像这样:

;; allow all values for "pdp-buffer-name"  
(defadvice safe-local-variable-p (after allow-pdp-buffer-name (sym val) activate)  
  (if (eq sym 'pdp-buffer-name)    
      (setq ad-return-value t))  
  )