Mercurial > hg > xemacs-beta
diff tests/automated/mule-tests.el @ 404:2f8bb876ab1d r21-2-32
Import from CVS: tag r21-2-32
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:16:07 +0200 |
parents | a86b2b5e0111 |
children |
line wrap: on
line diff
--- a/tests/automated/mule-tests.el Mon Aug 13 11:15:00 2007 +0200 +++ b/tests/automated/mule-tests.el Mon Aug 13 11:16:07 2007 +0200 @@ -299,6 +299,7 @@ (file-name-coding-system 'iso-8859-2)) ;; This is how you suppress output from `message', called by `write-region' (flet ((append-message (&rest args) ())) + (Assert (not (equal name1 name2))) (Assert (not (file-exists-p name1))) (write-region (point-min) (point-max) name1) (Assert (file-exists-p name1))