diff options
Diffstat (limited to 'PerlQt/examples/aclock/aclock.pl')
-rw-r--r-- | PerlQt/examples/aclock/aclock.pl | 6 |
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; |