XEmacs 21.2.32 "Kastor & Polydeukes".

[chise/xemacs-chise.git.1] / tests / automated / mule-tests.el

diff --git a/tests/automated/mule-tests.el b/tests/automated/mule-tests.el
index b73163c..eb2317c 100644 (file)
--- a/tests/automated/mule-tests.el
+++ b/tests/automated/mule-tests.el
@@ -299,6 +299,7 @@ the Assert macro checks for correctness."
         (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))