git://git.jankratochvil.net
/
MyWeb.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
0ba32bf
)
W3C validator compliance
author
short
<>
Sun, 18 May 2003 07:38:42 +0000
(07:38 +0000)
committer
short
<>
Sun, 18 May 2003 07:38:42 +0000
(07:38 +0000)
Web.pm
patch
|
blob
|
history
diff --git
a/Web.pm
b/Web.pm
index
8449555
..
957507f
100644
(file)
--- a/
Web.pm
+++ b/
Web.pm
@@
-282,7
+282,7
@@
my($class,$showtitle,$indexme)=@_;
print '<?xml version="1.0" encoding="'.$client_charset.'"?>'."\n";
}
print '<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN" "http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">'."\n";
print '<?xml version="1.0" encoding="'.$client_charset.'"?>'."\n";
}
print '<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN" "http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">'."\n";
- print '<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="
cs
">'."\n";
+ print '<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="
en-US
">'."\n";
print '<head><title>'.CGI::escapeHTML($WebConfig{"title_prefix"})
.join("",map({ ': '.CGI::escapeHTML($_); } ($WebConfig{"title"} || ())))
.'</title>'."\n";
print '<head><title>'.CGI::escapeHTML($WebConfig{"title_prefix"})
.join("",map({ ': '.CGI::escapeHTML($_); } ($WebConfig{"title"} || ())))
.'</title>'."\n";