From c9d3a93d9b2abcd37f281e5b229b9626b5b2c8f7 Mon Sep 17 00:00:00 2001 From: Phil Krylov Date: Mon, 17 Aug 2009 12:03:18 +0000 Subject: [PATCH] 2009-08-17 16:02 UTC+0300 Phil Krylov * source/debug/tbrwtext.prg ! Fixed RTE on deleting the last tracepoint. --- harbour/ChangeLog | 4 ++++ harbour/source/debug/tbrwtext.prg | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index a491264c79..43bbcfb83b 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -17,6 +17,10 @@ past entries belonging to author(s): Viktor Szakats. */ +2009-08-17 16:02 UTC+0300 Phil Krylov + * source/debug/tbrwtext.prg + ! Fixed RTE on deleting the last tracepoint. + 2009-08-17 13:53 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) * harbour/source/rdd/workarea.c ! keep EOF position synced in relation positioning diff --git a/harbour/source/debug/tbrwtext.prg b/harbour/source/debug/tbrwtext.prg index d8fa2df691..f096d0207f 100644 --- a/harbour/source/debug/tbrwtext.prg +++ b/harbour/source/debug/tbrwtext.prg @@ -233,7 +233,7 @@ METHOD Resize( nTop, nLeft, nBottom, nRight ) CLASS HBBrwText ENDIF IF lResize ::oBrw:Resize( nTop, nLeft, nBottom, nRight ) - ::nWidth := nRight - nLeft + 1 + ::nWidth := ::nRight - ::nLeft + 1 ENDIF RETURN Self