Python 如何在主模式钩子中访问目录局部变量?

Python 如何在主模式钩子中访问目录局部变量?,python,emacs,python-mode,dot-emacs,Python,Emacs,Python Mode,Dot Emacs,我定义了一个.dir-locals.el文件,其内容如下: ((python-mode . ((cr/virtualenv-name . "saas")))) 在my.emacs中,我使用以下函数检索此值并提供virtualenv路径: (defun cr/virtualenv () (cond (cr/virtualenv-name (format "%s/%s" virtualenv-base cr/virtualenv-name)) ((getenv "EMACS_V

我定义了一个.dir-locals.el文件,其内容如下:

((python-mode . ((cr/virtualenv-name . "saas"))))
在my.emacs中,我使用以下函数检索此值并提供virtualenv路径:

(defun cr/virtualenv ()
  (cond (cr/virtualenv-name (format "%s/%s" virtualenv-base cr/virtualenv-name))
        ((getenv "EMACS_VIRTUAL_ENV") (getenv "EMACS_VIRTUAL_ENV"))
        (t "~/.emacs.d/python")))
最后,在我的python模式钩子列表中,我有一个钩子函数:

(add-hook 'python-mode-hook 'cr/python-mode-shell-setup)

(defun cr/python-mode-shell-setup ()
  (message "virtualenv-name is %s" cr/virtualenv-name)
  (let ((python-base (cr/virtualenv)))
    (cond ((and (fboundp 'ipython-shell-hook) (file-executable-p (concat python-base "/bin/ipython")))
           (setq python-python-command (concat python-base "/bin/ipython"))
           (setq py-python-command (concat python-base "/bin/ipython"))
           (setq py-python-command-args '( "-colors" "NoColor")))
          (t
           (setq python-python-command (concat python-base "/bin/python"))
           (setq py-python-command (concat python-base "/bin/python"))
           (setq py-python-command-args nil)))))
当我打开一个新的python文件时,
cr/python mode shell setup
记录的消息表明
cr/virtualenv name
nil
。然而,当我使用C-hv这个名字时,我得到的是“saas”


显然这里有一个加载顺序问题;有没有办法让我的模式钩子语句响应目录局部变量?

发生这种情况的原因是
正常模式
调用
(设置自动模式)
(破解局部变量)

但是,
hack local variables hook
是在处理局部变量之后运行的,它支持一些解决方案:

  • 第一个是让Emacs为每个主要模式运行一个新的“局部变量挂钩”:

    (添加hook'hack local variables hook'run local vars mode hook)
    (取消运行本地vars模式挂钩()
    “在处理完局部变量后,运行主模式的钩子。”
    (运行钩子(内部(concat(符号名称主模式)“-本地变量钩子”))
    (添加钩子“python模式本地变量钩子”cr/python模式shell设置)
    
    (使用这种方法,可以不经修改地使用原始函数。)

  • 第二个选项是使用可选的
    LOCAL
    参数
    addhook
    ,使指定的函数缓冲区成为本地的。使用这种方法,您可以按如下方式编写钩子:

    (添加hook'python mode hook'cr/python mode shell设置)
    (取消cr/python模式shell设置()
    (添加hook’hack局部变量hook
    (lambda()(消息“virtualenv name是%s”cr/virtualenv name)
    (let((pythonbase(cr/virtualenv)))
    (cond((和(fboundp'ipythonshell hook)(file-executable-p(concat-python-base)/bin/ipython)))
    (setq python命令(concat python base)/bin/ipython)
    (setq py python命令(concat python base)/bin/ipython)
    (setq py python命令args'(“-colors”“NoColor”))
    (t
    (setq python命令(concat python base)/bin/python)
    (setq py python命令(concat python base)/bin/python)
    (setq py python命令args nil(()()))
    无);;缓冲区局部hack局部变量钩子
    
    i、 e.
    python模式钩子
    首先运行,并使用
    hack local variables钩子
    仅为当前缓冲区注册匿名函数;然后在处理完局部变量后调用该函数

  • Lindydancer的评论引发了第三种方法。它不像其他两个一样干净,但无论如何都很有趣。我不喜欢导致调用两次
    (hack local variables)
    ,但我发现如果您在本地设置
    本地启用本地变量
    缓冲区,它会阻止
    (hack local variables)
    执行任何操作,因此您可以执行以下操作:

    (定义cr/python模式shell设置()
    (报告错误“文件本地变量错误:%s”
    (hack局部变量)
    (设置(使局部变量“局部”启用局部变量)为零)
    (let((pythonbase(cr/virtualenv)))
    ...))
    
    显然,这会稍微改变正常的执行顺序,因此可能会产生副作用。我担心如果文件中的局部变量注释设置了相同的主模式,这可能会导致无限递归,但实际上这似乎不是问题

    局部变量标题注释(例如
    -*-模式:foo-*-
    )由
    (设置自动模式)
    处理,因此这些注释是可以处理的;但是
    模式:foo
    局部变量:
    注释似乎是一个问题,因为它是由
    (hack Local Variables)
    处理的,因此如果模式设置为这种方式,我认为会导致递归

    在实践中,我能够通过使用一个简单的函数作为“模式”来触发这个问题,它只不过是尝试运行它的钩子;然而,使用“适当”模式进行测试并没有出现问题,因此在现实中可能是安全的。我没有进一步研究这一点(因为其他两种解决方案比这更干净),但我猜延迟模式挂钩机制可能解释了这一点


  • 也许你可以从钩子中调用(破解局部变量)?真的看不出方法2有什么缺点吗