diff options
Diffstat (limited to 'umbrello/umbrello/codegenerators/perlwriter.cpp')
-rw-r--r-- | umbrello/umbrello/codegenerators/perlwriter.cpp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/umbrello/umbrello/codegenerators/perlwriter.cpp b/umbrello/umbrello/codegenerators/perlwriter.cpp index 9d51ffde..42563ec4 100644 --- a/umbrello/umbrello/codegenerators/perlwriter.cpp +++ b/umbrello/umbrello/codegenerators/perlwriter.cpp @@ -168,8 +168,8 @@ void PerlWriter::writeClass(UMLClassifier *c) { if(!str.isEmpty()) { str.replace(TQRegExp("%filename%"),fileName); str.replace(TQRegExp("%filepath%"),fileperl.name()); - str.replace(TQRegExp("%year%"),TQDate::tqcurrentDate().toString("yyyy")); - str.replace(TQRegExp("%date%"),TQDate::tqcurrentDate().toString()); + str.replace(TQRegExp("%year%"),TQDate::currentDate().toString("yyyy")); + str.replace(TQRegExp("%date%"),TQDate::currentDate().toString()); str.replace(TQRegExp("%time%"),TQTime::currentTime().toString()); str.replace(TQRegExp("%package-name%"),ThisPkgName); if(str.find(TQRegExp("%PACKAGE-DECLARE%"))){ |