diff options
| author | Slávek Banko <[email protected]> | 2013-09-03 19:59:05 +0200 |
|---|---|---|
| committer | Slávek Banko <[email protected]> | 2013-09-03 19:59:05 +0200 |
| commit | 6dc415932b48465bfec7269c0f1075af145400c6 (patch) | |
| tree | 5c7ca06517d4bf79c1472ada4aac5e6dc975b7c5 /kalyptus/kalyptusCxxToSwig.pm | |
| parent | 29c4b06c27351fe68de491c68eaa3ec65f658efb (diff) | |
| download | libtqt-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.pm | 2 |
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!; |