diff options
author | François Andriot <francois.andriot@free.fr> | 2015-12-06 16:05:34 +0100 |
---|---|---|
committer | Slávek Banko <slavek.banko@axis.cz> | 2015-12-06 16:12:08 +0100 |
commit | dc5f265d3ef181d9bec05429f2f97a1868757d2a (patch) | |
tree | 8773fbaed1403124ce530aea8b343b41b7d85be3 /kalyptus | |
parent | 3e49a0c6fbe25470cfba9f95aac2054b458d330b (diff) | |
download | tdebindings-dc5f265d3ef181d9bec05429f2f97a1868757d2a.tar.gz tdebindings-dc5f265d3ef181d9bec05429f2f97a1868757d2a.zip |
Fix invalid perl syntax in kdocAstUtil.pm
This resolves Bug 2543
Signed-off-by: François Andriot <francois.andriot@free.fr>
(cherry picked from commit 2e9822caa4c35b417d07a1c196960bb3ff8bd531)
Diffstat (limited to 'kalyptus')
-rw-r--r-- | kalyptus/kdocAstUtil.pm | 2 |
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 ); |