From 9cad023627440d354a0f43087e1b5c282605450b Mon Sep 17 00:00:00 2001 From: einhverfr Date: Wed, 18 Oct 2006 22:24:06 +0000 Subject: Added ui for 1 000.00 format git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@227 4979c152-3d1c-0410-bac9-87ea11338e46 --- bin/admin.pl | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'bin/admin.pl') diff --git a/bin/admin.pl b/bin/admin.pl index 88ecc367..4b42ba94 100755 --- a/bin/admin.pl +++ b/bin/admin.pl @@ -383,7 +383,9 @@ sub form_header { $dateformat .= ($item eq $myconfig->{dateformat}) ? "\n" : "\n"; } - foreach $item (qw(1,000.00 1000.00 1.000,00 1000,00 1'000.00)) { + my @formats = qw(1,000.00 1000.00 1.000,00 1000,00 1'000.00); + push @formats, '1 000.00'; + foreach $item (@formats) { $numberformat .= ($item eq $myconfig->{numberformat}) ? "\n" : "\n"; } -- cgit v1.2.3