summaryrefslogtreecommitdiffstats
path: root/tools/man2help.tcl
diff options
context:
space:
mode:
authordavygrvy <davygrvy@pobox.com>2002-05-08 04:21:07 (GMT)
committerdavygrvy <davygrvy@pobox.com>2002-05-08 04:21:07 (GMT)
commit030f4c023479b3098d9231c080dc0563872dbdd9 (patch)
treee72dcafd7b06bb9a2506ccbbe43a7eb9bc716933 /tools/man2help.tcl
parent6a9dc1249fd050fdbc5fcafe4a1a98330835a7c4 (diff)
downloadtcl-030f4c023479b3098d9231c080dc0563872dbdd9.zip
tcl-030f4c023479b3098d9231c080dc0563872dbdd9.tar.gz
tcl-030f4c023479b3098d9231c080dc0563872dbdd9.tar.bz2
Made code samples use the Courier New fixed-width font. Changes from
Peter Spjuth <peter.spjuth@space.se>.
Diffstat (limited to 'tools/man2help.tcl')
-rw-r--r--tools/man2help.tcl4
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