diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 3a1808f0fa..2a32a001e2 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -1,3 +1,9 @@
+2001-07-22 18:00 GMT -3 Luiz Rafael Culik <culik@sl.conex.net>
+   +source/rtl/radiobtn.prg
+      *Added an 'LOCAL cColor' to compile without warning
+   +source/rtl/radiogrp.prg
+      *Added 'LOCAL nPos,nLen' to compile without warning
+
 2001-07-22 18:00 GMT -3 Luiz Rafael Culik <culik@sl.conex.net>
    * utils/hbmake/hbmake.prg
       * Added suport for !iffile/!else/!endif and !stdout
diff --git a/harbour/source/rtl/radiobtn.prg b/harbour/source/rtl/radiobtn.prg
index 0eb899b48b..e529d1de59 100644
--- a/harbour/source/rtl/radiobtn.prg
+++ b/harbour/source/rtl/radiobtn.prg
@@ -88,7 +88,7 @@ CLASS TRadioBtn
 ENDCLASS
 
 METHOD New(nRow,nCol,cCaption,xData) CLASS TRadioBtn
-
+   Local cColor
    ::Buffer:= .f.
    ::CapRow:= nRow
    ::CapCol:=  nCol+3+1
diff --git a/harbour/source/rtl/radiogrp.prg b/harbour/source/rtl/radiogrp.prg
index 80a6ab62c1..253d151ae4 100644
--- a/harbour/source/rtl/radiogrp.prg
+++ b/harbour/source/rtl/radiogrp.prg
@@ -158,7 +158,7 @@ METHOD  SETSTYLE( xStyle ) CLASS TRadioGroup
 METHOD  SETFOCus() CLASS TRadioGroup
 
 
-   local Local1, Local2, aItems
+   local nPos, nLen, aItems
    if ( !::HasFocus )
       ::lCursor := setcursor(0)
       ::HasFocus := .T.