Index: /trunk/PS-IPP-Metadata-Config/t/06_multi.t
===================================================================
--- /trunk/PS-IPP-Metadata-Config/t/06_multi.t	(revision 3495)
+++ /trunk/PS-IPP-Metadata-Config/t/06_multi.t	(revision 3496)
@@ -3,5 +3,5 @@
 # Copyright (C) 2005  Joshua Hoblitt
 #
-# $Id: 06_multi.t,v 1.4 2005-03-24 22:07:25 jhoblitt Exp $
+# $Id: 06_multi.t,v 1.5 2005-03-24 22:32:55 jhoblitt Exp $
 
 use strict;
@@ -12,5 +12,5 @@
 #$::RD_TRACE = 1;
 
-use Test::More tests => 8;
+use Test::More tests => 13;
 use PS::IPP::Metadata::Config;
 
@@ -59,4 +59,106 @@
 my $example = q{
 foo MULTI
+foo METADATA
+    bar BOOL    T
+END
+foo METADATA
+    bar BOOL    T
+END
+};
+    my $config = $config_parser->parse( $example );
+    ok( defined( $config ), "MULTI METADATA");
+}
+
+{
+my $example = q{
+foo METADATA
+    bar BOOL    T
+END
+foo METADATA
+    bar BOOL    T
+END
+};
+    my $config = $config_parser->parse( $example );
+
+    my $tree = [
+        {
+            name    => 'foo',
+            class   => 'metadata',
+            value   => [{
+                            name    => 'bar',
+                            class   => 'scalar',
+                            type    => 'BOOL',
+                            value   => 1,
+                        }],
+        },
+    ];
+
+    is_deeply( $config, $tree, "MULTI METADATA structure, not declared" );
+}
+
+{
+my $example = q{
+foo MULTI
+TYPE bar a b c
+foo  bar x y z
+foo  bar x y z
+};
+    my $config = $config_parser->parse( $example );
+    ok( defined( $config ), "MULTI TYPE");
+}
+
+{
+my $example = q{
+TYPE bar a b c
+foo MULTI
+foo  bar x y z
+foo  bar x y z
+};
+    my $config = $config_parser->parse( $example );
+
+    ok( defined( $config ), "MULTI TYPE");
+}
+
+{
+my $example = q{
+TYPE bar a b c
+foo  bar x y z
+foo  bar x y z
+};
+    my $config = $config_parser->parse( $example );
+
+    my $tree = [
+        {
+            name    => 'foo',
+            class   => 'metadata',
+            value   => [
+                {
+                    name    => 'a',
+                    class   => 'scalar',
+                    type    => 'STR',
+                    value   => 'x',
+                },
+                {
+                    name    => 'b',
+                    class   => 'scalar',
+                    type    => 'STR',
+                    value   => 'y',
+                },
+                {
+                    name    => 'c',
+                    class   => 'scalar',
+                    type    => 'STR',
+                    value   => 'z',
+                },
+            ],
+        },
+    ];
+
+    is_deeply( $config, $tree, "MULTI TYPE structure, not declared" );
+}
+
+{
+my $example = q{
+foo MULTI
 bar METADATA
     foo S8      -1
