Index: /trunk/PS-IPP-Metadata-Config/Changes
===================================================================
--- /trunk/PS-IPP-Metadata-Config/Changes	(revision 9848)
+++ /trunk/PS-IPP-Metadata-Config/Changes	(revision 9849)
@@ -1,3 +1,6 @@
 Revision history for Perl module PS::IPP::Metadata::Config
+
+0.10
+    - fix handling of NULL strings
 
 0.09 Thu Oct 26 16:16:28 HST 2006
Index: /trunk/PS-IPP-Metadata-Config/config_grammar.txt
===================================================================
--- /trunk/PS-IPP-Metadata-Config/config_grammar.txt	(revision 9848)
+++ /trunk/PS-IPP-Metadata-Config/config_grammar.txt	(revision 9849)
@@ -1,5 +1,5 @@
 # Copyright (c) 2005  Joshua Hoblitt
 #
-# $Id: config_grammar.txt,v 1.7 2006-10-27 02:15:45 jhoblitt Exp $
+# $Id: config_grammar.txt,v 1.8 2006-11-04 01:25:32 jhoblitt Exp $
 
 {
@@ -350,4 +350,5 @@
             $return = $item[1];
         }
+    | NULL
 
 word:
Index: /trunk/PS-IPP-Metadata-Config/t/08_strings.t
===================================================================
--- /trunk/PS-IPP-Metadata-Config/t/08_strings.t	(revision 9848)
+++ /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" );
+}