--- trunk/lib/WebPAC/Parser.pm 2009/05/29 18:16:32 1203 +++ trunk/lib/WebPAC/Parser.pm 2009/05/29 19:38:09 1204 @@ -312,7 +312,7 @@ my $Document = PPI::Document->new( \$source ) || $log->logdie("can't parse source:\n", $self->{source}); - $Document->prune('PPI::Token::Whitespace'); + #$Document->prune('PPI::Token::Whitespace'); $Document->prune('PPI::Token::Comment'); #$Document->prune('PPI::Token::Operator');