hydra-test.el: Update tests for the last commit

master
Oleh Krehel 7 years ago
parent 6842731f08
commit acb69859f3
  1. 21
      hydra-test.el

@ -137,8 +137,7 @@ The body can be accessed via `hydra-error/body', which is bound to \"M-g\"."
(function first-error))) (function first-error)))
((quit error) ((quit error)
(message (message
(error-message-string err)) (error-message-string err))))
(unless hydra-lv (sit-for 0.8))))
(hydra-show-hint (hydra-show-hint
hydra-error/hint hydra-error/hint
(quote hydra-error)) (quote hydra-error))
@ -174,8 +173,7 @@ The body can be accessed via `hydra-error/body', which is bound to \"M-g\"."
(function next-error))) (function next-error)))
((quit error) ((quit error)
(message (message
(error-message-string err)) (error-message-string err))))
(unless hydra-lv (sit-for 0.8))))
(hydra-show-hint (hydra-show-hint
hydra-error/hint hydra-error/hint
(quote hydra-error)) (quote hydra-error))
@ -211,8 +209,7 @@ The body can be accessed via `hydra-error/body', which is bound to \"M-g\"."
(function previous-error))) (function previous-error)))
((quit error) ((quit error)
(message (message
(error-message-string err)) (error-message-string err))))
(unless hydra-lv (sit-for 0.8))))
(hydra-show-hint (hydra-show-hint
hydra-error/hint hydra-error/hint
(quote hydra-error)) (quote hydra-error))
@ -566,8 +563,7 @@ The body can be accessed via `hydra-vi/body'."
(function next-line))) (function next-line)))
((quit error) ((quit error)
(message (message
(error-message-string err)) (error-message-string err))))
(unless hydra-lv (sit-for 0.8))))
(hydra-show-hint (hydra-show-hint
hydra-vi/hint hydra-vi/hint
(quote hydra-vi)) (quote hydra-vi))
@ -603,8 +599,7 @@ The body can be accessed via `hydra-vi/body'."
(function previous-line))) (function previous-line)))
((quit error) ((quit error)
(message (message
(error-message-string err)) (error-message-string err))))
(unless hydra-lv (sit-for 0.8))))
(hydra-show-hint (hydra-show-hint
hydra-vi/hint hydra-vi/hint
(quote hydra-vi)) (quote hydra-vi))
@ -759,8 +754,7 @@ The body can be accessed via `hydra-zoom/body'."
(text-scale-set 0)))) (text-scale-set 0))))
((quit error) ((quit error)
(message (message
(error-message-string err)) (error-message-string err))))
(unless hydra-lv (sit-for 0.8))))
(hydra-show-hint (hydra-show-hint
hydra-zoom/hint hydra-zoom/hint
(quote hydra-zoom)) (quote hydra-zoom))
@ -918,8 +912,7 @@ The body can be accessed via `hydra-zoom/body'."
(text-scale-set 0)))) (text-scale-set 0))))
((quit error) ((quit error)
(message (message
(error-message-string err)) (error-message-string err))))
(unless hydra-lv (sit-for 0.8))))
(hydra-show-hint (hydra-show-hint
hydra-zoom/hint hydra-zoom/hint
(quote hydra-zoom)) (quote hydra-zoom))

Loading…
Cancel
Save