summaryrefslogtreecommitdiffstats
path: root/umbrello/umbrello/codegenerators/perlwriter.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'umbrello/umbrello/codegenerators/perlwriter.cpp')
-rw-r--r--umbrello/umbrello/codegenerators/perlwriter.cpp6
1 files changed, 3 insertions, 3 deletions
diff --git a/umbrello/umbrello/codegenerators/perlwriter.cpp b/umbrello/umbrello/codegenerators/perlwriter.cpp
index def1c7dd..9d51ffde 100644
--- a/umbrello/umbrello/codegenerators/perlwriter.cpp
+++ b/umbrello/umbrello/codegenerators/perlwriter.cpp
@@ -27,7 +27,7 @@
#include <tqstring.h>
#include <tqdir.h>
#include <tqdatetime.h>
-#include <textstream.h>
+#include <tqtextstream.h>
PerlWriter::PerlWriter()
{
@@ -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::currentDate().toString("yyyy"));
- str.replace(TQRegExp("%date%"),TQDate::currentDate().toString());
+ str.replace(TQRegExp("%year%"),TQDate::tqcurrentDate().toString("yyyy"));
+ str.replace(TQRegExp("%date%"),TQDate::tqcurrentDate().toString());
str.replace(TQRegExp("%time%"),TQTime::currentTime().toString());
str.replace(TQRegExp("%package-name%"),ThisPkgName);
if(str.find(TQRegExp("%PACKAGE-DECLARE%"))){