X-Git-Url: https://git.sesse.net/?p=ccbs;a=blobdiff_plain;f=html%2Fccbs.pm;h=faaae89818203b945cf2641cff11533879416ddb;hp=f09996a1935ca1ef345d7421462cd166456b51cd;hb=a6500d8a7d1a7fc0bd172373f1a670b8ee7ce92e;hpb=f2a075e3a1d402fbc1922c3dcf7a4d7fb4370832;ds=sidebyside diff --git a/html/ccbs.pm b/html/ccbs.pm index f09996a..faaae89 100755 --- a/html/ccbs.pm +++ b/html/ccbs.pm @@ -2,13 +2,14 @@ package ccbs; use Template; use CGI; use DBI; +use HTML::Entities; use strict; use warnings; our $ccbs_dbdebug = 0; sub print_header { - print CGI::header(-type=>'application/xhtml+xml; charset=utf-8'); + print CGI::header(-type=>'text/html; charset=utf-8'); } sub print_see_other { my $location = shift; @@ -92,7 +93,7 @@ $SIG{__DIE__} = sub { ccbs::print_header(); ccbs::process_template('error.tmpl', 'Internal Server Error', - { message => $msg }); + { message => HTML::Entities::encode_entities($msg) }); }; 1;