summaryrefslogtreecommitdiff
path: root/LedgerSMB/Form.pm
diff options
context:
space:
mode:
authoreinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2007-05-18 23:26:03 +0000
committereinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2007-05-18 23:26:03 +0000
commit2c7f9b4bd8b54c175d3e59072ce6a8d4b3d1cacf (patch)
tree2d3a35de6b8e29ce056a3151234c2246d99e1268 /LedgerSMB/Form.pm
parent59ee9949bbc5ed9681b8c7ca5fb50ffe0ec7538b (diff)
Adding utf-8 charset specifications to splash pages and by default to forms
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/branches/1.2@1211 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB/Form.pm')
-rwxr-xr-xLedgerSMB/Form.pm5
1 files changed, 2 insertions, 3 deletions
diff --git a/LedgerSMB/Form.pm b/LedgerSMB/Form.pm
index d582601f..92fb7023 100755
--- a/LedgerSMB/Form.pm
+++ b/LedgerSMB/Form.pm
@@ -302,15 +302,14 @@ sub header {
if ( $ENV{GATEWAY_INTERFACE} ) {
+ $self->{charset} ||= "utf-8";
if ( $self->{stylesheet} && ( -f "css/$self->{stylesheet}" ) ) {
$stylesheet =
qq|<link rel="stylesheet" href="css/$self->{stylesheet}" type="text/css" title="LedgerSMB stylesheet" />\n|;
}
- if ( $self->{charset} ) {
- $charset =
+ $charset =
qq|<meta http-equiv="content-type" content="text/html; charset=$self->{charset}" />\n|;
- }
$self->{titlebar} =
( $self->{title} )