← Back to branch summary

~ubuntu-branches/ubuntu/natty/kdebindings/natty

« back to all changes in this revision

Viewing changes to perl/kio/lib/KIO4.pm

  • Committer: Bazaar Package Importer
  • Author(s): Jonathan Riddell
  • Date: 2010-12-01 11:14:38 UTC
  • mfrom: (1.1.41 upstream)
  • Revision ID: james.westby@ubuntu.com-20101201111438-1q61cvs8zw118t3m
Tags: 4:4.5.80-0ubuntu1
* New upstream release
* Remove build-dep on libqimageblitz-dev, causes smoke to segfault

Show diffs side-by-side

added added

removed removed

Lines of Context:
perl/kio/lib/KIO4.pm
26
26
    foreach my $c ( @{getClassList()} ) {
27
27
        KIO4::_internal->init_class($c);
28
28
    }
 
29
    foreach my $e ( @{getEnumList()} ) {
 
30
        KIO4::_internal->init_enum($e);
 
31
    }
29
32
}
30
33
 
31
34
sub normalize_classname {
32
35
    my ( $self, $cxxClassName ) = @_;
33
 
 
34
 
    if( $cxxClassName =~ m/^K/ ) {
35
 
        $cxxClassName =~ s/^K(?=[A-Z])/KDE::/;
36
 
    }
37
 
    else {
38
 
        $cxxClassName = $self->SUPER::normalize_classname( $cxxClassName );
39
 
    }
 
36
    $cxxClassName = $self->SUPER::normalize_classname( $cxxClassName );
40
37
    return $cxxClassName;
41
38
}
42
39
 
55
52
KIO4::_internal::init();
56
53
 
57
54
1;
58