Handle non-latin1 charsets
authoracli <acli>
Sat, 25 Jan 2003 19:16:33 +0000 (19:16 +0000)
committeracli <acli>
Sat, 25 Jan 2003 19:16:33 +0000 (19:16 +0000)
members-home.pl

index 1b8429a..e910c30 100755 (executable)
@@ -4,6 +4,7 @@ use strict;
 use CGI;
 use C4::Auth;
 use C4::Output;
+use C4::Charset;
 use C4::Context;
 use HTML::Template;
 
@@ -17,4 +18,7 @@ my ($template, $loggedinuser, $cookie)
                             debug => 1,
                             });
 
-print $query->header(-cookie => $cookie),$template->output;
+print $query->header(
+    -type => guesstype($template->output),
+    -cookie => $cookie
+),$template->output;