branch: elpa/pacmacs
commit 49292e34d34e30bcda2b66513f2eb78044d71cae
Author: rexim <[email protected]>
Commit: rexim <[email protected]>
UT for terrified-ghost-timed-out-p function (#171)
---
test/pacmacs-test.el | 9 +++++++++
1 file changed, 9 insertions(+)
diff --git a/test/pacmacs-test.el b/test/pacmacs-test.el
index ee71130d3a..f146abea6f 100644
--- a/test/pacmacs-test.el
+++ b/test/pacmacs-test.el
@@ -107,3 +107,12 @@
(should (equal ghost
(pacmacs--unterrify-ghost terrified-ghost))))))
+
+(ert-deftest pacmacs--terrified-ghost-timed-out-p-test ()
+ (should (not
+ (pacmacs--terrified-ghost-timed-out-p
+ (list :terrified-timer 60065))))
+ (should (pacmacs--terrified-ghost-timed-out-p
+ (list :terrified-timer 0)))
+ (should (pacmacs--terrified-ghost-timed-out-p
+ (list :terrified-timer -1))))
