Use new TQ_METHOD, TQ_SIGNAL, TQ_SLOT defines

Signed-off-by: Michele Calgaro <michele.calgaro@yahoo.it>
(cherry picked from commit 301b5380792b7a368488aa485d3bdb3df81e0808)

1 files changed, 7 insertions, 7 deletions

diff --git a/doc/en/PerlQt.pod b/doc/en/PerlQt.pod
index 592fccc..ebc1fa5 100644
--- a/doc/en/PerlQt.pod
+++ b/doc/en/PerlQt.pod
@@ -489,12 +489,12 @@ component.
 
 The general syntax of this connection process is either :
 
-TQt::Object::connect( sender, TQT_SIGNAL 'mysignal(arg_type)', 
-receiver, TQT_SLOT 'myslot(arg_type)');
+TQt::Object::connect( sender, TQ_SIGNAL 'mysignal(arg_type)', 
+receiver, TQ_SLOT 'myslot(arg_type)');
 
 or
 
-myObject->connect( sender, TQT_SIGNAL 'mysignal(arg_type)', TQT_SLOT 
+myObject->connect( sender, TQ_SIGNAL 'mysignal(arg_type)', TQ_SLOT 
 'myslot(arg_type)');
 
 This mechanism can be extended at will by the declaration of custom Signals and 
@@ -523,8 +523,8 @@ B<As an example, lets rewrite again our Button package :>
  15:   shift->SUPER::NEW(@_[0..2]);
  16:   itsTime = TQt::Time;
  17:   itsTime->start;   
- 18:   this->connect(this, TQT_SIGNAL 'clicked()', TQT_SLOT 'wasClicked()');
- 19:   this->connect(this, TQT_SIGNAL 'changeIt(int,int)', TQT_SLOT 'change(int,int)');
+ 18:   this->connect(this, TQ_SIGNAL 'clicked()', TQ_SLOT 'wasClicked()');
+ 19:   this->connect(this, TQ_SIGNAL 'changeIt(int,int)', TQ_SLOT 'change(int,int)');
  20: }
  21: 
  22: sub wasClicked
@@ -558,7 +558,7 @@ slot with two arguments.
 
 Finally, since PerlTQt-3.008, an alternative syntax can be used to declare Signals and Slots:
 
- sub a_slot : TQT_SLOT(int, TQString)
+ sub a_slot : TQ_SLOT(int, TQString)
  { 
 	$int = shift;
 	$string = shift;
@@ -567,7 +567,7 @@ Finally, since PerlTQt-3.008, an alternative syntax can be used to declare Signa
 
 and
 
- sub a_signal : TQT_SIGNAL(TQString);
+ sub a_signal : TQ_SIGNAL(TQString);
 
 This syntax is perfectly compatible with the traditional
 C<use TQt::signals> and C<use TQt::slots> declarations.