Mercurial > hg > xemacs-beta

diff tests/automated/region-tests.el @ 4855:189fb67ca31a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Create Assert-eq, Assert-equal, etc. These are equivalent to (Assert (eq ...)) but display both the actual value and the expected value of the comparison. Use them throughout the test suite.
author Ben Wing <ben@xemacs.org>
date Thu, 14 Jan 2010 02:18:03 -0600
parents 43b4a54fbf66
children 0f66906b6e37
line wrap: on
line diff
--- a/tests/automated/region-tests.el	Thu Jan 14 01:25:16 2010 -0600
+++ b/tests/automated/region-tests.el	Thu Jan 14 02:18:03 2010 -0600
@@ -71,7 +71,7 @@
       ;; Region not active in this second temp buffer
       (Assert (not (region-active-p)))
       ;; Region still active in first temp buffer
-      (Assert (eq (zmacs-region-buffer) first-buffer))
+      (Assert-eq (zmacs-region-buffer) first-buffer)
       ;; Activate region in second temp buffer
       (Silence-Message
        (mark-whole-buffer))