diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 87803bebde..6394af8097 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -8,6 +8,17 @@
    2002-12-01 13:30 UTC+0100 Foo Bar <foo.bar@foobar.org>
 */
 
+2007-04-01 16:56 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
+   * harbour/source/rtl/tgetlist.prg
+     ! Fixed bug #1692268. The fix simply removes two strange lines 
+       of code which tried to modify the internal TGet() var "Type",
+       after it read the value contained in the TGet(). Since this would 
+       be the job of TGet() alone, and Type() is not an assignable 
+       var in CA-Cl*pper, it very much looks like a workaround 
+       for something (maybe a shortcoming of an earlier version of 
+       TGet()). If anyone knows what was to be achieved with that, 
+       pls shout.
+
 2007-04-01 13:47 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
    * harbour/makefile.bc
    * harbour/makefile.vc
diff --git a/harbour/source/rtl/tgetlist.prg b/harbour/source/rtl/tgetlist.prg
index f53bd63ab3..b5feeb0c69 100644
--- a/harbour/source/rtl/tgetlist.prg
+++ b/harbour/source/rtl/tgetlist.prg
@@ -363,8 +363,8 @@ METHOD GetPreValidate() CLASS HBGetList
    local xValue
 
    if oGet:PreBlock != NIL
+
       xValue    := oGet:VarGet()
-      oGet:type := ValType( xValue )
       lUpdated  := ::lUpdated
 
       lWhen     := Eval( oGet:PreBlock, oGet )
@@ -1068,7 +1068,6 @@ METHOD GUIPreValidate( oGUI ) CLASS HBGetList
 
    if !( oGet:preBlock == NIL )
       xValue      := oGet:VarGet()
-      oGet:type   := ValType( xValue )
       lUpdated := ::lUpdated
 
       lWhen := eval( oGet:preBlock, oGet )