summaryrefslogtreecommitdiffstats
path: root/PerlQt/examples/aclock/aclock.pl
diff options
context:
space:
mode:
Diffstat (limited to 'PerlQt/examples/aclock/aclock.pl')
-rw-r--r--PerlQt/examples/aclock/aclock.pl6
1 files changed, 3 insertions, 3 deletions
diff --git a/PerlQt/examples/aclock/aclock.pl b/PerlQt/examples/aclock/aclock.pl
index ff59ec1..b4ae659 100644
--- a/PerlQt/examples/aclock/aclock.pl
+++ b/PerlQt/examples/aclock/aclock.pl
@@ -1,13 +1,13 @@
#!/usr/bin/perl -w
use strict;
-use Qt;
+use TQt;
use AnalogClock;
-my $a = Qt::Application(\@ARGV);
+my $a = TQt::Application(\@ARGV);
my $clock = AnalogClock;
$clock->setAutoMask(1) if @ARGV and $ARGV[0] eq '-transparent';
$clock->resize(100, 100);
$a->setMainWidget($clock);
-$clock->setCaption("PerlQt example - Analog Clock");
+$clock->setCaption("PerlTQt example - Analog Clock");
$clock->show;
exit $a->exec;