Skip to content
Snippets Groups Projects
Commit 809aad1a authored by Christophe Geuzaine's avatar Christophe Geuzaine
Browse files

add content-type header

parent fc8ea34f
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
Showing
with 7 additions and 6 deletions
doc/texinfo/texi2html
+ 7
− 6
View file @ 809aad1a
......@@ -38,7 +38,7 @@ require 5.0;
#--##############################################################################
# CVS version:
# $Id: texi2html,v 1.5 2003-12-29 17:00:30 geuzaine Exp $
# $Id: texi2html,v 1.6 2004-03-17 22:34:36 geuzaine Exp $
# Homepage:
$T2H_HOMEPAGE = <<EOT;
......@@ -94,7 +94,7 @@ eval { ($T2H_USER = (getpwuid ($<))[6]) =~ s/,.*//;}; # Who am i
# Copy this file and make changes to it, if you like.
# Afterwards, either, load it with command-line option -init_file <your_init_file>
#
# $Id: texi2html,v 1.5 2003-12-29 17:00:30 geuzaine Exp $
# $Id: texi2html,v 1.6 2004-03-17 22:34:36 geuzaine Exp $
######################################################################
# stuff which can also be set by command-line options
......@@ -910,7 +910,7 @@ sub pretty_date {
#
# Set the default body text, inserted between <BODY ... >
$T2H_BODYTEXT = 'LANG="' . $T2H_LANG . '"';
$T2H_BODYTEXT = '';
# text inserted after <BODY ...>
$T2H_AFTER_BODY_OPEN = '';
#text inserted before </BODY>
......@@ -920,15 +920,16 @@ $T2H_ADDRESS = "by <I>$T2H_USER</I> " if $T2H_USER;
$T2H_ADDRESS .= "on <I>$T2H_TODAY</I>";
# this is added inside <HEAD></HEAD> after <TITLE> and some META NAME stuff
# can be used for <style> <script>, <meta> tags
$T2H_EXTRA_HEAD = '<LINK href="/general.css" rel="stylesheet" type="text/css">';
$T2H_EXTRA_HEAD = '<meta http-equiv="Content-Type" content="text/html; charset=ISO-8859-1">';
$T2H_EXTRA_HEAD .= '<LINK href="/general.css" rel="stylesheet" type="text/css">';
sub T2H_DEFAULT_print_page_head
{
my $fh = shift;
my $longtitle = "$T2H_THISDOC{title}: $T2H_NAME{This}";
print $fh <<EOT;
<HTML>
$T2H_DOCTYPE
<HTML>
<!-- Created on $T2H_TODAY by $THISPROG -->
<!--
$T2H_AUTHORS
......@@ -1519,7 +1520,7 @@ package Getopt::MySimple;
# --------------------------------------------------------------------------
# Locally modified by obachman (Display type instead of env, order by cmp)
# $Id: texi2html,v 1.5 2003-12-29 17:00:30 geuzaine Exp $
# $Id: texi2html,v 1.6 2004-03-17 22:34:36 geuzaine Exp $
# use strict;
# no strict 'refs';
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment