diff --git a/core/test/init.el b/core/test/init.el index ff1c81b0c..9c7ea1521 100644 --- a/core/test/init.el +++ b/core/test/init.el @@ -12,6 +12,7 @@ evil :tools pass + ein :lang org web) diff --git a/modules/tools/ein/test/test-ein.el b/modules/tools/ein/test/test-ein.el new file mode 100644 index 000000000..04a021063 --- /dev/null +++ b/modules/tools/ein/test/test-ein.el @@ -0,0 +1,23 @@ +;; -*- no-byte-compile: t; -*- +;;; tools/ein/test/test-ein.el + +(describe "tools/ein" + :var (project-root) + + (require! :tools ein) + (require 'ein-notebook) + + (before-each + (spy-on 'doom-project-root :and-call-fake (lambda () project-root))) + + (it "keymap defs still valid" + (dolist (km (list ein:notebook-mode-map ein:notebooklist-mode-map)) + (cl-labels ((validate-km + (km) + (map-keymap (lambda (type def) + (cond ((keymapp def) + (validate-km def)) + (t (should-not + (and (symbolp def) (not (commandp def))))))) + km))) + (validate-km km)))))