(更新)
这是一个带有文件局部变量的解决方案:
在你的文件中:
;; -*- preferred-buffer-name: "purtsl"; -*-
在.emacs中:
(defun change-buffer-name ()
(if (boundp 'preferred-buffer-name)
(rename-buffer preferred-buffer-name)))
(add-hook 'find-file-hook 'change-buffer-name t)
你可能需要自定义 安全,局部变量的值 和/或 使局部变量 ,
取决于您有多少项目,安全考虑因素以及您回答安全问题的烦恼程度。
这是一种不同的方法。
它检查包含目录的名称
然后将缓冲区的名称更改为/ WS:
(defun find-file-custom (filename)
"open filename and set buffer name to <project>/WS"
(interactive "F")
(find-file filename)
(rename-buffer (concat "<" (file-name-nondirectory
(directory-file-name
(file-name-directory (buffer-file-name)))) ">/WS")))
!
对于“可能不安全的文件局部变量”提示,Emacs会在你的custom.el文件中注意到它以后不应该提示该文件的局部变量。