summaryrefslogtreecommitdiff
path: root/LedgerSMB
diff options
context:
space:
mode:
authoreinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2006-09-04 05:34:38 +0000
committereinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2006-09-04 05:34:38 +0000
commit22449f3d338f7c965baf4c844a41433485a38529 (patch)
treeb01e20ddae59b63ad3d5b24748f8322f309c7c1a /LedgerSMB
parentbc9dd7bf58a1455447794222ba4c2f2ccaa66610 (diff)
Added changelog.
Reformatted the a few lines in the format_line form method. Corrected the regex LaTeX printing problem. Updated most of the png logos. Added items to TODO list. git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@19 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB')
-rwxr-xr-xLedgerSMB/Form.pm37
1 files changed, 20 insertions, 17 deletions
diff --git a/LedgerSMB/Form.pm b/LedgerSMB/Form.pm
index 8b736e5c..73d9f4c5 100755
--- a/LedgerSMB/Form.pm
+++ b/LedgerSMB/Form.pm
@@ -1083,23 +1083,26 @@ sub format_string {
$format = 'tex';
}
- my %replace = ( 'order' => { html => [ '<', '>', '\n', '\r' ],
- txt => [ '\n', '\r' ],
- tex => [ quotemeta('\\'), '&', '\n',
- '\r', '\$', '%', '_', '#',
- quotemeta('^'), '{', '}', '<', '>',
- '?' ],
- utf => [ quotemeta('\\'), '&', quotemeta('\n'),
- '\r', '\$', '%', '_', '#',
- quotemeta('^'), '{', '}', '<', '>' ] },
- html => { '<' => '&lt;', '>' => '&gt;',
- '\n' => '<br />', '\r' => '<br />' },
- txt => { '\n' => "\n", '\r' => "\r" },
- tex => {'&' => '\&', '\$' => '\$', '%' => '\%', '_' => '\_',
- '#' => '\#', quotemeta('^') => '\^\\', '{' => '\{', '}' => '\}',
- '<' => '$<$', '>' => '$>$',
- '\n' => '\newline ', '\r' => '\newline ',
- '?' => '\pounds ', quotemeta('\\') => '/' } );
+ my %replace = (
+ 'order' => {
+ html => [ '<', '>', '\n', '\r' ],
+ txt => [ '\n', '\r' ],
+ tex => [ quotemeta('\\'), '&', '\n','\r',
+ '\$', '%', '_', '#',
+ quotemeta('^'), '{', '}', '<', '>', '£'
+ ],
+ utf => [ quotemeta('\\'), '&', quotemeta('\n'),
+ '\r', '\$', '%', '_', '#', quotemeta('^'),
+ '{', '}', '<', '>' ] },
+ html => { '<' => '&lt;', '>' => '&gt;','\n' => '<br />',
+ '\r' => '<br />' },
+ txt => { '\n' => "\n", '\r' => "\r" },
+ tex => {'&' => '\&', '\$' => '\$', '%' => '\%', '_' => '\_',
+ '#' => '\#', quotemeta('^') => '\^\\', '{' => '\{',
+ '}' => '\}', '<' => '$<$', '>' => '$>$',
+ '\n' => '\newline ', '\r' => '\newline ',
+ '£' => '\pounds ', quotemeta('\\') => '/'}
+ );
my $key;