about summary refs log tree commit diff
path: root/users/wpcarro/emacs
diff options
context:
space:
mode:
Diffstat (limited to 'users/wpcarro/emacs')
-rw-r--r--users/wpcarro/emacs/pkgs/struct/tests.el7
1 files changed, 3 insertions, 4 deletions
diff --git a/users/wpcarro/emacs/pkgs/struct/tests.el b/users/wpcarro/emacs/pkgs/struct/tests.el
index 619c54f451f8..ee48c2f6b5d1 100644
--- a/users/wpcarro/emacs/pkgs/struct/tests.el
+++ b/users/wpcarro/emacs/pkgs/struct/tests.el
@@ -14,12 +14,11 @@
   (cl-defstruct dummy name age)
   (defvar struct--test-dummy (make-dummy :name "Roofus" :age 19))
   (struct-set! dummy name "Doofus" struct--test-dummy)
-  (string= "Doofus" (dummy-name struct--test-dummy)))
+  (should (string= "Doofus" (dummy-name struct--test-dummy))))
 
 (ert-deftest struct-set ()
   (cl-defstruct dummy name age)
   (defvar struct--test-dummy (make-dummy :name "Roofus" :age 19))
   (let ((result (struct-set dummy name "Shoofus" struct--test-dummy)))
-    (and
-     (string= "Roofus" (dummy-name struct--test-dummy))
-     (string= "Shoofus" (dummy-name result)))))
+    (should (string= "Roofus" (dummy-name struct--test-dummy)))
+    (should (string= "Shoofus" (dummy-name result)))))