diff options
| author | davygrvy <davygrvy@noemail.net> | 2002-05-08 04:21:06 (GMT) |
|---|---|---|
| committer | davygrvy <davygrvy@noemail.net> | 2002-05-08 04:21:06 (GMT) |
| commit | 0ba75bfd1cff89f83aa0f7db1f0fb075ef3eb274 (patch) | |
| tree | e72dcafd7b06bb9a2506ccbbe43a7eb9bc716933 /tools/man2help.tcl | |
| parent | ccfcd0b3525edaa548732555e6022f46ecfaed76 (diff) | |
| download | tcl-0ba75bfd1cff89f83aa0f7db1f0fb075ef3eb274.zip tcl-0ba75bfd1cff89f83aa0f7db1f0fb075ef3eb274.tar.gz tcl-0ba75bfd1cff89f83aa0f7db1f0fb075ef3eb274.tar.bz2 | |
Made code samples use the Courier New fixed-width font. Changes from
Peter Spjuth <peter.spjuth@space.se>.
FossilOrigin-Name: 7b3e44778839e86d9ffeb1b7365c764543fce30a
Diffstat (limited to 'tools/man2help.tcl')
| -rw-r--r-- | tools/man2help.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tools/man2help.tcl b/tools/man2help.tcl index 7982e37..9b9fb52 100644 --- a/tools/man2help.tcl +++ b/tools/man2help.tcl @@ -6,7 +6,7 @@ # # Copyright (c) 1996 by Sun Microsystems, Inc. # -# RCS: @(#) $Id: man2help.tcl,v 1.11 2002/03/28 21:52:41 davygrvy Exp $ +# RCS: @(#) $Id: man2help.tcl,v 1.12 2002/05/08 04:21:07 davygrvy Exp $ # # @@ -59,7 +59,7 @@ proc generateHelp {basename files} { set file [open [file join [file dirname [info script]] $basename.rtf] w] fconfigure $file -translation crlf - puts $file "\{\\rtf1\\ansi \\deff0\\deflang1033\{\\fonttbl\{\\f0\\froman\\fcharset0\\fprq2 Times New Roman\;\}\}" + puts $file "\{\\rtf1\\ansi \\deff0\\deflang1033\{\\fonttbl\{\\f0\\froman\\fcharset0\\fprq2 Times New Roman\;\}\{\\f1\\fmodern\\fcharset0\\fprq1 Courier New\;\}\}" foreach f $files { puts "Pass 2 -- $f" flush stdout |