diff options
| author | Slávek Banko <slavek.banko@axis.cz> | 2020-06-11 20:38:17 +0200 |
|---|---|---|
| committer | Slávek Banko <slavek.banko@axis.cz> | 2020-06-11 20:38:17 +0200 |
| commit | 234c903a9b4e6e6aff30721fd3594e54cea0c2d5 (patch) | |
| tree | 3aa587555f64cacafb4735c9579e171ff633394e | |
| parent | 4ef91183aaff54c438d1acf59e406d6e90d92081 (diff) | |
| download | tdelibs-234c903a9b4e6e6aff30721fd3594e54cea0c2d5.tar.gz tdelibs-234c903a9b4e6e6aff30721fd3594e54cea0c2d5.zip | |
dcopidlng fixes:
+ do not skip an empty class if it is declared with K_DCOP
Signed-off-by: Slávek Banko <slavek.banko@axis.cz>
| -rw-r--r-- | dcop/dcopidlng/kalyptusCxxToDcopIDL.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/dcop/dcopidlng/kalyptusCxxToDcopIDL.pm b/dcop/dcopidlng/kalyptusCxxToDcopIDL.pm index 0d06613e4..719f13e3b 100644 --- a/dcop/dcopidlng/kalyptusCxxToDcopIDL.pm +++ b/dcop/dcopidlng/kalyptusCxxToDcopIDL.pm @@ -95,7 +95,7 @@ sub preParseClass my( $classNode ) = @_; my $className = join( "::", kdocAstUtil::heritage($classNode) ); - if( $#{$classNode->{Kids}} < 0 || + if( ($#{$classNode->{Kids}} < 0 && !$classNode->{DcopExported}) || $classNode->{Access} eq "private" || $classNode->{Access} eq "protected" || # e.g. QPixmap::QPixmapData exists $classNode->{Tmpl} || |