Tk Source Code

Check-in [f97bbb16]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Fix "creative writing" flaw.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | core-8-5-branch
Files: files | file ages | folders
SHA1: f97bbb16d3185b8cc0daa0c1066c31515a9d10af
User & Date: dgp 2013-11-12 12:51:45
Context
2013-11-18
13:58
Cygwin: In stead of checking whether the win32 part is configured properly, just configure it when needed. Always build the stub library first (and - on Cygwin - configure win32 properly just before building the stub library) check-in: 7e2ace2c user: jan.nijtmans tags: core-8-5-branch
2013-11-12
13:24
Fix "creative writing" problem. check-in: cb8d21bd user: dgp tags: trunk
12:51
Fix "creative writing" flaw. check-in: f97bbb16 user: dgp tags: core-8-5-branch
2013-11-11
10:55
Fix uninitialized variable in 16-bit PPM handling. [1632447] follow-up. check-in: 48ffb426 user: jan.nijtmans tags: core-8-5-branch
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to library/ttk/fonts.tcl.

56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
#	Font size specified in pixels on X11, not points.
#	This is Theoretically Wrong, but in practice works better; using
#	points leads to huge inconsistencies across different servers.
#

namespace eval ttk {

set tip145 [catch {font create TkDefaultFont}]
catch {font create TkTextFont}
catch {font create TkHeadingFont}
catch {font create TkCaptionFont}
catch {font create TkTooltipFont}
catch {font create TkFixedFont}
catch {font create TkIconFont}
catch {font create TkMenuFont}







|







56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
#	Font size specified in pixels on X11, not points.
#	This is Theoretically Wrong, but in practice works better; using
#	points leads to huge inconsistencies across different servers.
#

namespace eval ttk {

variable tip145 [catch {font create TkDefaultFont}]
catch {font create TkTextFont}
catch {font create TkHeadingFont}
catch {font create TkCaptionFont}
catch {font create TkTooltipFont}
catch {font create TkFixedFont}
catch {font create TkIconFont}
catch {font create TkMenuFont}