summaryrefslogtreecommitdiffstats
path: root/kalyptus/kalyptusCxxToSwig.pm
diff options
context:
space:
mode:
authorSlávek Banko <slavek.banko@axis.cz>2013-09-03 19:59:05 +0200
committerSlávek Banko <slavek.banko@axis.cz>2013-09-03 19:59:05 +0200
commit6dc415932b48465bfec7269c0f1075af145400c6 (patch)
tree5c7ca06517d4bf79c1472ada4aac5e6dc975b7c5 /kalyptus/kalyptusCxxToSwig.pm
parent29c4b06c27351fe68de491c68eaa3ec65f658efb (diff)
downloadlibtqt-perl-6dc415932b48465bfec7269c0f1075af145400c6.tar.gz
libtqt-perl-6dc415932b48465bfec7269c0f1075af145400c6.zip
Additional k => tde renaming and fixes
Diffstat (limited to 'kalyptus/kalyptusCxxToSwig.pm')
-rw-r--r--kalyptus/kalyptusCxxToSwig.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/kalyptus/kalyptusCxxToSwig.pm b/kalyptus/kalyptusCxxToSwig.pm
index 0600eac..b4600be 100644
--- a/kalyptus/kalyptusCxxToSwig.pm
+++ b/kalyptus/kalyptusCxxToSwig.pm
@@ -838,7 +838,7 @@ sub writeClassDoc
my $sourcename = $node->{Source}->{astNodeName};
- if ( $sourcename =~ m!.*(dom|kabc|tdeprint|tdesu|kio|kjs|tdeparts|tdetexteditor|libtdemid)/([^/]*$)! ) {
+ if ( $sourcename =~ m!.*(dom|tdeabc|tdeprint|tdesu|tdeio|kjs|tdeparts|tdetexteditor|libtdemid)/([^/]*$)! ) {
$sourcename = $1."/".$2;
} else {
$sourcename =~ s!.*/([^/]*$)!$1!;