From 809aad1ab5b32a350b0e6a3bcdc04fb27d613df8 Mon Sep 17 00:00:00 2001
From: Christophe Geuzaine <cgeuzaine@ulg.ac.be>
Date: Wed, 17 Mar 2004 22:34:36 +0000
Subject: [PATCH] add content-type header
---
doc/texinfo/texi2html | 13 +++++++------
1 file changed, 7 insertions(+), 6 deletions(-)
diff --git a/doc/texinfo/texi2html b/doc/texinfo/texi2html
index 0b999c23c2..f18c8c18e6 100644
--- a/doc/texinfo/texi2html
+++ b/doc/texinfo/texi2html
@@ -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';
--
GitLab