aboutsummaryrefslogtreecommitdiff
path: root/desiredata/src
diff options
context:
space:
mode:
authorN.N. <matju@users.sourceforge.net>2009-06-02 23:26:48 +0000
committerN.N. <matju@users.sourceforge.net>2009-06-02 23:26:48 +0000
commitcd67856253a28cb14d702072637ed106db7ee1c0 (patch)
treef9e83fdd3f525896ce0d56dc7800144cc44a7150 /desiredata/src
parent6f8df40266ad7280808eee9f7838d9aafc07ae93 (diff)
better "find last error"
svn path=/trunk/; revision=11632
Diffstat (limited to 'desiredata/src')
-rw-r--r--desiredata/src/desire.tk2
1 files changed, 1 insertions, 1 deletions
diff --git a/desiredata/src/desire.tk b/desiredata/src/desire.tk
index 2dda43a7..902292d8 100644
--- a/desiredata/src/desire.tk
+++ b/desiredata/src/desire.tk
@@ -6891,7 +6891,7 @@ def Tooltip draw {} {
o {set ny [expr {$y+24}]}
i {set ny [expr {$y-24}]}
}
- $self item TEXT text [list [expr $x+12] $ny] -fill $fg -text $@text -anchor w
+ $self item TEXT text [list [expr $x+12] $ny] -fill $fg -text $@text -anchor sw -width 300
mset {x1 y1 x2 y2} [l+ [$c bbox ${self}TEXT] [list -4 -4 +4 +4]]
switch -- $@type {
o {set coords [list $x1 $y1 [expr $x1+8] $y1 $x $y [expr $x1+16] $y1 $x2 $y1 $x2 $y2 $x1 $y2 $x1 $y1]}