Tk Source Code

View Ticket
Login
Ticket UUID: 6867cc13a4a9ac80d2861daab0e0380cea1a6ecb
Title: [tk fontchooser configure] overwrites global variables
Type: Bug Version: 8.6.1
Submitter: anonymous Created on: 2014-01-28 10:58:02
Subsystem: 46. Unix Fonts Assigned To: jan.nijtmans
Priority: 5 Medium Severity: Minor
Status: Closed Last Modified: 2014-02-07 08:35:02
Resolution: Fixed Closed By: jan.nijtmans
    Closed on: 2014-02-07 08:35:02
Description:
% set font Helvetica
Helvetica
% tk fontchooser configure -title foo
% set font
Zrnic
User Comments: jan.nijtmans added on 2014-02-07 08:35:02:

Fixed in [9c6d8f0cf3]


anonymous added on 2014-01-28 14:51:25:
This should fix it:

--- a/library/fontchooser.tcl
+++ b/library/fontchooser.tcl
@@ -10,6 +10,8 @@
 
 namespace eval ::tk::fontchooser {
     variable S
+    variable font
+    variable style
 
     set S(W) .__tk__fontchooser
     set S(fonts) [lsort -dictionary [font families]]