summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--generic/tkTextDisp.c4
1 files changed, 3 insertions, 1 deletions
diff --git a/generic/tkTextDisp.c b/generic/tkTextDisp.c
index f16c45b..d610d85 100644
--- a/generic/tkTextDisp.c
+++ b/generic/tkTextDisp.c
@@ -6429,6 +6429,7 @@ FindDLine(
CONST TkTextIndex *indexPtr)/* Index of desired character. */
{
TkTextLine *linePtr;
+ DLine *dlPtrPrev;
if (dlPtr == NULL) {
return NULL;
@@ -6449,6 +6450,7 @@ FindDLine(
linePtr = dlPtr->index.linePtr;
while (linePtr != indexPtr->linePtr) {
while (dlPtr->index.linePtr == linePtr) {
+ dlPtrPrev = dlPtr;
dlPtr = dlPtr->nextPtr;
if (dlPtr == NULL) {
return NULL;
@@ -6466,7 +6468,7 @@ FindDLine(
}
}
if (indexPtr->linePtr != dlPtr->index.linePtr) {
- return dlPtr;
+ return dlPtrPrev;
}
/*