Index: trunk/PS-IPP-Metadata-Config/t/08_strings.t
===================================================================
--- trunk/PS-IPP-Metadata-Config/t/08_strings.t	(revision 9161)
+++ trunk/PS-IPP-Metadata-Config/t/08_strings.t	(revision 9849)
@@ -3,5 +3,5 @@
 # Copyright (C) 2006  Joshua Hoblitt
 #
-# $Id: 08_strings.t,v 1.1 2006-10-04 01:24:03 jhoblitt Exp $
+# $Id: 08_strings.t,v 1.2 2006-11-04 01:25:32 jhoblitt Exp $
 
 use strict;
@@ -12,5 +12,5 @@
 #$::RD_TRACE = 1;
 
-use Test::More tests => 2;
+use Test::More tests => 4;
 use PS::IPP::Metadata::Config;
 
@@ -45,2 +45,31 @@
     is_deeply( $config, $tree, "str structure" );
 }
+
+{
+my $example =<<END;
+mystr   MULTI
+mystr   STR     NULL 
+mystr   STR     NULL    # some comment
+END
+
+    my $config = $config_parser->parse( $example );
+    ok( defined( $config ), "NULL strs parsed");
+
+    my $tree = [
+        {
+            name    => 'mystr',
+            class   => 'scalar',
+            type    => 'STR',
+            value   => undef,
+        },
+        {
+            name    => 'mystr',
+            class   => 'scalar',
+            type    => 'STR',
+            value   => undef,
+            comment => 'some comment',
+        },
+    ];
+
+    is_deeply( $config, $tree, "NULL str structure" );
+}