diff options
| author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-05-18 23:32:13 +0000 |
|---|---|---|
| committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-05-18 23:32:13 +0000 |
| commit | c551bc6e662d3ba7d5ab917d78feb7fec15bc74b (patch) | |
| tree | 401c1b2dce40cedbfcc63bbc8f399fc6aece6293 /LedgerSMB/Form.pm | |
| parent | aef6c97fadab8fc3469d56a8f9fba6dae4510f45 (diff) | |
Adding utf-8 default charsets to html headers
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1212 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB/Form.pm')
| -rw-r--r-- | LedgerSMB/Form.pm | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/LedgerSMB/Form.pm b/LedgerSMB/Form.pm index d9ad0805..dba2194d 100644 --- a/LedgerSMB/Form.pm +++ b/LedgerSMB/Form.pm @@ -307,10 +307,9 @@ sub header { qq|<link rel="stylesheet" href="css/$self->{stylesheet}" type="text/css" title="LedgerSMB stylesheet" />\n|; } - if ( $self->{charset} ) { - $charset = + $self->{charset} ||= "utf-8"; + $charset = qq|<meta http-equiv="content-type" content="text/html; charset=$self->{charset}" />\n|; - } $self->{titlebar} = ( $self->{title} ) |