From b02f33ff386b22f9e337c1f82844c02a58cff61b Mon Sep 17 00:00:00 2001
From: Antonio Linares <alinares@fivetechsoft.com>
Date: Sat, 3 Feb 2001 03:38:31 +0000
Subject: [PATCH] removed some extras :RefreshAll() calls

---
 harbour/source/debug/dbgtarr.prg | 10 +++-------
 harbour/source/debug/dbgtobj.prg |  8 +-------
 2 files changed, 4 insertions(+), 14 deletions(-)

diff --git a/harbour/source/debug/dbgtarr.prg b/harbour/source/debug/dbgtarr.prg
index 5005999e82..d7fbee5d78 100644
--- a/harbour/source/debug/dbgtarr.prg
+++ b/harbour/source/debug/dbgtarr.prg
@@ -185,7 +185,6 @@ static procedure SetsUp( oBrw )
    if oBrw:RowPos == 1
       nSetPos := oBrw:Cargo
       oBrw:Cargo := 0
-      oBrw:Refreshall()
       oBrw:ForceStable()
       oBrw:Cargo := nSetPos
    endif
@@ -193,12 +192,11 @@ static procedure SetsUp( oBrw )
    oBrw:dehilite()
    oBrw:colpos:=2
    oBrw:Up()
-   oBrw:Refreshall()
 
    if nRow != oBrw:Cargo
       oBrw:aReDraw[ nRow ] := .f.
       oBrw:Up()
-   endif 
+   endif
    oBrw:ForceStable()
    myColors(oBrw,{1,2})
 return
@@ -211,7 +209,6 @@ static procedure SetsDown( oBrw )
    if oBrw:RowPos == oBrw:RowCount
       nSetPos := oBrw:Cargo
       oBrw:Cargo := 0
-      oBrw:Refreshall()
       oBrw:ForceStable()
       oBrw:Cargo := nSetPos
    endif
@@ -219,7 +216,6 @@ static procedure SetsDown( oBrw )
    oBrw:dehilite()
    oBrw:colpos:=2
    oBrw:Down()
-   oBrw:Refreshall()
 
    if nRow != oBrw:Cargo
       oBrw:aReDraw[ nRow ] := .f.
@@ -302,7 +298,7 @@ static function myColors( oBrowse, aColColors )
    local nColPos := oBrowse:colpos
 
    for i := 1 to len( aColColors )
-      oBrowse:colpos := aColColors[i]  
+      oBrowse:colpos := aColColors[i]
       oBrowse:hilite()
       if  oBrowse:colPos==1
            oBrowse:dehilite()
@@ -321,4 +317,4 @@ return nReturn
 Static function GetBottomPos(nPos)
 Local nReturn:=0
 nReturn :=if(nPos<maxrow()-2,nPos ,maxrow()-2)
-return nReturn
+return nReturn
\ No newline at end of file
diff --git a/harbour/source/debug/dbgtobj.prg b/harbour/source/debug/dbgtobj.prg
index 1bbbebc14c..114ffdf595 100644
--- a/harbour/source/debug/dbgtobj.prg
+++ b/harbour/source/debug/dbgtobj.prg
@@ -155,7 +155,6 @@ method SetsKeyPressed( nKey, oBrwSets, nSets, oWnd ,cName,LenArr,aArray) class t
            if oBrwSets:Cargo > 1
               oBrwSets:Cargo := 1
               oBrwSets:GoTop()
-              oBrwSets:RefreshAll()
               oBrwSets:ForceStable()
            endif
 
@@ -163,7 +162,6 @@ method SetsKeyPressed( nKey, oBrwSets, nSets, oWnd ,cName,LenArr,aArray) class t
            if oBrwSets:Cargo < nSets
               oBrwSets:Cargo := nSets
               oBrwSets:GoBottom()
-              oBrwSets:RefreshAll()
               oBrwSets:ForceStable()
            endif
 
@@ -206,7 +204,6 @@ static procedure SetsUp( oBrw )
    if oBrw:RowPos == 1
       nSetPos := oBrw:Cargo
       oBrw:Cargo := 0
-      oBrw:Refreshall()
       oBrw:ForceStable()
       oBrw:Cargo := nSetPos
    endif
@@ -214,7 +211,6 @@ static procedure SetsUp( oBrw )
    oBrw:dehilite()
    oBrw:colpos:=2
    oBrw:Up()
-   oBrw:Refreshall()
 
    if nRow != oBrw:Cargo
       oBrw:aReDraw[ nRow ] := .f.
@@ -232,7 +228,6 @@ static procedure SetsDown( oBrw )
    if oBrw:RowPos == oBrw:RowCount
       nSetPos := oBrw:Cargo
       oBrw:Cargo := 0
-      oBrw:Refreshall()
       oBrw:ForceStable()
       oBrw:Cargo := nSetPos
    endif
@@ -240,7 +235,6 @@ static procedure SetsDown( oBrw )
    oBrw:dehilite()
    oBrw:colpos:=2
    oBrw:Down()
-   oBrw:Refreshall()
 
    if nRow != oBrw:Cargo
       oBrw:aReDraw[ nRow ] := .f.
@@ -359,4 +353,4 @@ FUNC maxelem( a )
 RETURN max
 
 function __DbgObject(aArray,pArName)
-return TDBGObject():New(aArray,pArName)
+return TDBGObject():New(aArray,pArName)
\ No newline at end of file