- More XHTML/HTML fixes: <html> element
This commit is contained in:
parent
66d862e577
commit
d6d17f7e19
Notes:
svn2git
2020-12-08 03:00:23 +00:00
svn path=/www/; revision=26470
1 changed files with 3 additions and 2 deletions
|
|
@ -1,4 +1,4 @@
|
|||
# $FreeBSD: www/en/cgi/cgi-style.pl,v 1.25 2005/10/29 15:08:21 fenner Exp $
|
||||
# $FreeBSD: www/en/cgi/cgi-style.pl,v 1.26 2005/10/29 15:11:09 fenner Exp $
|
||||
#
|
||||
# Perl routines to encapsulate various elements of HTML page style.
|
||||
|
||||
|
|
@ -143,6 +143,7 @@ sub short_html_header {
|
|||
|
||||
$xhtml = 1 unless defined($xhtml);
|
||||
$doctype = $xhtml ? '<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">' : '<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">';
|
||||
$html = $xhtml ? '<html xmlns="http://w3.org/1999/xhtml">' : '<html>';
|
||||
$endslash = $xhtml ? '/' : '';
|
||||
$csshack = (1 || $xhtml) ? '' : q`<style type="text/css">
|
||||
tr, td {
|
||||
|
|
@ -158,8 +159,8 @@ tr, td {
|
|||
return qq`Content-type: text/html
|
||||
|
||||
$doctype
|
||||
$html
|
||||
|
||||
<html xmlns='http://www.w3.org/1999/xhtml'>
|
||||
<head><title>$title</title>
|
||||
<meta http-equiv='content-type' content='text/html; charset=iso-8859-1' $endslash>
|
||||
<meta name='robots' content='nofollow' $endslash>
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue