Posted to tcl by aspect at Tue Oct 28 14:09:14 GMT 2014view pretty
Index: macosx/ttkMacOSXTheme.c ================================================================== --- macosx/ttkMacOSXTheme.c +++ macosx/ttkMacOSXTheme.c @@ -292,17 +292,20 @@ * <URL: http://developer.apple.com/documentation/userexperience/Conceptual/ * AppleHIGuidelines/XHIGControls/XHIGControls.html#//apple_ref/doc/uid/ * TP30000359-TPXREF116> */ -static const int TAB_HEIGHT = 10; -static const int TAB_OVERLAP = 10; - static void TabElementSize( void *clientData, void *elementRecord, Tk_Window tkwin, int *widthPtr, int *heightPtr, Ttk_Padding *paddingPtr) { + const int TAB_HEIGHT = 10; + const int TAB_OVERLAP = 10; + if (tkMacOSXMacOSXVersion >= 1100) { + TAB_OVERLAB = 5; + } + *heightPtr = TAB_HEIGHT + TAB_OVERLAP - 1; }