Remove extraneous empty paragraphs (<p></p>) from the output.

This commit is contained in:
jfieber 1995-05-18 03:01:28 +00:00
parent 56d21b4218
commit 72576f0cde

View File

@ -1,5 +1,5 @@
#!/usr/bin/perl
# $Id:$
# $Id: sgmlfmt.pl,v 1.1.1.1 1995/05/09 23:58:06 jfieber Exp $
# Format an sgml document tagged according to the linuxdoc DTD.
# by John Fieber <jfieber@freebsd.org> for the FreeBSD documentation
@ -293,6 +293,11 @@ sub html2html {
s/<([\/]*)pre\&gt;/<\1pre>/g;
}
# remove extraneous empty paragraphs (it is arguable that this
# is really a bug with the DTD, but changing it would break
# almost every document written to this DTD.)
s/<p><\/p>//;
tagsw: {
# titles and headings
if (s/^<@@title>//) {