diff options
| author | das <das@noemail.net> | 2006-09-10 17:06:30 (GMT) |
|---|---|---|
| committer | das <das@noemail.net> | 2006-09-10 17:06:30 (GMT) |
| commit | 4ac620d245b40835809678497002e4a8df621e6f (patch) | |
| tree | 13ad5944ad3d007fdcb67d4af43aa55cb42e1470 /library | |
| parent | 0dbee8f9e202b9f018dd496e81630969fb1ecd7a (diff) | |
| download | tk-4ac620d245b40835809678497002e4a8df621e6f.zip tk-4ac620d245b40835809678497002e4a8df621e6f.tar.gz tk-4ac620d245b40835809678497002e4a8df621e6f.tar.bz2 | |
* macosx/tkMacOSXColor.c (TkSetMacColor, TkpGetColor): use AppearanceMgr
* macosx/tkMacOSXDefault.h: to retrieve platform std colors for text
* macosx/tkMacOSXPort.h: selections, add "systemHighlightSecondary"
color name for standard color of inactive selections, use this color as
default for text widget -inactiveselectbackground to implement platform
standard look for inactive text selections.
* library/text.tcl (aqua): remove focus bindings to set selection color.
* generic/tkTextBTree.c (TkTextIsElided): on TkAqua, don't show inactive
* generic/tkTextDisp.c (GetStyle): text selection when text
widget is in disabled state.
* generic/tkEntry.c (DisplayEntry): change default TkAqua selection
* macosx/tkMacOSXDefault.h: relief to "flat" (platform std).
* generic/tkText.c (CreateWidget): fix bug leading to default text
selection relief string DEF_TEXT_SELECT_RELIEF being ignored.
* macosx/tkMacOSXMouseEvent.c (TkMacOSXProcessMouseEvent): allow mouse
event delivery to background windows with kWindowNoActivatesAttribute
(e.g. overrideredirect windows), as these never come to the foreground
they would not receive any mouse events otherwise. [Bug 1472624]
* macosx/tkMacOSXWindowEvent.c (TkMacOSXGenerateFocusEvent): do not
send focus events to any windows with kWindowNoActivatesAttribute.
* macosx/tkMacOSXXStubs.c (XQueryColor, XQueryColors): implement basic
XColor computation from pixel values, enough to make tkImg's window.c
happy, fixes img::window failures reported on tcl-mac.
* macosx/tkMacOSXMenu.c (DrawMenuEntryLabel): fix leak. [Bug 1554672]
* macosx/GNUmakefile: workaround bug in 'cp -pRH' on Darwin 6 and
earlier, fixes 'make embedded' failure reported on tcl-mac; fix error
from 'make deploy' with same build tree as previous 'make embedded'.
* macosx/Wish.xcodeproj/project.pbxproj: add new tclUnixCompat.c file.
* macosx/tkMacOSXEntry.c (TkpDrawEntryBorderAndFocus): fix typo.
* unix/tcl.m4: sync with tcl/unix/tcl.m4.
* unix/configure: autoconf-2.59
FossilOrigin-Name: 12b024293d2d8e2cb8422838d1dce5d3241a7c65
Diffstat (limited to 'library')
| -rw-r--r-- | library/text.tcl | 11 |
1 files changed, 1 insertions, 10 deletions
diff --git a/library/text.tcl b/library/text.tcl index 22d96d7..36a15c2 100644 --- a/library/text.tcl +++ b/library/text.tcl @@ -3,7 +3,7 @@ # This file defines the default bindings for Tk text widgets and provides # procedures that help in implementing the bindings. # -# RCS: @(#) $Id: text.tcl,v 1.40 2005/09/10 14:53:20 das Exp $ +# RCS: @(#) $Id: text.tcl,v 1.41 2006/09/10 17:06:32 das Exp $ # # Copyright (c) 1992-1994 The Regents of the University of California. # Copyright (c) 1994-1997 Sun Microsystems, Inc. @@ -386,16 +386,7 @@ bind Text <Meta-Delete> { # Macintosh only bindings: -# if text black & highlight black -> text white, other text the same if {[tk windowingsystem] eq "aqua"} { -bind Text <FocusIn> { - %W tag configure sel -borderwidth 0 - %W configure -selectbackground systemHighlight -selectforeground systemHighlightText -} -bind Text <FocusOut> { - %W tag configure sel -borderwidth 1 - %W configure -selectbackground white -selectforeground black -} bind Text <Option-Left> { tk::TextSetCursor %W [tk::TextPrevPos %W insert tcl_startOfPreviousWord] } |