diff options
Diffstat (limited to 'kalyptus/kalyptusCxxToSwig.pm')
| -rw-r--r-- | kalyptus/kalyptusCxxToSwig.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/kalyptus/kalyptusCxxToSwig.pm b/kalyptus/kalyptusCxxToSwig.pm index ac36f841..5a568cb0 100644 --- a/kalyptus/kalyptusCxxToSwig.pm +++ b/kalyptus/kalyptusCxxToSwig.pm @@ -776,15 +776,15 @@ sub writeClassDoc my $typeName = $node->{astNodeName}."*"; if ( kalyptusDataDict::ctypemap($typeName) eq "" ) { - $typeprefix = ($typeName =~ /^Q/ ? "qt_" : "kde_"); + $typeprefix = ($typeName =~ /^Q/ ? "qt_" : "tde_"); kalyptusDataDict::setctypemap($typeName, $typeprefix.$node->{astNodeName}."*"); print "'$typeName' => '$typeprefix$typeName',\n"; } elsif ( kalyptusDataDict::ctypemap($typeName) =~ /^qt_/ ) { $typeprefix = "qt_"; - } elsif ( kalyptusDataDict::ctypemap($typeName) =~ /^kde_/ ) { - $typeprefix = "kde_"; + } elsif ( kalyptusDataDict::ctypemap($typeName) =~ /^tde_/ ) { + $typeprefix = "tde_"; } else { - $typeprefix = "kde_"; + $typeprefix = "tde_"; } my $basefile = "$typeprefix".join("__", kdocAstUtil::heritage($node)).".i"; |