Question

我正在尝试在emacs中创建切换功能。我试过if声明。它不会工作。你可以帮帮我吗。我实际上试图在两个主题之间切换功能，这就是为什么我要尝试这样做

(defun switch()
(interactive)

(when (= a 1)
  (message "true")
  (setq a 2))

(when (= a 2)
  (message "false")
  (setq a 1))
)

Answer 1

您可以使用

(define-minor-mode foo-mode
  "Doc."
  :global t
  (if foo-mode
      <onething>
    <another>))

Answer 2

(defvar a 1 "Initial setting for the `a` global variable.")

(defun my-switch ()
"Doc-string for `my-switch` function."
(interactive)
  (cond
    ((= a 1)
      (message "true")
      (setq a 2))
    ((= a 2)
      (message "false")
      (setq a 1)) ) )

Answer 3

其他答案的变体，没有将变量a暴露给世界其他地方：

(lexical-let (a) 
  (defun my/toggle () 
    (setq a (not a)) 
    (message (or (and a "true") 
             "false"))))

当然lexical-let可以在使用lexical bindings的文件中替换为let。

emacs lisp要做一个toggle函数，也许是全局变量？

3 个答案: