branch: externals/hydra commit 6eaf10f52c4ffea56b639539f42367afbb891f18 Author: Oleh Krehel <ohwoeo...@gmail.com> Commit: Oleh Krehel <ohwoeo...@gmail.com>
hydra-test.el (hydra-format-5): Fix failing test --- hydra-test.el | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) diff --git a/hydra-test.el b/hydra-test.el index ffbfa2440a..ec6a0c48ec 100644 --- a/hydra-test.el +++ b/hydra-test.el @@ -1061,21 +1061,21 @@ _f_ auto-fill-mode: %`auto-fill-function (should (equal (hydra--format nil nil "\n_-_: mark _u_: unmark\n" - '(("-" Buffer-menu-mark) - ("u" Buffer-menu-unmark))) + '(("-" Buffer-menu-mark nil) + ("u" Buffer-menu-unmark nil))) '(concat - (format - "%s: mark %s: unmark\n" - #("-" 0 1 (face hydra-face-red)) - #("u" 0 1 (face hydra-face-red))) + (format + "%s: mark %s: unmark\n" + #("-" 0 1 (face hydra-face-red)) + #("u" 0 1 (face hydra-face-red))) "")))) (ert-deftest hydra-format-6 () (should (equal (hydra--format nil nil "\n[_]_] forward [_[_] backward\n" - '(("]" forward-char) - ("[" backward-char))) + '(("]" forward-char nil) + ("[" backward-char nil))) '(concat (format "[%s] forward [%s] backward\n"