diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index ef804923fb..c103c0995e 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -8,6 +8,10 @@
    2009-12-31 13:59 UTC+0100 Foo Bar (foo.bar foobar.org)
 */
 
+2009-04-21 12:31 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
+  * harbour/source/rtl/valtoexp.prg
+    ! fixed typo in copy and past in previous modification
+
 2009-04-21 11:56 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
   * harbour/source/common/hbdate.c
     ! fixed decoding fractional part of seconds in timestamp expressions
diff --git a/harbour/source/rtl/valtoexp.prg b/harbour/source/rtl/valtoexp.prg
index 7fc5058b11..f4de050ce8 100644
--- a/harbour/source/rtl/valtoexp.prg
+++ b/harbour/source/rtl/valtoexp.prg
@@ -128,7 +128,7 @@ FUNCTION hb_CStr( xVal )
       CASE "D"
          RETURN iif( Empty( xVal ), "0d00000000", "0d" + DToS( xVal ) )
       CASE "T"
-         cVal := 't"' + hb_TSToStr( xVal, .T. ) + '"'
+         RETURN 't"' + hb_TSToStr( xVal, .T. ) + '"'
       CASE "L"
          RETURN iif( xVal, ".T.", ".F." )
       CASE "S"