diff options
| author | Timothy Pearson <[email protected]> | 2012-01-01 18:24:37 -0600 |
|---|---|---|
| committer | Timothy Pearson <[email protected]> | 2012-01-01 18:24:37 -0600 |
| commit | 4e997a9c6e25689dca65a2ec573a599699ef8170 (patch) | |
| tree | fdb5ecac42fb8204df9fc8c9abe1c784d4719e0e /PerlQt/examples/dclock/dclock.pl | |
| parent | bfa107694b2507a7116f8856cafe4ab1375da8a9 (diff) | |
| download | libtqt-perl-4e997a9c6e25689dca65a2ec573a599699ef8170.tar.gz libtqt-perl-4e997a9c6e25689dca65a2ec573a599699ef8170.zip | |
Initial TQt conversion
Diffstat (limited to 'PerlQt/examples/dclock/dclock.pl')
| -rw-r--r-- | PerlQt/examples/dclock/dclock.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/PerlQt/examples/dclock/dclock.pl b/PerlQt/examples/dclock/dclock.pl index f5820fd..57c02bd 100644 --- a/PerlQt/examples/dclock/dclock.pl +++ b/PerlQt/examples/dclock/dclock.pl @@ -1,12 +1,12 @@ #!/usr/bin/perl -w use strict; -use Qt; +use TQt; use DigitalClock; -my $a = Qt::Application(\@ARGV); +my $a = TQt::Application(\@ARGV); my $clock = DigitalClock; $clock->resize(170, 80); $a->setMainWidget($clock); -$clock->setCaption("PerlQt Example - Digital Clock"); +$clock->setCaption("PerlTQt Example - Digital Clock"); $clock->show; exit $a->exec; |