[Koha-cvs] CVS: koha/value_builder unimarc_field_210c.pl,1.3,1.3.2.1
Paul POULAIN
tipaul at users.sourceforge.net
Mon Jan 26 11:43:35 CET 2004
Update of /cvsroot/koha/koha/value_builder
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv18124/value_builder
Modified Files:
Tag: rel_2_0
unimarc_field_210c.pl
Log Message:
replacing " by "
Index: unimarc_field_210c.pl
===================================================================
RCS file: /cvsroot/koha/koha/value_builder/unimarc_field_210c.pl,v
retrieving revision 1.3
retrieving revision 1.3.2.1
diff -C2 -r1.3 -r1.3.2.1
*** unimarc_field_210c.pl 1 Aug 2003 14:20:51 -0000 1.3
--- unimarc_field_210c.pl 26 Jan 2004 10:43:32 -0000 1.3.2.1
***************
*** 78,82 ****
$res .= "
];
! // search isbn subfield. it's 010a
var isbn_found;
for (i=0 ; i<document.f.field_value.length ; i++) {
--- 78,82 ----
$res .= "
];
! // search isbn subfield. it''s 010a
var isbn_found;
for (i=0 ; i<document.f.field_value.length ; i++) {
***************
*** 115,120 ****
my ($input) = @_;
my $index = $input->param("index");
! my $result = $input->param("result");
! print "Content-Type: text/html\n\n<META HTTP-EQUIV=Refresh CONTENT=\"0; URL=thesaurus_popup.pl?category=EDITORS&index=$index&result=$result\"></html>";
exit;
}
--- 115,122 ----
my ($input) = @_;
my $index = $input->param("index");
! my $result = $input->param("result");
! $result=~s/ / /g;
! $result=~s/"/"/g;
! print "Content-Type: text/html\n\n<META HTTP-EQUIV=Refresh CONTENT=\"0; URL=thesaurus_popup.pl?category=EDITORS&nohierarchy=1&index=$index&result=$result\"></html>";
exit;
}
More information about the Koha-cvs
mailing list