emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/compat e60246afc8 4/5: Make tests work on macOS


From: ELPA Syncer
Subject: [elpa] externals/compat e60246afc8 4/5: Make tests work on macOS
Date: Fri, 8 Sep 2023 12:57:32 -0400 (EDT)

branch: externals/compat
commit e60246afc8d77f3c9e89410612b477679858cf58
Author: Mattias EngdegÄrd <mattiase@acm.org>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Make tests work on macOS
    
    `s-c' is bound by default; pick `H-c' instead.
---
 compat-tests.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/compat-tests.el b/compat-tests.el
index 0b7ba5ea9e..5a4c1bab3d 100644
--- a/compat-tests.el
+++ b/compat-tests.el
@@ -810,15 +810,15 @@
     (unwind-protect
         (progn
           (use-global-map (make-sparse-keymap))
-          (should-not (keymap-global-lookup "s-c"))
+          (should-not (keymap-global-lookup "H-c"))
           (should-not (keymap-global-lookup "x"))
-          (keymap-global-set "s-c" 'test)
+          (keymap-global-set "H-c" 'test)
           (keymap-global-set "<t>" 'default)
-          (should-equal (keymap-global-lookup "s-c") 'test)
+          (should-equal (keymap-global-lookup "H-c") 'test)
           (should-equal (keymap-global-lookup "x" t) 'default)
           (should-not (keymap-global-lookup "x")))
       (use-global-map orig))
-    (should-not (keymap-global-lookup "s-c"))))
+    (should-not (keymap-global-lookup "H-c"))))
 
 (ert-deftest compat-keymap-global-lookup ()
   (should-equal (keymap-global-lookup "C-x b") #'switch-to-buffer)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]