From 2bc14941ff422fb785b4fbc5413337cbd691c894 Mon Sep 17 00:00:00 2001
From: oleonard <oleonard>
Date: Fri, 11 Feb 2005 19:59:41 +0000
Subject: [PATCH] Adding id attributes to CGI-generated form inputs so that
 HTML labels can transfer focus to the appropriate field.

---
 admin/marctagstructure.pl | 13 +++++++++++--
 1 file changed, 11 insertions(+), 2 deletions(-)

diff --git a/admin/marctagstructure.pl b/admin/marctagstructure.pl
index e3021b1ae8..52f4c1620f 100755
--- a/admin/marctagstructure.pl
+++ b/admin/marctagstructure.pl
@@ -118,6 +118,7 @@ if ($op eq 'add_form') {
 	my $authorised_value  = CGI::scrolling_list(-name=>'authorised_value',
 			-values=> \@authorised_values,
 			-size=>1,
+			-id=>"authorised_value",
 			-multiple=>0,
 			-default => $data->{'authorised_value'},
 			);
@@ -133,8 +134,16 @@ if ($op eq 'add_form') {
 	$template->param('use-heading-flags-p' => 1);
 	$template->param(liblibrarian => $data->{'liblibrarian'},
 							libopac => $data->{'libopac'},
-							repeatable => CGI::checkbox('repeatable',$data->{'repeatable'}?'checked':'',1,''),
-							mandatory => CGI::checkbox('mandatory',$data->{'mandatory'}?'checked':'',1,''),
+							repeatable => CGI::checkbox(-name=>'repeatable',
+						-checked=> $data->{'repeatable'}?'checked':'',
+						-value=> 1,
+						-label => '',
+						-id=> 'repeatable'),
+			mandatory => CGI::checkbox(-name => 'mandatory',
+						-checked => $data->{'mandatory'}?'checked':'',
+						-value => 1,
+						-label => '',
+						-id => 'mandatory'),
 							authorised_value => $authorised_value,
 							frameworkcode => $frameworkcode,
 							);
-- 
2.39.5