diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 4fdfe63223..841976132f 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -8,6 +8,11 @@
    2009-12-31 13:59 UTC+0100 Foo Bar (foo.bar foobar.org)
 */
 
+2009-04-28 21:43 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
+  * harbour/contrib/rddads/ads1.c
+    ! fixed two typos in last modification - thanks for the info to Mindaugas
+      and Rossine.
+
 2009-04-28 19:45 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
   * harbour/ChangeLog
     * removed TOVERIFY note - Viktor checked it.
diff --git a/harbour/contrib/rddads/ads1.c b/harbour/contrib/rddads/ads1.c
index 53f5cb4bc8..a62a46a60d 100644
--- a/harbour/contrib/rddads/ads1.c
+++ b/harbour/contrib/rddads/ads1.c
@@ -1849,8 +1849,8 @@ static HB_ERRCODE adsFieldInfo( AREAP pArea, USHORT uiIndex, USHORT uiType, PHB_
 #if ADS_LIB_VERSION >= 900
          if( pField->uiTypeExtended == ADS_VARCHAR_FOX )
             hb_itemPutC( pItem, "V" );
-#endif
          else
+#endif
             hb_itemPutC( pItem, "Q" );
          break;
 
@@ -2024,7 +2024,7 @@ static HB_ERRCODE adsGetValue( ADSAREAP pArea, USHORT uiIndex, PHB_ITEM pItem )
 #endif
          {
 #if ADS_LIB_VERSION >= 600
-            AdsGetFieldRaw( pArea->hTable, ADSFIELD( uiIndex ), pBuffer, &u32Length ) == AE_NO_CURRENT_RECORD )
+            if( AdsGetFieldRaw( pArea->hTable, ADSFIELD( uiIndex ), pBuffer, &u32Length ) == AE_NO_CURRENT_RECORD )
             {
                u32Length = pField->uiType == HB_FT_STRING ? pField->uiLen : 0;
                memset( pBuffer, ' ', u32Length );