summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
Diffstat (limited to 'generic')
-rw-r--r--generic/tkTextDisp.c43
1 files changed, 1 insertions, 42 deletions
diff --git a/generic/tkTextDisp.c b/generic/tkTextDisp.c
index 9c0dcf9..01ec22d 100644
--- a/generic/tkTextDisp.c
+++ b/generic/tkTextDisp.c
@@ -3933,30 +3933,6 @@ TkTextUpdateOneLine(
*
*----------------------------------------------------------------------
*/
-#ifdef MAC_OSX_TK
-static void
-RedisplayText(
- ClientData clientData )
-{
- register TkText *textPtr = (TkText *) clientData;
- TextDInfo *dInfoPtr = textPtr->dInfoPtr;
- TkRegion damageRegion;
- XRectangle rectangle;
-
- if (dInfoPtr == NULL) {
- return;
- }
- damageRegion = TkCreateRegion();
- rectangle.x = 0;
- rectangle.y = 0;
- rectangle.width = dInfoPtr->maxX;
- rectangle.height = dInfoPtr->maxY;
- TkUnionRectWithRegion(&rectangle, damageRegion, damageRegion);
-
- TextInvalidateRegion(textPtr, damageRegion);
- DisplayText(clientData);
-}
-#endif
static void
DisplayText(
@@ -3971,9 +3947,7 @@ DisplayText(
int bottomY = 0; /* Initialization needed only to stop compiler
* warnings. */
Tcl_Interp *interp;
-#ifdef MAC_OSX_TK
- Tcl_TimerToken macRefreshTimer = NULL;
-#endif
+
if ((textPtr->tkwin == NULL) || (textPtr->flags & DESTROYED)) {
/*
@@ -4167,21 +4141,6 @@ DisplayText(
damageRgn)) {
TextInvalidateRegion(textPtr, damageRgn);
-#ifdef MAC_OSX_TK
-
- /*
- * On OS X large scrolls sometimes leave garbage on the screen.
- * This attempts to clean it up by redisplaying the Text window
- * after 200 milliseconds.
- */
- if ( abs(y-oldY) > 14 ) {
- Tcl_DeleteTimerHandler(macRefreshTimer);
- macRefreshTimer = Tcl_CreateTimerHandler(200,
- RedisplayText,
- clientData);
- }
-#endif
-
}
numCopies++;
TkDestroyRegion(damageRgn);