|
2014-02-02
| ||
| 20:40 | • Closed ticket [0ff6d72ab9]: psballon generate Tcl error plus 6 other changes artifact: d044cd9248 user: peter | |
| 20:38 | Added a font fallback in psballon. [0ff6d72ab9] check-in: 1eed3e5dfb user: peter tags: trunk | |
|
2014-01-24
| ||
| 20:44 | • New ticket [0ff6d72ab9] psballon generate Tcl error. artifact: 603e71e55e user: anonymous | |
| Ticket Hash: | 0ff6d72ab9f6f97f57e117a56e3e62ad11e30a53 | ||
| Title: | psballon generate Tcl error | ||
| Status: | Closed | Type: | Code_Defect |
| Severity: | Important | Priority: | Immediate |
| Subsystem: | Diff_Display | Resolution: | Fixed |
| Last Modified: |
2014-02-02 20:40:03 11.29 years ago |
Created: |
2014-01-24 20:44:06 11.31 years ago |
| Version Found In: | 2.6.4 | ||
| User Comments: | ||||
anonymous added on 2014-01-24 20:44:06:
On Windows, when I hover over the Rev label I get an Tcl error that
[font measure $font $msg]
failed because of $font being empty. And it true you can get an empty font if the default font ist used.
Here is my patch for this
--- psballoon.tcl 2014-01-11 21:19:28.000000000 +0100
+++ psballoon-x.tcl 2014-01-24 21:36:51.933322189 +0100
@@ -74,6 +74,9 @@
if {[catch {set font [$w cget -font]}]} {
set font [ttk::style lookup [winfo class $w] -font]
}
+ if { $font eq "" } {
+ set font TkDefaultFont
+ }
set ww [winfo width $w]
set ih [winfo height $w]
set ix 0
peter added on 2014-02-02 20:40:03: Fixed in code | ||||