From: Christopher Burger <burgerc@freeside.biz>
Date: Thu, 21 Dec 2017 23:16:33 +0000 (-0500)
Subject: RT# 76878 - Fixed installer checkbox to be sticky on error.
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=30e0dbd4f76ec2a9040ea3619501c59cb19fba1d

RT# 76878 - Fixed installer checkbox to be sticky on error.
---

diff --git a/httemplate/edit/elements/edit.html b/httemplate/edit/elements/edit.html
index 25568745d..113f611e1 100644
--- a/httemplate/edit/elements/edit.html
+++ b/httemplate/edit/elements/edit.html
@@ -871,7 +871,9 @@ my $pkey = dbdef->table($table)->primary_key; #? $opt{'primary_key'} ||
 my $fields = $opt{'fields'}
              #|| [ grep { $_ ne $pkey } dbdef->table($table)->columns ];
              || [ grep { $_ ne $pkey } fields($table) ];
-#my @actualfields = map { ref($_) ? $_->{'field'} : $_ } @$fields;
+my @actualfields = map { ref($_) ? $_->{'field'} : $_ } @$fields;
+
+push @actualfields, $pkey;
 
 my $js_form_validate = {};
 
@@ -914,7 +916,7 @@ if ( $opt{'embed'} ) {
     $mode = 'error';
 
     $object = $class->new( {
-      map { $_ => scalar($cgi->param($_)) } fields($table)
+      map { $_ => scalar($cgi->param($_)) } @actualfields
     });
 
     &{$opt{'error_callback'}}( $cgi, $object, $fields, \%opt )