diff Lib/IMPL/DOM/Transform/PostToDOM.pm @ 152:1e7f03414b65

DOM: schema improvements DOM: saving to XML::Writer feature
author wizard
date Thu, 23 Sep 2010 03:58:43 +0400
parents e36ffd8c29db
children c7652cf29a80
line wrap: on
line diff
--- a/Lib/IMPL/DOM/Transform/PostToDOM.pm	Fri Aug 20 16:33:37 2010 +0400
+++ b/Lib/IMPL/DOM/Transform/PostToDOM.pm	Thu Sep 23 03:58:43 2010 +0400
@@ -75,7 +75,7 @@
 	my $prefix = $this->prefix;
 	
 	foreach my $param (grep index($_,$prefix) >= 0 , $query->param()) {
-		my $value = $query->param($param) or next;
+		defined (my $value = $query->param($param)) or next;
 		
 		my @parts = split /\//,$param;