It's a utf-8 world
authorrmurray <>
Tue, 27 Jun 2006 02:37:45 +0000 (02:37 +0000)
committerrmurray <>
Tue, 27 Jun 2006 02:37:45 +0000 (02:37 +0000)
Util.pm
login.cgi
search.cgi

diff --git a/Util.pm b/Util.pm
index 76accc9..98668c3 100644 (file)
--- a/Util.pm
+++ b/Util.pm
@@ -256,7 +256,7 @@ sub LookupCountry {
 my $htmlhdrsent = 0;
 
 sub HTMLSendHeader {
-  print "Content-type: text/html\n\n" if (!$htmlhdrsent);
+  print "Content-type: text/html; charset=utf-8\n\n" if (!$htmlhdrsent);
   $htmlhdrsent = 1;
 }
 
index 0058aa9..1e04ef4 100755 (executable)
--- a/login.cgi
+++ b/login.cgi
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 
-# $Id: login.cgi,v 1.8 2003/03/13 04:25:56 rmurray Exp $
+# $Id: login.cgi,v 1.9 2006/06/27 04:37:45 rmurray Exp $
 # (c) 1999 Randolph Chung. Licensed under the GPL. <tausq@debian.org>
 
 use lib '.';
@@ -68,7 +68,7 @@ if ($mesg->code == LDAP_SUCCESS) {
 
   $ldap->unbind;
 } else {
-  print "Content-type: text/html\n\n";
+  print "Content-type: text/html; charset=utf-8\n\n";
   print "<html><body><h1>Not authenticated</h1></body></html>\n";
 }
 
index 3151399..2174d52 100755 (executable)
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 
-# $Id: search.cgi,v 1.12 2004/12/04 18:48:07 joey Exp $
+# $Id: search.cgi,v 1.13 2006/06/27 04:37:45 rmurray Exp $
 # (c) 1999 Randolph Chung. Licensed under the GPL. <tausq@debian.org>
 # (c) 2004 Martin Schulze. Licensed under the GPL. <joey@debian.org>
 
@@ -33,7 +33,7 @@ $SIG{__DIE__} = \&DieHandler;
 
 if (!$dosearch) {
   # No action yet, send back the search form...
-  print "Content-type: text/html\n\n";
+  print "Content-type: text/html; charset=utf-8\n\n";
   open (F, "<$config{websearchhtml}") || &Util::HTMLError($!);
   while (<F>) {
     s/~id~/$id/g;