diff options
author | jeff <jeff> | 2007-04-12 03:16:43 +0000 |
---|---|---|
committer | jeff <jeff> | 2007-04-12 03:16:43 +0000 |
commit | 0dd05e9ff98263d2d42b419b1e278a5a3bc594b2 (patch) | |
tree | ef42a5ed621c73699e3973fd14ef22abdd3a5823 /httemplate/edit/part_pkg.cgi | |
parent | b611f02e479f4a7f9840f59f773d282b1c13b62f (diff) |
input and output on data volume fields specified with k,m,g,or t
Diffstat (limited to 'httemplate/edit/part_pkg.cgi')
-rwxr-xr-x | httemplate/edit/part_pkg.cgi | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/httemplate/edit/part_pkg.cgi b/httemplate/edit/part_pkg.cgi index ce3e8547f..bdd3f304a 100755 --- a/httemplate/edit/part_pkg.cgi +++ b/httemplate/edit/part_pkg.cgi @@ -323,10 +323,12 @@ Reseller information % % $html .= '<TR><TD ALIGN="right">'. $href->{$field}{'name'}. '</TD><TD>'; % +% my $format = sub { shift }; +% $format = $href->{$field}{'format'} if exists($href->{$field}{'format'}); % if ( ! exists($href->{$field}{'type'}) ) { % $html .= qq!<INPUT TYPE="text" NAME="$field" VALUE="!. % ( exists($plandata{$field}) -% ? $plandata{$field} +% ? &$format($plandata{$field}) % : $href->{$field}{'default'} ). % qq!">!; % } elsif ( $href->{$field}{'type'} eq 'checkbox' ) { |