--- deliantra/Deliantra-Client/DC/Pod.pm 2006/08/13 02:43:22 1.4 +++ deliantra/Deliantra-Client/DC/Pod.pm 2006/08/13 03:20:56 1.5 @@ -4,8 +4,6 @@ use Storable; -use CFPlus::UI; - our $VERSION = 1; our %wiki; @@ -60,17 +58,19 @@ do { my $p = $doc->[$par]; - my %para = ( - markup => $p->{markup}, - indent => $p->{indent}, - ); - - for (@{ $p->{widget} || [] }) { - my ($class, @args) = @$_; - push @{ $para{widget} }, $class->new (@args); - } + if (exists $p->{markup}) { + my %para = ( + markup => $p->{markup}, + indent => $p->{indent}, + ); + + for (@{ $p->{widget} || [] }) { + my ($class, @args) = @$_; + push @{ $para{widget} }, $class->new (@args); + } - push @res, \%para; + push @res, \%para; + } } while $doc->[++$par]{level} > $lvl; @res