[elpa] externals/hyperbole b4a4ef4 2/2: Make test smart-menu-loads-kotl-example stable (#130)

[ELPA Syncer]

branch: externals/hyperbole
commit b4a4ef4e0af43175faa89add77bcb10ba513197e
Author: Mats Lidell <mats.lidell@lidells.se>
Commit: GitHub <noreply@github.com>

    Make test smart-menu-loads-kotl-example stable (#130)
---
 ChangeLog               | 3 +++
 test/kotl-mode-tests.el | 4 +++-
 2 files changed, 6 insertions(+), 1 deletion(-)

diff --git a/ChangeLog b/ChangeLog
index 506ea5a..78e44d2 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 2021-11-05  Mats Lidell  <matsl@gnu.org>
 
+* test/kotl-mode-tests.el (smart-menu-loads-kotl-example): Add extra no op
+    input char to make test case stable.
+
 * hypb.el (hypb:mark-marker): Remove compatibility function, use plain
     mark-marker instead.
 
diff --git a/test/kotl-mode-tests.el b/test/kotl-mode-tests.el
index 8fac227..ea27e5d 100644
--- a/test/kotl-mode-tests.el
+++ b/test/kotl-mode-tests.el
@@ -38,7 +38,9 @@
   "Loading kotl-mode example file works."
   (skip-unless (not noninteractive))
   (setup-kotl-mode-example-test
-   (should (hact 'kbd-key "C-h h k e"))
+   ;; The additional no op key C-a below avoids ert results window to
+   ;; be set as current
+   (should (hact 'kbd-key "C-h h k e C-a"))
    (hy-test-helpers:consume-input-events)))
 
 (ert-deftest kotl-mode-example-loads-kotl-example ()