Branch: Tag:

1996-03-22

1996-03-22 19:53:51 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

added <body>

Rev: bin/htmlify_docs.lpc:1.2

205:    return replace(s,({"&amp;","&lt;","&gt;"}),({"&","<",">"}));   }    + string mkdocument(string s,string title) + { +  return ("<html>"+ +  "<title>"+ +  html_quote(title)+ +  "</title>"+ +  "<body bgcolor=\"#A0E0C0\">"+ +  s+ +  "</body>"+ +  "</html>"); + } +    string convert_page(string path, string fname)   {    string output, short;
332:    "\n</a>\n";    }    } -  output="<html><title>uLPC: "+name+"</title>"+ -  implode(parts,"<hr noshade size=1>\n"); +  output=mkdocument(implode(parts,"<hr noshade size=1>\n"),"uLPC: "+name);    }    return output;   }
408:       ret="";    -  ret+="<H1>"+version()+"</h1>\n"; +  ret+="<H1>"+version()+" index</h1>\n";    -  ret+="<H1>Keyword lists</H1>\n<dl>\n"; +  ret+="<H2><b>Keyword lists</b></H2>\n<dl>\n";    foreach(sort_array(m_indices(keywords)),b)    {    ret+="<a name="+b+">";
460:    }       ret+="</ul>\n"; -  return ret; +  return mkdocument(ret,"uLPC documentation index");   }      int main(int argc, string *argv)