From: erickson Date: Fri, 31 Oct 2008 14:26:43 +0000 (+0000) Subject: more utf8-ification to prevent wide character problems (probably, some of this is... X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=67fbd4403830357be258a8c84178deb8ef81ed1d;p=Evergreen.git more utf8-ification to prevent wide character problems (probably, some of this is redundant) git-svn-id: svn://svn.open-ils.org/ILS/branches/rel_1_4@11011 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- diff --git a/Open-ILS/src/support-scripts/generate_circ_notices.pl b/Open-ILS/src/support-scripts/generate_circ_notices.pl index 18b63d1ae6..e0ace2a809 100755 --- a/Open-ILS/src/support-scripts/generate_circ_notices.pl +++ b/Open-ILS/src/support-scripts/generate_circ_notices.pl @@ -31,6 +31,7 @@ use OpenILS::Const qw/:const/; use OpenILS::Application::AppUtils; use OpenILS::Const qw/:const/; my $U = 'OpenILS::Application::AppUtils'; +use open ':utf8'; my $settings = undef; my $e = OpenILS::Utils::CStoreEditor->new; @@ -362,6 +363,8 @@ sub handle_email_template_output { if($opt_send_email) { + use utf8; + utf8::encode($msg); my $sender = Email::Send->new({mailer => 'SMTP'}); my $smtp_server = $settings->config_value(notifications => 'smtp_server'); $logger->debug("notice: smtp server is $smtp_server");