diff options
| author | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-11-21 03:14:21 +0000 |
|---|---|---|
| committer | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-11-21 03:14:21 +0000 |
| commit | 5760a92d028c8c642e88f345cb444e014697afa4 (patch) | |
| tree | 772c3a7e7e9acd9cdf37cacd788b40c5213e8ecb /LedgerSMB | |
| parent | ef29ee0c874a439632573f783ce8fd64c5b5f3b8 (diff) | |
Switch over to sending UTF-8 instead of escapes
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@670 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB')
| -rwxr-xr-x | LedgerSMB/Form.pm | 2 | ||||
| -rw-r--r-- | LedgerSMB/Locale.pm | 3 | ||||
| -rw-r--r-- | LedgerSMB/Sysconfig.pm | 2 |
3 files changed, 4 insertions, 3 deletions
diff --git a/LedgerSMB/Form.pm b/LedgerSMB/Form.pm index 300d0e13..92d0b081 100755 --- a/LedgerSMB/Form.pm +++ b/LedgerSMB/Form.pm @@ -273,7 +273,7 @@ sub header { $self->{titlebar} = ($self->{title}) ? "$self->{title} - $self->{titlebar}" : $self->{titlebar}; - print qq|Content-Type: text/html\n\n + print qq|Content-Type: text/html; charset=utf-8\n\n <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en"> diff --git a/LedgerSMB/Locale.pm b/LedgerSMB/Locale.pm index f9674d23..9f4d2fdb 100644 --- a/LedgerSMB/Locale.pm +++ b/LedgerSMB/Locale.pm @@ -27,7 +27,6 @@ package LedgerSMB::Locale; use base 'Locale::Maketext'; use Locale::Maketext::Lexicon; -use HTML::Entities; use Encode; Locale::Maketext::Lexicon->import({ @@ -40,7 +39,7 @@ Locale::Maketext::Lexicon->import({ sub text { my ($self, $text, @params) = @_; - return encode_entities($self->maketext($text, @params)); + return $self->maketext($text, @params); } ##sub date { diff --git a/LedgerSMB/Sysconfig.pm b/LedgerSMB/Sysconfig.pm index 1634bfcc..91fe33b3 100644 --- a/LedgerSMB/Sysconfig.pm +++ b/LedgerSMB/Sysconfig.pm @@ -8,6 +8,8 @@ use LedgerSMB::Form; use Config::Std; use DBI qw(:sql_types); +binmode STDOUT, ':utf8'; + # For Win32, change $pathsep to ';'; $pathsep=':'; |