]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix mule-tests in UTF-8 locales
authorEli Zaretskii <eliz@gnu.org>
Sun, 26 Feb 2023 09:46:20 +0000 (11:46 +0200)
committerEli Zaretskii <eliz@gnu.org>
Sun, 26 Feb 2023 09:46:20 +0000 (11:46 +0200)
* test/lisp/international/mule-tests.el
(sgml-html-meta-no-post-less-than-10lines): Fix test condition.

test/lisp/international/mule-tests.el

index 6b76e35ae22f1fcc658a794f0802fe38f9339862..3e0c5bf9f4b721d1a3544ea1152b934b500dd7ce 100644 (file)
@@ -119,9 +119,10 @@ provide HTML fragments.  Some tests override those variables."
 (ert-deftest sgml-html-meta-no-post-less-than-10lines ()
   "No '</head>', detect charset in the first 10 lines."
   (let ((sgml-html-meta-post ""))
-    (should (eq 'utf-8 (sgml-html-meta-run
-                        (concat "\n\n\n\n\n\n\n\n\n"
-                                "<meta charset='utf-8'>"))))))
+    (should (eq 'utf-8 (coding-system-base
+                        (sgml-html-meta-run
+                         (concat "\n\n\n\n\n\n\n\n\n"
+                                 "<meta charset='utf-8'>")))))))
 
 (ert-deftest sgml-html-meta-no-post-10lines ()
   "No '</head>', do not detect charset after the first 10 lines."