diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index c0525b0a5e..099e57722a 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -17,6 +17,10 @@
    past entries belonging to author(s): Viktor Szakats.
 */
 
+2009-06-20 21:01 UTC-0800 Pritpal Bedi (pritpal@vouchcac.com)
+  * harbour/contrib/hbqt/hbqt_slots.cpp
+    ! A fix non-sense.
+
 2009-06-20 22:24 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
   * harbour/include/hbapi.h
   * harbour/source/vm/extend.c
diff --git a/harbour/contrib/hbqt/hbqt_slots.cpp b/harbour/contrib/hbqt/hbqt_slots.cpp
index c3dfe99888..c7ce95bd42 100644
--- a/harbour/contrib/hbqt/hbqt_slots.cpp
+++ b/harbour/contrib/hbqt/hbqt_slots.cpp
@@ -153,9 +153,10 @@ static void SlotsExecString( QWidget* widget, char* event, const QString & strin
       int i = widget->property( event ).toInt();
       if( i > 0 && ( s->listActv.at( i-1 ) == true ) )
       {
+         char * str = string.toLatin1().data();
          PHB_ITEM pWidget = hb_itemPutPtr( NULL, ( QWidget* ) widget );
-         PHB_ITEM pString = hb_itemPutPtr( NULL, string.toLatin1().data() );
-         hb_vmEvalBlockV( ( PHB_ITEM ) s->listBlock.at( i-1 ), 3, pWidget, pString );
+         PHB_ITEM pString = hb_itemPutCPtr( NULL, str, strlen( str ) );
+         hb_vmEvalBlockV( ( PHB_ITEM ) s->listBlock.at( i-1 ), 2, pWidget, pString );
          hb_itemRelease( pWidget );
          hb_itemRelease( pString );
       }