diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 5020c44ee3..b5a7ed3152 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -8,6 +8,12 @@
    2002-12-01 13:30 UTC+0100 Foo Bar <foo.bar@foobar.org>
 */
 
+
+  * harbour/source/vm/arrays.c
+    ! fixed bug I introduce recently in AEVAL and additional range checking
+    * minor optimizations in ASCAN
+
+2006-07-06 23:15 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
   * harbour/contrib/rdd_ads/ads1.c
     * synced with Toninho modifications in xHarbour:
       (! Inverted checking for memo data types, verifying binary first,
diff --git a/harbour/contrib/rdd_ads/ads1.c b/harbour/contrib/rdd_ads/ads1.c
index 3ccf2d83f8..2c62e63c3e 100644
--- a/harbour/contrib/rdd_ads/ads1.c
+++ b/harbour/contrib/rdd_ads/ads1.c
@@ -1808,7 +1808,8 @@ static ERRCODE adsGetValue( ADSAREAP pArea, USHORT uiIndex, PHB_ITEM pItem )
          UNSIGNED16 pusType;
 
          AdsGetMemoDataType( pArea->hTable, ADSFIELD( uiIndex ), &pusType );
-         if( pusType == ADS_MEMO )
+
+         if( pusType != ADS_BINARY )
          {
             if( AdsGetMemoLength( pArea->hTable, ADSFIELD( uiIndex ), &pulLen ) == AE_NO_CURRENT_RECORD )
             {