summaryrefslogtreecommitdiff
path: root/bin
diff options
context:
space:
mode:
authoreinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2008-12-01 02:15:53 +0000
committereinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2008-12-01 02:15:53 +0000
commitef3b11491182b85ec459c42fe4e51f6a7ca5262b (patch)
treeefbe112e29fbc885f27fb5b0f6d45d31fb2501de /bin
parent62b8b04fb61061592f0c4202cbd2ac0125807982 (diff)
Default country can now be set.HEADmaster
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@2422 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'bin')
-rw-r--r--bin/am.pl6
1 files changed, 6 insertions, 0 deletions
diff --git a/bin/am.pl b/bin/am.pl
index f92e380e..9a08092d 100644
--- a/bin/am.pl
+++ b/bin/am.pl
@@ -1471,6 +1471,12 @@ sub defaults {
'IC_income' => {name => 'IC_income', options => []},
'IC_inventory' => {name => 'IC_inventory', options => []},
'IC' => {name => 'IC', options => []},
+ 'default_country' => {name => 'default_country',
+ options => $form->{countries},
+ default_values => [$form->{'default_country'}],
+ text_attr => 'name',
+ value_attr => 'id',
+ },
);
foreach $key ( keys %{ $form->{accno} } ) {
foreach $accno ( sort keys %{ $form->{accno}{$key} } ) {