diff options
| -rw-r--r-- | ChangeLog | 6 | ||||
| -rw-r--r-- | generic/tkText.c | 1 | ||||
| -rw-r--r-- | generic/tkText.h | 7 | ||||
| -rw-r--r-- | tests/textMark.test | 1 |
4 files changed, 10 insertions, 5 deletions
@@ -1,9 +1,13 @@ -2012-01-?? Francois Vogel <fvogelnew1@free.fr> +2012-01-25 Francois Vogel <fvogelnew1@free.fr> * generic/tkText.c: [Bug-1630271]: segfault/infinite loop * generic/tkTextMark.c: when a mark is before -startline * tests/textMark.test: +2012-01-25 Francois Vogel <fvogelnew1@free.fr> + + * generic/tkText.c: [Bug-3475627]: Test text-31.11 fails + 2012-01-22 Francois Vogel <fvogelnew1@free.fr> * generic/tkTextMark.c: [Bug-3288113,3288121]: Missing marks/endless diff --git a/generic/tkText.c b/generic/tkText.c index d050170..76051da 100644 --- a/generic/tkText.c +++ b/generic/tkText.c @@ -2124,6 +2124,7 @@ ConfigureText( if (TkTextIndexCmp(&index3, &index2) > 0) { textPtr->currentMarkPtr = TkTextSetMark(textPtr, "current", &index2); } + textPtr->sharedTextPtr->stateEpoch++; } /* diff --git a/generic/tkText.h b/generic/tkText.h index 289e64b..4ffdc8a 100644 --- a/generic/tkText.h +++ b/generic/tkText.h @@ -561,9 +561,10 @@ typedef struct TkSharedText { * Each "object" used for this table is the * name of a tag. */ int stateEpoch; /* This is incremented each time the B-tree's - * contents change structurally, and means - * that any cached TkTextIndex objects are no - * longer valid. */ + * contents change structurally, or when the + * start/end limits change, and means that any + * cached TkTextIndex objects are no longer + * valid. */ /* * Information related to the undo/redo functionality. diff --git a/tests/textMark.test b/tests/textMark.test index 5faaabd..c1138ac 100644 --- a/tests/textMark.test +++ b/tests/textMark.test @@ -9,7 +9,6 @@ package require tcltest 2.1 eval tcltest::configure $argv tcltest::loadTestedCommands -#namespace import -force tcltest::test catch {destroy .t} text .t -width 20 -height 10 |