diff options
author | François Andriot <[email protected]> | 2015-12-06 16:02:21 +0100 |
---|---|---|
committer | Slávek Banko <[email protected]> | 2015-12-06 16:02:21 +0100 |
commit | 7be2f6784dcb70a494fc9eb98da68cf10f8a6edb (patch) | |
tree | 2a239d8bf993d014f6b4562fdb2730201cf736c4 /dcop | |
parent | b0ac7d287922e883a2e571222089b680adfe46c6 (diff) | |
download | tdelibs-7be2f6784dcb70a494fc9eb98da68cf10f8a6edb.tar.gz tdelibs-7be2f6784dcb70a494fc9eb98da68cf10f8a6edb.zip |
Fix invalid perl syntax in kdocAstUtil.pm
This resolves Bug 2543
Signed-off-by: François Andriot <[email protected]>
Diffstat (limited to 'dcop')
-rw-r--r-- | dcop/dcopidlng/kdocAstUtil.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/dcop/dcopidlng/kdocAstUtil.pm b/dcop/dcopidlng/kdocAstUtil.pm index ec67ace5f..f31f2b365 100644 --- a/dcop/dcopidlng/kdocAstUtil.pm +++ b/dcop/dcopidlng/kdocAstUtil.pm @@ -439,7 +439,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 ); |