summaryrefslogtreecommitdiffstats
path: root/macosx/tkMacOSXDraw.c
diff options
context:
space:
mode:
authorKevin Walzer <kw@codebykevin.com>2015-01-24 16:36:32 (GMT)
committerKevin Walzer <kw@codebykevin.com>2015-01-24 16:36:32 (GMT)
commitca14184dca42dcaf581cb61ec5917066e8ffdfe3 (patch)
tree4c91b4dd5546303a2018a7969327e48226f64ac7 /macosx/tkMacOSXDraw.c
parent57e8fb13bcd2a96f3d4eb84599dffc8d31cc5be4 (diff)
downloadtk-ca14184dca42dcaf581cb61ec5917066e8ffdfe3.zip
tk-ca14184dca42dcaf581cb61ec5917066e8ffdfe3.tar.gz
tk-ca14184dca42dcaf581cb61ec5917066e8ffdfe3.tar.bz2
Commiting HITheme implementation on buttons; deferring scrolling for now because no adequate solution, even using themed scrolling via ttk, exists
Diffstat (limited to 'macosx/tkMacOSXDraw.c')
-rw-r--r--macosx/tkMacOSXDraw.c22
1 files changed, 0 insertions, 22 deletions
diff --git a/macosx/tkMacOSXDraw.c b/macosx/tkMacOSXDraw.c
index 6c0268c..962dd1a 100644
--- a/macosx/tkMacOSXDraw.c
+++ b/macosx/tkMacOSXDraw.c
@@ -101,13 +101,6 @@ TkMacOSXInitCGDrawing(
(char *) &useThemedFrame, TCL_LINK_BOOLEAN) != TCL_OK) {
Tcl_ResetResult(interp);
}
-#if TK_MAC_BUTTON_USE_COMPATIBILITY_METRICS
- if (Tcl_LinkVar(interp, "::tk::mac::useCompatibilityMetrics",
- (char *) &tkMacOSXUseCompatibilityMetrics, TCL_LINK_BOOLEAN)
- != TCL_OK) {
- Tcl_ResetResult(interp);
- }
-#endif
}
return TCL_OK;
}
@@ -1519,21 +1512,6 @@ TkScrollWindow(
/* Scroll the rectangle. */
[view scrollRect:scrollSrc by:NSMakeSize(dx, -dy)];
- /*
- * Adjust the positions of the button subwindows that meet the scroll
- * area.
- */
-
- for (NSView *subview in [view subviews] ) {
- if ( [subview isKindOfClass:[NSButton class]] == YES ) {
- NSRect subframe = [subview frame];
- if ( NSIntersectsRect(scrollSrc, subframe) ||
- NSIntersectsRect(scrollDst, subframe) ) {
- TkpShiftButton((NSButton *)subview, delta );
- }
- }
- }
-
/* Redisplay the scrolled area; hide to reduce flicker after removal of private API calls. */
[view setHidden:YES];
[view displayRect:scrollDst];