Commit fdb6c956 authored by Ivica Ico Bukvic's avatar Ivica Ico Bukvic
Browse files

added proper detection of patch fonts for tooltips

parent c04ea2b4
......@@ -7287,9 +7287,8 @@ proc pdtk_tip {w fromc show args} {
variable select_color
variable nlet_color
variable tooltip_visible
variable dofont_fontsize
global pd_fontlist
switch -- $dofont_fontsize {
switch -- $::font([string trimright $w .c]) {
8 { set typeface [lindex $pd_fontlist 0] }
9 { set typeface [lindex $pd_fontlist 1] }
10 { set typeface [lindex $pd_fontlist 2] }
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment