koha-cvs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Koha-cvs] CVS: koha/admin marc_subfields_structure.pl,1.32.2.4,1.32.2.5


From: Owen Leonard
Subject: [Koha-cvs] CVS: koha/admin marc_subfields_structure.pl,1.32.2.4,1.32.2.5
Date: Mon, 14 Feb 2005 14:07:44 -0800

Update of /cvsroot/koha/koha/admin
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14779/admin

Modified Files:
      Tag: rel_2_2
        marc_subfields_structure.pl 
Log Message:
Adding id attributes to script-generated form fields to allow more flexible 
interface (tying label for attribute to input's id allows label to be clicked 
to transfer focus to the form field)

Index: marc_subfields_structure.pl
===================================================================
RCS file: /cvsroot/koha/koha/admin/marc_subfields_structure.pl,v
retrieving revision 1.32.2.4
retrieving revision 1.32.2.5
diff -C2 -r1.32.2.4 -r1.32.2.5
*** marc_subfields_structure.pl 10 Feb 2005 22:38:17 -0000      1.32.2.4
--- marc_subfields_structure.pl 14 Feb 2005 22:07:41 -0000      1.32.2.5
***************
*** 164,167 ****
--- 164,168 ----
                }
                $row_data{tab} = CGI::scrolling_list(-name=>'tab',
+                                       -id=>"tab$i",
                                        
-values=>['-1','0','1','2','3','4','5','6','7','8','9','10'],
                                        -labels => {'-1' 
=>'ignore','0'=>'0','1'=>'1',
***************
*** 174,182 ****
                                        -multiple=>0,
                                        );
!               $row_data{tagsubfield} =$data->{'tagsubfield'}."<input 
type='hidden' name='tagsubfield' value='".$data->{'tagsubfield'}."'>";
                $row_data{liblibrarian} = 
CGI::escapeHTML($data->{'liblibrarian'});
                $row_data{libopac} = CGI::escapeHTML($data->{'libopac'});
                $row_data{seealso} = CGI::escapeHTML($data->{'seealso'});
                $row_data{kohafield}= CGI::scrolling_list( -name=>"kohafield",
                                        -values=> address@hidden,
                                        -default=> "$data->{'kohafield'}",
--- 175,184 ----
                                        -multiple=>0,
                                        );
!               $row_data{tagsubfield} =$data->{'tagsubfield'}."<input 
type=\"hidden\" name=\"tagsubfield\" value=\"".$data->{'tagsubfield'}."\" 
id=\"tagsubfield\">";
                $row_data{liblibrarian} = 
CGI::escapeHTML($data->{'liblibrarian'});
                $row_data{libopac} = CGI::escapeHTML($data->{'libopac'});
                $row_data{seealso} = CGI::escapeHTML($data->{'seealso'});
                $row_data{kohafield}= CGI::scrolling_list( -name=>"kohafield",
+                                       -id=>"kohafield$i",
                                        -values=> address@hidden,
                                        -default=> "$data->{'kohafield'}",
***************
*** 185,188 ****
--- 187,191 ----
                                        );
                $row_data{authorised_value}  = 
CGI::scrolling_list(-name=>'authorised_value',
+                                       -id=>'authorised_value',
                                        -values=> address@hidden,
                                        -default=>$data->{'authorised_value'},
***************
*** 191,194 ****
--- 194,198 ----
                                        );
                $row_data{value_builder}  = 
CGI::scrolling_list(-name=>'value_builder',
+                                       -id=>'value_builder',
                                        -values=> address@hidden,
                                        -default=>$data->{'value_builder'},
***************
*** 197,200 ****
--- 201,205 ----
                                        );
                $row_data{authtypes}  = 
CGI::scrolling_list(-name=>'authtypecode',
+                                       -id=>'authtypecode',
                                        -values=> address@hidden,
                                        -default=>$data->{'authtypecode'},
***************
*** 202,210 ****
                                        -multiple=>0,
                                        );
!               $row_data{repeatable} = 
CGI::checkbox("repeatable$i",$data->{'repeatable'}?'checked':'',1,'');
!               $row_data{mandatory} = 
CGI::checkbox("mandatory$i",$data->{'mandatory'}?'checked':'',1,'');
!               $row_data{hidden} = 
CGI::checkbox("hidden$i",$data->{'hidden'}?'checked':'',1,'');
!               $row_data{isurl} = 
CGI::checkbox("isurl$i",$data->{'isurl'}?'checked':'',1,'');
!               $row_data{bgcolor} = $toggle;
                $row_data{link} = CGI::escapeHTML($data->{'link'});
                push(@loop_data, \%row_data);
--- 207,232 ----
                                        -multiple=>0,
                                        );
!               $row_data{repeatable} = CGI::checkbox(-name=>"repeatable$i",
!       -checked => $data->{'repeatable'}?'checked':'',
!       -value => 1,
!       -label => '',
!       -id => "repeatable$i");
!               $row_data{mandatory} = CGI::checkbox(-name => "mandatory$i",
!       -checked => $data->{'mandatory'}?'checked':'',
!       -value => 1,
!       -label => '',
!       -id => "mandatory$i");
!               $row_data{hidden} = CGI::checkbox( -name=>"hidden$i",
!                       -id => "hidden$i",
!                       -checked => $data->{'hidden'}?'checked':'',
!                       -value => 1,
!                       -label => '');
!               $row_data{isurl} = CGI::checkbox( -name => "isurl$i",
!                       -id => "isurl$i",
!                       -checked => $data->{'isurl'}?'checked':'',
!                       -value => 1,
!                       -label => '');
!               $row_data{row} = $i;
!               $row_data{toggle} = $toggle;
                $row_data{link} = CGI::escapeHTML($data->{'link'});
                push(@loop_data, \%row_data);
***************
*** 215,218 ****
--- 237,241 ----
                my %row_data;  # get a fresh hash for the row data
                $row_data{tab} = CGI::scrolling_list(-name=>'tab',
+                                       -id => "tab$i",
                                        
-values=>['-1','0','1','2','3','4','5','6','7','8','9','10'],
                                        -labels => {'-1' 
=>'ignore','0'=>'0','1'=>'1',
***************
*** 225,237 ****
                                        -multiple=>0,
                                        );
!               $row_data{tagsubfield} = "<input type=\"text\" 
name=\"tagsubfield\" value=\"".$data->{'tagsubfield'}."\" size=\"3\" 
maxlength=\"1\">";
                $row_data{liblibrarian} = "";
                $row_data{libopac} = "";
                $row_data{seealso} = "";
!               $row_data{repeatable} = CGI::checkbox('repeatable','',1,'');
!               $row_data{mandatory} = CGI::checkbox('mandatory','',1,'');
!               $row_data{hidden} = CGI::checkbox('hidden','',1,'');
!               $row_data{isurl} = CGI::checkbox('isurl','',1,'');
                $row_data{kohafield}= CGI::scrolling_list( -name=>'kohafield',
                                        -values=> address@hidden,
                                        -default=> "",
--- 248,277 ----
                                        -multiple=>0,
                                        );
!               $row_data{tagsubfield} = "<input type=\"text\" 
name=\"tagsubfield\" value=\"".$data->{'tagsubfield'}."\" size=\"1\" 
id=\"tagsubfield\" maxlength=\"1\">";
                $row_data{liblibrarian} = "";
                $row_data{libopac} = "";
                $row_data{seealso} = "";
!               $row_data{repeatable} = CGI::checkbox( -name=> 'repeatable',
!                               -id => "repeatable$i",
!                               -checked => '',
!                               -value => 1,
!                               -label => '');
!               $row_data{mandatory} = CGI::checkbox( -name=> 'mandatory',
!                       -id => "mandatory$i",
!                       -checked => '',
!                       -value => 1,
!                       -label => '');
!               $row_data{hidden} = CGI::checkbox( -name => 'hidden',
!                       -id => "hidden$i",
!                       -checked=> '',
!                       -value => 1,
!                       -label => '');
!               $row_data{isurl} = CGI::checkbox(-name => 'isurl',
!                       -id => "isurl$i",
!                       -checked => '',
!                       -value => 1,
!                       -label => '');
                $row_data{kohafield}= CGI::scrolling_list( -name=>'kohafield',
+                                       -id => "kohafield$i",
                                        -values=> address@hidden,
                                        -default=> "",
***************
*** 240,243 ****
--- 280,284 ----
                                        );
                $row_data{authorised_value}  = 
CGI::scrolling_list(-name=>'authorised_value',
+                                       -id => 'authorised_value',
                                        -values=> address@hidden,
                                        -size=>1,
***************
*** 245,248 ****
--- 286,290 ----
                                        );
                $row_data{authtypes}  = 
CGI::scrolling_list(-name=>'authtypecode',
+                                       -id => 'authtypecode',
                                        -values=> address@hidden,
                                        -size=>1,
***************
*** 250,254 ****
                                        );
                $row_data{link} = CGI::escapeHTML($data->{'link'});
!               $row_data{bgcolor} = $toggle;
                push(@loop_data, \%row_data);
        }
--- 292,297 ----
                                        );
                $row_data{link} = CGI::escapeHTML($data->{'link'});
!               $row_data{toggle} = $toggle;
!               $row_data{row} = $i;
                push(@loop_data, \%row_data);
        }




reply via email to

[Prev in Thread] Current Thread [Next in Thread]