[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] CVS: koha/admin marc_subfields_structure.pl,1.25,1.26
From: |
doXulting |
Subject: |
[Koha-cvs] CVS: koha/admin marc_subfields_structure.pl,1.25,1.26 |
Date: |
Tue, 06 Jul 2004 06:15:27 -0700 |
Update of /cvsroot/koha/koha/admin
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv2635/koha/admin
Modified Files:
marc_subfields_structure.pl
Log Message:
New stuff for authorities
Index: marc_subfields_structure.pl
===================================================================
RCS file: /cvsroot/koha/koha/admin/marc_subfields_structure.pl,v
retrieving revision 1.25
retrieving revision 1.26
diff -C2 -r1.25 -r1.26
*** marc_subfields_structure.pl 25 Jun 2004 09:17:49 -0000 1.25
--- marc_subfields_structure.pl 6 Jul 2004 13:15:11 -0000 1.26
***************
*** 198,201 ****
--- 198,202 ----
$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);
$i++;
***************
*** 239,242 ****
--- 240,244 ----
-multiple=>0,
);
+ $row_data{link} = CGI::escapeHTML($data->{'link'});
$row_data{bgcolor} = $toggle;
push(@loop_data, \%row_data);
***************
*** 256,261 ****
my $dbh = C4::Context->dbh;
$template->param(tagfield => "$input->param('tagfield')");
! my $sth=$dbh->prepare("replace marc_subfield_structure
(tagfield,tagsubfield,liblibrarian,libopac,repeatable,mandatory,kohafield,tab,seealso,authorised_value,authtypecode,value_builder,hidden,isurl,frameworkcode)
! values
(?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)");
my @tagsubfield = $input->param('tagsubfield');
my @liblibrarian = $input->param('liblibrarian');
--- 258,263 ----
my $dbh = C4::Context->dbh;
$template->param(tagfield => "$input->param('tagfield')");
! my $sth=$dbh->prepare("replace marc_subfield_structure
(tagfield,tagsubfield,liblibrarian,libopac,repeatable,mandatory,kohafield,tab,seealso,authorised_value,authtypecode,value_builder,hidden,isurl,frameworkcode,
link)
! values
(?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)");
my @tagsubfield = $input->param('tagsubfield');
my @liblibrarian = $input->param('liblibrarian');
***************
*** 267,270 ****
--- 269,273 ----
my @authtypecodes = $input->param('authtypecode');
my @value_builder =$input->param('value_builder');
+ my @link =$input->param('link');
for (my $i=0; $i<= $#tagsubfield ; $i++) {
my $tagfield =$input->param('tagfield');
***************
*** 283,286 ****
--- 286,290 ----
my $hidden = $input->param("hidden$i")?1:0;
my $isurl = $input->param("isurl$i")?1:0;
+ my $link = $link[$i];
if ($liblibrarian) {
unless (C4::Context->config('demo') eq 1) {
***************
*** 300,304 ****
$isurl,
$frameworkcode,
! );
}
}
--- 304,310 ----
$isurl,
$frameworkcode,
!
! $link,
! );
}
}
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha/admin marc_subfields_structure.pl,1.25,1.26,
doXulting <=
- Prev by Date:
[Koha-cvs] CVS: koha/koha-tmpl/opac-tmpl/css/en/includes opac-basket-bottom.inc,NONE,1.1 opac-basket-menu.inc,NONE,1.1 opac-basket-top.inc,NONE,1.1 opac.css,1.7,1.8 opac-top.inc,1.3,1.4
- Next by Date:
[Koha-cvs] CVS: koha/authorities authorities-home.pl,1.3,1.4
- Previous by thread:
[Koha-cvs] CVS: koha/koha-tmpl/opac-tmpl/css/en/includes opac-basket-bottom.inc,NONE,1.1 opac-basket-menu.inc,NONE,1.1 opac-basket-top.inc,NONE,1.1 opac.css,1.7,1.8 opac-top.inc,1.3,1.4
- Next by thread:
[Koha-cvs] CVS: koha/authorities authorities-home.pl,1.3,1.4
- Index(es):