From c521480c08b3aa51cad3dfae1dda4f7608f85358 Mon Sep 17 00:00:00 2001 From: tetragon Date: Sat, 6 Oct 2007 16:02:18 +0000 Subject: Templating the user preferences screen git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1709 4979c152-3d1c-0410-bac9-87ea11338e46 --- UI/am-userconfig.html | 110 +++++++++++++++++++++++++ bin/am.pl | 218 ++++++++++++++------------------------------------ 2 files changed, 171 insertions(+), 157 deletions(-) create mode 100644 UI/am-userconfig.html diff --git a/UI/am-userconfig.html b/UI/am-userconfig.html new file mode 100644 index 00000000..c6ca2fbc --- /dev/null +++ b/UI/am-userconfig.html @@ -0,0 +1,110 @@ + + + +
+ + + + + + + + + +
+ + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
+ 		+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
+
+
+ + 'hidden', + name => hidden, + value => hiddens.item(hidden) + }; END ?> + +
+ + + diff --git a/bin/am.pl b/bin/am.pl index 9627cea5..9477e95a 100644 --- a/bin/am.pl +++ b/bin/am.pl @@ -1891,196 +1891,100 @@ sub update { sub config { + my %selects; + $selects{dateformat} = { + name => 'dateformat', + default_values => $myconfig{dateformat}, + options => [], + }; foreach $item (qw(mm-dd-yy mm/dd/yy dd-mm-yy dd/mm/yy dd.mm.yy yyyy-mm-dd)) { - $dateformat .= - ( $item eq $myconfig{dateformat} ) - ? "