diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2004-10-28 10:22:50 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2004-10-28 10:22:50 (GMT) |
commit | bffdac3cbb0bfe12357f55cdc4fb24195743fbcf (patch) | |
tree | 4a0680cb493f74dee4162dbbed922841cdf25694 /doc/font.n | |
parent | f068b3c8aa0a0bfed87b981e99a3b096aed995d5 (diff) | |
download | tk-bffdac3cbb0bfe12357f55cdc4fb24195743fbcf.zip tk-bffdac3cbb0bfe12357f55cdc4fb24195743fbcf.tar.gz tk-bffdac3cbb0bfe12357f55cdc4fb24195743fbcf.tar.bz2 |
Assorted minor documentation fixes
Diffstat (limited to 'doc/font.n')
-rw-r--r-- | doc/font.n | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -4,7 +4,7 @@ '\" See the file "license.terms" for information on usage and redistribution '\" of this file, and for a DISCLAIMER OF ALL WARRANTIES. '\" -'\" RCS: @(#) $Id: font.n,v 1.6 2004/08/20 14:15:29 dkf Exp $ +'\" RCS: @(#) $Id: font.n,v 1.7 2004/10/28 10:22:51 dkf Exp $ '\" .so man.macros .TH font n 8.0 Tk "Tk Built-In Commands" @@ -286,11 +286,11 @@ family installed on your system: pack [text .t -wrap none] -fill both -expand 1 set count 0 set tabwidth 0 -foreach family [lsort -dictionary [\fBfont\fR families]] { +foreach family [lsort -dictionary [\fBfont families\fR]] { .t tag configure f[incr count] -font [list $family 10] .t insert end ${family}:\\t {} \\ "This is a simple sampler\\n" f$count - set w [\fBfont\fR measure [.t cget -font] ${family}:] + set w [\fBfont measure\fR [.t cget -font] ${family}:] if {$w+5 > $tabwidth} { set tabwidth [expr {$w+5}] .t configure -tabs $tabwidth |