#!/usr/bin/perl

use strict;

use Pod::Html;

foreach my $pod (<apps/*.pod>, <crypto/*.pod>, <ssl/*.pod>) {
    ( my $html = $pod ) =~ s/\.pod/\.html/;
    print STDOUT "Converting $pod -> $html\n";
    pod2html "$pod",
             "--outfile=$html",
             "--css=..\\openssl.css",
             "--header",
             "--quiet";
}

open(STYLESHEET, ">openssl.css");
print STYLESHEET <<"END_OF_STYLESHEET";
BODY
{
    background-color : white;
    font-family : Verdana, Arial, Sans-Serif;
    font-size : small;
    color : black;
    margin : 1em;
}

H1
{
    font-size : medium;
    font-weight : bold;    
    color : maroon;
}

H2
{
    font-size : medium;
    font-weight : bold;   
    color : indigo;
}

H3
{
    font-size : medium;
    font-weight : bold;
}

H4,H5,H6
{
    font-weight : bold;
}

CODE,PRE
{
    font-family : Courier;
    font-size : small;
}

.block
{
    font-size : medium;
    font-weight : bold;
    color : indigo;
    background-color : lightgrey;
    text-indent : 1em;
    line-height : 2em;
}
END_OF_STYLESHEET
close(STYLESHEET);