diff options
| author | Jonas Bernoulli <jonas@bernoul.li> | 2020-08-08 13:49:43 +0200 |
|---|---|---|
| committer | David Bremner <david@tethera.net> | 2020-08-09 20:52:34 -0300 |
| commit | e1a700067a22214f54064c281219fbbbef87de06 (patch) | |
| tree | fccae9d95e5e63a8a7b346084d3211b55bf36ef8 /test | |
| parent | 09f6533c3781b61ea634790d4bad38aadf89115c (diff) | |
emacs: Use 'when' instead of 'if' when there is no ELSE part
Diffstat (limited to 'test')
| -rw-r--r-- | test/test-lib.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/test/test-lib.el b/test/test-lib.el index a1233390..6a39bbe2 100644 --- a/test/test-lib.el +++ b/test/test-lib.el @@ -36,7 +36,7 @@ ;; Work around a bug in emacs 23.1 and emacs 23.2 which prevents ;; noninteractive (kill-emacs) from emacsclient. -(if (and (= emacs-major-version 23) (< emacs-minor-version 3)) +(when (and (= emacs-major-version 23) (< emacs-minor-version 3)) (defadvice kill-emacs (before disable-yes-or-no-p activate) "Disable yes-or-no-p before executing kill-emacs" (defun yes-or-no-p (prompt) t))) @@ -46,7 +46,7 @@ ;; seems to be present in Emacs 23.1. ;; Running `list-processes' after `accept-process-output' seems to work ;; around this problem. -(if (and (= emacs-major-version 23) (= emacs-minor-version 1)) +(when (and (= emacs-major-version 23) (= emacs-minor-version 1)) (defadvice accept-process-output (after run-list-processes activate) "run list-processes after executing accept-process-output" (list-processes))) |