diff options
Diffstat (limited to 'languages/perl/perlsupportpart.cpp')
| -rw-r--r-- | languages/perl/perlsupportpart.cpp | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/languages/perl/perlsupportpart.cpp b/languages/perl/perlsupportpart.cpp index d5b0868f..b131af11 100644 --- a/languages/perl/perlsupportpart.cpp +++ b/languages/perl/perlsupportpart.cpp @@ -48,8 +48,8 @@ typedef KDevGenericFactory<PerlSupportPart> PerlSupportFactory; static const KDevPluginInfo data("kdevperlsupport"); K_EXPORT_COMPONENT_FACTORY( libkdevperlsupport, PerlSupportFactory( data ) ) -PerlSupportPart::PerlSupportPart(TQObject *parent, const char *name, const TQStringList &) - : KDevLanguageSupport(&data, parent, name ? name : "PerlSupportPart") +PerlSupportPart::PerlSupportPart(TQObject *tqparent, const char *name, const TQStringList &) + : KDevLanguageSupport(&data, tqparent, name ? name : "PerlSupportPart") { setInstance(PerlSupportFactory::instance()); @@ -166,7 +166,7 @@ void PerlSupportPart::savedFile(const KURL &fileName) #if 0 // not needed anymore kdDebug(9016) << "savedFile()" << endl; - if (project()->allFiles().contains(fileName.mid ( project()->projectDirectory().length() + 1 ))) { + if (project()->allFiles().tqcontains(fileName.mid ( project()->projectDirectory().length() + 1 ))) { maybeParse(fileName); emit updatedSourceInfo(); } @@ -215,7 +215,7 @@ void PerlSupportPart::slotStartInterpreter() void PerlSupportPart::slotExecuteString() { bool ok; - TQString cmd = KInputDialog::getText(i18n("String to Execute"), i18n("String to execute:"), TQString::null, &ok, 0); + TQString cmd = KInputDialog::getText(i18n("String to Execute"), i18n("String to execute:"), TQString(), &ok, 0); if (ok) { cmd.prepend("'"); cmd.append("'"); |