From: sgunderson@bigfoot.com <>
Date: Thu, 1 Mar 2007 12:39:57 +0000 (+0100)
Subject: Add a (failing) perl-sax/attribute test.
X-Git-Url: https://git.sesse.net/?p=xml-template;a=commitdiff_plain;h=3c1a79fbf2259288d222726df9810f2caf959a86

Add a (failing) perl-sax/attribute test.
---

diff --git a/perl-sax/attribute.pl b/perl-sax/attribute.pl
new file mode 100644
index 0000000..544b363
--- /dev/null
+++ b/perl-sax/attribute.pl
@@ -0,0 +1,13 @@
+#! /usr/bin/perl
+use XML::TemplateSAX;
+
+my $doc = XML::TemplateSAX::process_file('../xml/clone.xml', {
+	'color' => 'red',
+	'#things' => [
+		{ 'li' => 'Raindrops on roses',    'li/class' => 'odd' },
+		{ 'li' => 'Whiskers on kittens',   'li/class' => 'even' },
+		{ 'li' => 'Bright copper kettles', 'li/class' => 'odd' },
+		{ 'li' => 'Warm, woolen mittens',  'li/class' => 'even' }
+	]
+});
+print $doc;