diff -urN intltool-old/tests/cases/unicodetext.xml.in intltool/tests/cases/unicodetext.xml.in
--- intltool-old/tests/cases/unicodetext.xml.in	1970-01-01 06:00:00.000000000 +0600
+++ intltool/tests/cases/unicodetext.xml.in	2005-11-05 20:36:18.000000000 +0500
@@ -0,0 +1,23 @@
+<?xml version="1.0"?>
+<!DOCTYPE gweather SYSTEM "locations.dtd">
+<gweather format="1.0">
+<!-- Here we demonstrate how intltools behave 
+when comments or _name names contain non-US-ASCII 
+characters.
+-->
+<region>
+  <_name>Europe</_name>
+  <country>
+    <city>
+      <!-- Translators: This is in France. -->
+      <_name>Chambéry</_name>
+      <location>
+        <!-- Translators: This is in Chambéry in France. -->
+        <_name>Aix-les-Bains</_name>
+        <code>LFLB</code>
+        <coordinates>45-39N 005-53E</coordinates>
+      </location>
+    </city>
+  </country>
+</region>
+</gweather>
diff -urN intltool-old/tests/results/unicodetext.xml.in.h intltool/tests/results/unicodetext.xml.in.h
--- intltool-old/tests/results/unicodetext.xml.in.h	1970-01-01 06:00:00.000000000 +0600
+++ intltool/tests/results/unicodetext.xml.in.h	2005-11-05 20:36:29.000000000 +0500
@@ -0,0 +1,5 @@
+/*  Translators: This is in Chambéry in France.  */
+char *s = N_("Aix-les-Bains");
+/*  Translators: This is in France.  */
+char *s = N_("Chambéry");
+char *s = N_("Europe");
diff -urN intltool-old/tests/selftest.pl.in intltool/tests/selftest.pl.in
--- intltool-old/tests/selftest.pl.in	2005-06-26 17:04:15.000000000 +0500
+++ intltool/tests/selftest.pl.in	2005-11-05 20:35:59.000000000 +0500
@@ -226,7 +226,11 @@
 $case = "merge11.xml";
 system("$INTLTOOL_MERGE -x --quiet cases cases/$case.in cases/$case") == 0 or $failed = 1;
 check_merge_result($case);
-
+ 
+print "28. Extract UTF-8 encoded messages/comments from xml file:           ";
+$case = "unicodetext.xml.in";
+system("$INTLTOOL_EXTRACT --type=gettext/xml --quiet --update cases/$case") == 0 or $failed = 1;
+check_extract_result($case);
 
 system("rm -f cases/*.*") if $srcdir ne ".";
 system("rm -rf az extract9 fr fr_BE fr_FR merge6 schemasmerge1 schemasmerge2 spacepreserve test merge6.xml");
