summaryrefslogtreecommitdiffstats
path: root/languages/perl/perlparser.cpp
diff options
context:
space:
mode:
authortpearson <tpearson@283d02a7-25f6-0310-bc7c-ecb5cbfe19da>2011-08-10 22:19:39 +0000
committertpearson <tpearson@283d02a7-25f6-0310-bc7c-ecb5cbfe19da>2011-08-10 22:19:39 +0000
commit32b67ac0690de411b26b1d5e715b188c27442248 (patch)
tree43167816a3df6b3a877d71c9a7963ed270dcc8c9 /languages/perl/perlparser.cpp
parent330c33ab6f97b279737bf9527c9add7bb1475450 (diff)
downloadtdevelop-32b67ac0690de411b26b1d5e715b188c27442248.tar.gz
tdevelop-32b67ac0690de411b26b1d5e715b188c27442248.zip
rename the following methods:
tqparent parent tqmask mask git-svn-id: svn://anonsvn.kde.org/home/kde/branches/trinity/kdevelop@1246260 283d02a7-25f6-0310-bc7c-ecb5cbfe19da
Diffstat (limited to 'languages/perl/perlparser.cpp')
-rw-r--r--languages/perl/perlparser.cpp22
1 files changed, 11 insertions, 11 deletions
diff --git a/languages/perl/perlparser.cpp b/languages/perl/perlparser.cpp
index 520daab3..60cca8f5 100644
--- a/languages/perl/perlparser.cpp
+++ b/languages/perl/perlparser.cpp
@@ -161,11 +161,11 @@ void perlparser::parseLines(TQStringList* lines,const TQString &fileName)
//base matching
if ((basere.search(line)>=0) && (!m_inscript)) {
- TQString tqparent = basere.cap(1);
- //create child & tqparent classes
- kdDebug(9016) << "basere match [" << tqparent << "]" << endl;
+ TQString parent = basere.cap(1);
+ //create child & parent classes
+ kdDebug(9016) << "basere match [" << parent << "]" << endl;
addClass(fileName,lineNo);
- addParentClass(tqparent);
+ addParentClass(parent);
continue;
} else {
if (libre.search(line)>=0) {
@@ -186,11 +186,11 @@ void perlparser::parseLines(TQStringList* lines,const TQString &fileName)
} //base
if ((isare.search(line)>=0) && (!m_inscript)) {
- TQString tqparent = isare.cap(1);
- //create child & tqparent classes
- kdDebug(9016) << "isare match [" << tqparent << "]" << endl;
+ TQString parent = isare.cap(1);
+ //create child & parent classes
+ kdDebug(9016) << "isare match [" << parent << "]" << endl;
addClass(fileName,lineNo);
- addParentClass(tqparent);
+ addParentClass(parent);
continue;
} //isa
@@ -424,11 +424,11 @@ void perlparser::addPackageSub(const TQString& fileName ,int lineNr ,const TQStr
m_lastsub=name;
}
-void perlparser::addParentClass(const TQString& tqparent)
+void perlparser::addParentClass(const TQString& parent)
{
- kdDebug(9016) << "addParentClass[ " << tqparent << "]" << endl;
+ kdDebug(9016) << "addParentClass[ " << parent << "]" << endl;
if (m_lastclass) {
- m_lastclass->addBaseClass(tqparent);
+ m_lastclass->addBaseClass(parent);
} else {
kdDebug(9016) << "addParentClass[ no m_lastclass]" << endl;
}