2010-04-19 51 views

回答

11

添加功能minibuffer-setup-hook,像這樣:

(add-hook 'minibuffer-setup-hook 'conditionally-enable-paredit-mode) 
(defun conditionally-enable-paredit-mode() 
    "enable paredit-mode during eval-expression" 
    (if (eq this-command 'eval-expression) 
     (paredit-mode 1))) 
+0

不壞,但你暗示適用paredit一切(前。 'shell-command' /'M-!'),而不僅僅是小緩衝區中的Emacs Lisp條目。我寧願不是這樣。 我不知道是否最終必須用調用更多特殊讀取函數的東西來替代'eval-expression'。 – draebek 2010-04-19 05:58:16

+1

它只能用於eval-expression,但也許你在Trey編輯他的答案之前寫下了你的評論...... – 2010-04-19 08:35:53

+0

是的,我確實在它看起來像'this-command'之前寫了它。我沒有想到這樣做。謝謝! – draebek 2010-04-19 13:52:41

0

添加功能paredit-modeeval-expression-minibuffer-setup-hook,像這樣

(add-hook 'eval-expression-minibuffer-setup-hook #'paredit-mode) 
相關問題