From 4e997a9c6e25689dca65a2ec573a599699ef8170 Mon Sep 17 00:00:00 2001 From: Timothy Pearson Date: Sun, 1 Jan 2012 18:24:37 -0600 Subject: Initial TQt conversion --- PerlQt/examples/dclock/dclock.pl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'PerlQt/examples/dclock/dclock.pl') 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; -- cgit v1.2.1