[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] CVS: koha/marc fill_usmarc.pl,1.4,1.5 updatedb2marc.pl,1.1,1.
From: |
Paul POULAIN |
Subject: |
[Koha-cvs] CVS: koha/marc fill_usmarc.pl,1.4,1.5 updatedb2marc.pl,1.1,1.2 |
Date: |
Thu, 03 Oct 2002 04:25:42 -0700 |
Update of /cvsroot/koha/koha/marc
In directory usw-pr-cvs1:/tmp/cvs-serv13645
Modified Files:
fill_usmarc.pl updatedb2marc.pl
Log Message:
small fixes
Index: fill_usmarc.pl
===================================================================
RCS file: /cvsroot/koha/koha/marc/fill_usmarc.pl,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -r1.4 -r1.5
*** fill_usmarc.pl 10 Sep 2002 14:02:42 -0000 1.4
--- fill_usmarc.pl 3 Oct 2002 11:25:39 -0000 1.5
***************
*** 34,37 ****
--- 34,39 ----
my $description;
foreach $tag (sort keys %$fields) {
+ $fields->{$tag}->{"name"} =~ s/\(R\)//g;
+ $fields->{$tag}->{"name"} =~ s/\(NR\)//g;
$reqtag->execute($tag,$fields->{$tag}->{"name"},$fields->{$tag}->{"repeating"});
foreach $subfield (sort keys %{$fields->{$tag}->{"subfields"}}) {
Index: updatedb2marc.pl
===================================================================
RCS file: /cvsroot/koha/koha/marc/updatedb2marc.pl,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -r1.1 -r1.2
*** updatedb2marc.pl 10 Sep 2002 14:02:42 -0000 1.1
--- updatedb2marc.pl 3 Oct 2002 11:25:40 -0000 1.2
***************
*** 23,34 ****
use strict;
require Exporter;
! use C4::Database;
use C4::Catalogue;
use C4::Biblio;
use MARC::Record;
use MARC::File::USMARC;
#die;
! my $dbh=&C4Connect;
$dbh->do("delete from marc_biblio");
$dbh->do("delete from marc_blob_subfield");
--- 23,36 ----
use strict;
require Exporter;
! #use C4::Database;
use C4::Catalogue;
use C4::Biblio;
use MARC::Record;
use MARC::File::USMARC;
+ use C4::Context;
#die;
! #my $dbh=&C4Connect;
! my $dbh=C4::Context->dbh;
$dbh->do("delete from marc_biblio");
$dbh->do("delete from marc_blob_subfield");
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha/marc fill_usmarc.pl,1.4,1.5 updatedb2marc.pl,1.1,1.2,
Paul POULAIN <=
- Prev by Date:
[Koha-cvs] CVS: koha/koha-tmpl/opac-tmpl/default/en opac-searchresults.tmpl,1.3,1.4
- Next by Date:
[Koha-cvs] CVS: koha/C4 Biblio.pm,1.13,1.14 Context.pm,1.3,1.4
- Previous by thread:
[Koha-cvs] CVS: koha/koha-tmpl/opac-tmpl/default/en opac-searchresults.tmpl,1.3,1.4
- Next by thread:
[Koha-cvs] CVS: koha/C4 Biblio.pm,1.13,1.14 Context.pm,1.3,1.4
- Index(es):