head	1.1;
access;
symbols
	iwidgets-4-0-1:1.1
	iwidgets-4-0-0:1.1
	iwidgets_overhaul:1.1.0.6
	iwidgets-2-2-0:1.1.1.1
	lucent:1.1.1
	tclpro-1-5-0:1.1
	tclpro-1-4-1:1.1
	tclpro-1-4-0:1.1
	itcl-3-2-0:1.1
	ajuba-ajuba2-2-0:1.1
	scriptics-sc-2-0-b5:1.1
	scriptics-sc-2-0-fixed:1.1
	scriptics-sc-2-0-b2:1.1
	scriptics-sc-2-0-b1:1.1
	scriptics-sc-1-1:1.1
	scriptics-sc-1-1-b1:1.1
	scriptics-sc-1-1-branch:1.1.0.4
	scriptics-sc-1-1-base:1.1
	scriptics-sc-1-0:1.1
	scriptics-sc-1-0-branch:1.1.0.2
	scriptics-sc-1-0-base:1.1
	scriptics-bc-1-0-b1:1.1
	scriptics-tclpro-1-3-0:1.1
	scriptics-tclpro-1-3-b4:1.1
	itcl-3-1-0:1.1
	scriptics-tclpro-1-3-b3:1.1
	scriptics-tclpro-1-2:1.1
	scriptics-tclpro-1-2-b2:1.1
	scriptics-tclpro-1-2-b1:1.1
	scriptics-tclpro-1-2-a1:1.1
	itcl-3-0-1:1.1
	itcl3-0-1:1.1
	stanton:1.1;
locks; strict;
comment	@# @;


1.1
date	98.07.27.18.51.09;	author stanton;	state Exp;
branches
	1.1.1.1;
next	;

1.1.1.1
date	2001.04.25.04.02.39;	author davygrvy;	state Exp;
branches;
next	;


desc
@@


1.1
log
@Initial revision
@
text
@#!/bin/sh
# filter to convert Tk and Tcl man pages to html equivalents
# does not do any linking !!!!

TOP=`pwd`
if [ $# -eq 0 ] ; then
    echo "Usage $0 filename"
    exit
fi

cat  $1 | 
    sed  -e 's/\\-/-/g' \
         -e 's/\\[0&]/  /g' \
         -e 's/&/\&amp;/g' \
         -e 's/</\&lt;/g' \
         -e 's/>/\&gt;/g' \
         -e 's/\\|//g' \
         -e 's/\\e/\\/g'     |
    /usr/bin/nawk -f ${TOP}/tk2html.awk | 
     sed -e 's^\\fB\([^\\]*\)\\fR^<B>\1</B>^g' \
        -e 's^\\fI\(.[^\\]*\)\\fR^<I>\1</I>^g' \
        -e 's^\\fB^<B>^g' \
        -e 's^\\fI^<I>^g' \
        -e 's^\\f[RP]^</B></I>^g' \
        -e 's/^.[LP]P/<P>/' \
        -e 's/^.br/<BR>/' \
        -e 's/^\.DS.*/<pre>/' \
        -e 's$^\.DE.*$</pre>$' \
        -e 's/^\.nf */<table>/' \
        -e 's$^\.fi *$</table>$' \
        -e 's$^\.BE *$</pre><HR>$' \
        -e 's/^\.RS.*/<UL>/' \
        -e 's$^\.RE.*$</UL>$' \
        -e 's^\.SH *"*\([^"]*\)"*^</pre><H2>\1</H2>^' \
        -e 's/^\.[a-zA-Z]*.*//' \
        -e 's/^`\\\".*//' |
    /usr/bin/nawk -f ${TOP}/tk2html2.awk 

# The above handling for font mapping to html works correctly in about 95% of 
# the cases, the others turn out stacking the font setting so you get the 
# font bleeding since it isn't being turned # off in the correct places. 
# To correct we would have to record the current ( non-default) font and 
# explicitly turn it off when another font change is detected.
# Which would make multiple styles impossible concurrently which seems to
# be the case anyway....

@


1.1.1.1
log
@import of current 2.2.0
@
text
@@

