From a2d12bc84fb2af87dd1c0c6e5bc854554902cd67 Mon Sep 17 00:00:00 2001
From: Lorry Tar Creator <lorry-tar-importer@baserock.org>
Date: Sun, 26 Jan 2003 19:35:03 +0000
Subject: Imported from
 /home/lorry/working-area/delta_perl-xml-xpath/XML-XPath-1.13.tar.gz.

---
 t/28ancestor2.t | 37 +++++++++++++++++++++++++++++++++++++
 1 file changed, 37 insertions(+)
 create mode 100644 t/28ancestor2.t

(limited to 't/28ancestor2.t')

diff --git a/t/28ancestor2.t b/t/28ancestor2.t
new file mode 100644
index 0000000..1b90f15
--- /dev/null
+++ b/t/28ancestor2.t
@@ -0,0 +1,37 @@
+use Test;
+BEGIN { plan tests => 5 }
+
+use XML::XPath;
+ok(1);
+
+my $xp = XML::XPath->new(ioref => *DATA);
+ok($xp);
+
+my @nodes;
+@nodes = $xp->findnodes('//Footnote');
+ok(@nodes, 1);
+
+my $footnote = $nodes[0];
+
+@nodes = $footnote->findnodes('ancestor::*');
+ok(@nodes, 3);
+
+@nodes = $footnote->findnodes('ancestor::text:footnote');
+ok(@nodes, 1);
+
+__DATA__
+<foo xmlns:text="http://example.com/text">
+<text:footnote text:id="ftn2">
+<text:footnote-citation>2</text:footnote-citation>
+<text:footnote-body>
+<Footnote style="font-size: 10pt; margin-left: 0.499cm;
+margin-right: 0cm; text-indent: -0.499cm; font-family: ; ">AxKit
+is very flexible in how it lets you transform the XML on the
+server, and there are many modules you can plug in to AxKit to
+allow you to do these transformations. For this reason, the AxKit
+installation does not mandate any particular modules to use,
+instead it will simply suggest modules that might help when you
+install AxKit.</Footnote>
+</text:footnote-body>
+</text:footnote>
+</foo>
-- 
cgit v1.2.1