mu4e-helpers: fix mu4e-keymap-set for older emacs

djcb · Mar 15, 2024 · a6c78ab · a6c78ab
1 parent 4564db8
commit a6c78ab
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/mu4e/mu4e-helpers.el b/mu4e/mu4e-helpers.el
@@ -605,8 +605,8 @@ shorter keys in some cases where there are multiple bindings."
 Temporary version, from Emacs 29."
   (when (fboundp 'key-valid-p) (cl-assert (key-valid-p key)))
   (when (stringp definition)
-    (when (fboundp 'key-valid-p) (cl-assert (key-valid-p definition)))
-    (setq definition (key-parse definition)))
+    (when (or (not (fboundp 'key-valid-p)) (cl-assert (key-valid-p definition)))
+        (setq definition (key-parse definition))))
   (define-key keymap (key-parse key) definition))
 
 (provide 'mu4e-helpers)