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:04:03 +0100 |
| commit | 094540b6609b51b8c35bde18ea80db32e4b99e98 (patch) | |
| tree | 240775baf1ef934df7500a96c795889cd496551d | |
| parent | a054c133c7e47908249ce1c30224f529ed0a9340 (diff) | |
| download | tdelibs-094540b6609b51b8c35bde18ea80db32e4b99e98.tar.gz tdelibs-094540b6609b51b8c35bde18ea80db32e4b99e98.zip | |
Fix invalid perl syntax in kdocAstUtil.pm
This resolves Bug 2543
Signed-off-by: François Andriot <[email protected]>
(cherry picked from commit 7be2f6784dcb70a494fc9eb98da68cf10f8a6edb)
| -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 ); |