diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 737d3430f3..06691afda1 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -8,6 +8,10 @@
    2008-12-31 13:59 UTC+0100 Foo Bar (foo.bar foobar.org)
 */
 
+2008-10-15 21:33 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
+  * harbour/source/debug/tbrwtext.prg
+    ! refresh rows after active line changing for proper color updating
+
 2008-10-15 20:03 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
   * harbour/source/debug/tbrwtext.prg
     ! fixed vertical navigation to be compatible with old debugger
diff --git a/harbour/source/debug/tbrwtext.prg b/harbour/source/debug/tbrwtext.prg
index bd2d816fb5..1e4ff47e7b 100644
--- a/harbour/source/debug/tbrwtext.prg
+++ b/harbour/source/debug/tbrwtext.prg
@@ -160,6 +160,7 @@ METHOD GotoLine( n ) CLASS HBBrwText
 METHOD SetActiveLine( n ) CLASS HBBrwText
 
    ::nActiveLine := n
+   ::RefreshAll()
 
    RETURN Self