summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorFrançois Andriot <francois.andriot@free.fr>2015-12-06 16:05:34 +0100
committerSlávek Banko <slavek.banko@axis.cz>2015-12-06 16:05:34 +0100
commit2e9822caa4c35b417d07a1c196960bb3ff8bd531 (patch)
tree9ae617caeb11d679fe88381b828aa66686c6282e
parentbbae3d87ede9001180cf8f7395f12cf5492d6331 (diff)
downloadtdebindings-2e9822ca.tar.gz
tdebindings-2e9822ca.zip
Fix invalid perl syntax in kdocAstUtil.pm
This resolves Bug 2543 Signed-off-by: François Andriot <francois.andriot@free.fr>
-rw-r--r--kalyptus/kdocAstUtil.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/kalyptus/kdocAstUtil.pm b/kalyptus/kdocAstUtil.pm
index 8c24430c..ec3e8fb5 100644
--- a/kalyptus/kdocAstUtil.pm
+++ b/kalyptus/kdocAstUtil.pm
@@ -675,7 +675,7 @@ sub dumpAst
}
print "\t" x $depth, "Documentation nodes:\n" if defined
- @{ $node->{Doc}->{ "Text" }};
+ $node->{Doc}->{ "Text" };
foreach $kid ( @{ $node->{Doc}->{ "Text" }} ) {
dumpAst( $kid );