]> git.eshelyaron.com Git - emacs.git/commitdiff
Update keymap-tests after recent changes
authordickmao <dick.r.chiang@gmail.com>
Tue, 2 Nov 2021 14:28:20 +0000 (15:28 +0100)
committerLars Ingebrigtsen <larsi@gnus.org>
Tue, 2 Nov 2021 14:28:52 +0000 (15:28 +0100)
* test/src/keymap-tests.el
(help--describe-vector/bug-9293-one-shadowed-in-range): Update tests
for d530f3f9ff.
(help--describe-vector/bug-9293-same-command-does-not-shadow): Update
(bug#51567).

test/src/keymap-tests.el

index d3cb1a6a5508553dce14fc8225dd326038065f6e..8e28faf2b264f230bb2f9e691f75816d9e9e14bc 100644 (file)
@@ -323,12 +323,12 @@ commit 86c19714b097aa477d339ed99ffb5136c755a046."
     (with-temp-buffer
       (help--describe-vector (cadr orig-map) nil #'help--describe-command
                              t shadow-map orig-map t)
-      (should (equal (buffer-string)
-                     "
+      (should (equal (buffer-substring-no-properties (point-min) (point-max))
+                     (string-replace "\t" "" "
 e              foo
 f              foo  (currently shadowed by `bar')
 g .. h         foo
-")))))
+"))))))
 
 (ert-deftest help--describe-vector/bug-9293-same-command-does-not-shadow ()
   "Check that a command can't be shadowed by the same command."
@@ -349,10 +349,10 @@ g .. h            foo
    (with-temp-buffer
      (help--describe-vector (cadr range-map) nil #'help--describe-command
                             t shadow-map range-map t)
-     (should (equal (buffer-string)
-                    "
+     (should (equal (buffer-substring-no-properties (point-min) (point-max))
+                    (string-replace "\t" "" "
 0 .. 3         foo
-")))))
+"))))))
 
 (ert-deftest keymap--key-description ()
   (should (equal (key-description [right] [?\C-x])