# HG changeset patch
# User stephent
# Date 1024815229 0
# Node ID 708faa3b4cb19b32aa8dcfc899fddd99605627e2
# Parent  d4ba25667ff46efdba5e6045aac93e04649de818
[xemacs-hg @ 2002-06-23 06:53:46 by stephent]
fix unicode test

diff -r d4ba25667ff4 -r 708faa3b4cb1 tests/ChangeLog
--- a/tests/ChangeLog	Sat Jun 22 17:14:45 2002 +0000
+++ b/tests/ChangeLog	Sun Jun 23 06:53:49 2002 +0000
@@ -1,3 +1,7 @@
+2002-06-23  Stephen J. Turnbull  <stephen@xemacs.org>
+
+	* automated/mule-tests.el ((featurep 'mule)): Fix unicode test.
+
 2002-04-27  Stephen J. Turnbull  <stephen@xemacs.org>
 
 	* automated/test-harness.el (test-harness-from-buffer): Clean up
diff -r d4ba25667ff4 -r 708faa3b4cb1 tests/automated/mule-tests.el
--- a/tests/automated/mule-tests.el	Sat Jun 22 17:14:45 2002 +0000
+++ b/tests/automated/mule-tests.el	Sun Jun 23 06:53:49 2002 +0000
@@ -319,7 +319,8 @@
   ;; Test Unicode-related functions
   ;;---------------------------------------------------------------
   (let* ((scaron (make-char 'latin-iso8859-2 57)))
-    (loop for code in '(#x0000 #x2222 #x4444 #xffff) do
+    ;; Used to try #x0000, but you can't change ASCII or Latin-1
+    (loop for code in '(#x0100 #x2222 #x4444 #xffff) do
       (progn
 	(set-unicode-conversion scaron code)
 	(Assert (eq code (char-to-unicode scaron)))