From 1f5fc183bc9b936bcf73c6138df3b699567545d6 Mon Sep 17 00:00:00 2001 From: dgp Date: Tue, 12 Nov 2013 12:51:45 +0000 Subject: Fix "creative writing" flaw. --- library/ttk/fonts.tcl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/library/ttk/fonts.tcl b/library/ttk/fonts.tcl index 52298c5..a2781c6 100644 --- a/library/ttk/fonts.tcl +++ b/library/ttk/fonts.tcl @@ -60,7 +60,7 @@ namespace eval ttk { -set tip145 [catch {font create TkDefaultFont}] +variable tip145 [catch {font create TkDefaultFont}] catch {font create TkTextFont} catch {font create TkHeadingFont} catch {font create TkCaptionFont} -- cgit v0.12