diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index fdef45a95a..ca02a876d4 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -1,3 +1,7 @@
+19990825-09:02 GMT+1 Antonio Linares <alinares@fivetech.com>
+   * source/debug/tbrwtext.prg
+     * Improved display functionality.
+
 19990825-09:02 GMT+1 Antonio Linares <alinares@fivetech.com>
    * source/debug/debugger.prg
      + Breakpoints already working.
diff --git a/harbour/source/debug/tbrwtext.prg b/harbour/source/debug/tbrwtext.prg
index 7427691ab3..bc45c39a77 100644
--- a/harbour/source/debug/tbrwtext.prg
+++ b/harbour/source/debug/tbrwtext.prg
@@ -50,6 +50,7 @@ return Self
 
 METHOD GotoLine( nLine ) CLASS TBrwText
 
+   DispBegin()
    if nLine > ::nLine
       while ::nLine < nLine
          ::Down()
@@ -61,6 +62,7 @@ METHOD GotoLine( nLine ) CLASS TBrwText
       end
       ::ForceStable()
    endif
+   DispEnd()
 
 return nil