Fix FTBFS

pull/1/head
Timothy Pearson 13 years ago
parent fefe97a2ee
commit 7ed104a143

@ -838,7 +838,7 @@ sub writeClassDoc
my $sourcename = $node->{Source}->{astNodeName}; my $sourcename = $node->{Source}->{astNodeName};
if ( $sourcename =~ m!.*(dom|kabc|tdeprint|tdesu|tdeio|kjs|tdeparts|tdetexteditor|libtdemid)/([^/]*$)! ) { if ( $sourcename =~ m!.*(dom|tdeabc|tdeprint|tdesu|tdeio|kjs|tdeparts|tdetexteditor|libtdemid)/([^/]*$)! ) {
$sourcename = $1."/".$2; $sourcename = $1."/".$2;
} else { } else {
$sourcename =~ s!.*/([^/]*$)!$1!; $sourcename =~ s!.*/([^/]*$)!$1!;

Loading…
Cancel
Save