koha-cvs
[Top][All Lists]
Advanced

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

[Koha-cvs] CVS: koha/acqui.simple additem.pl,1.10,1.11


From: Paul POULAIN
Subject: [Koha-cvs] CVS: koha/acqui.simple additem.pl,1.10,1.11
Date: Tue, 14 Jan 2003 08:45:42 -0800

Update of /cvsroot/koha/koha/acqui.simple
In directory sc8-pr-cvs1:/tmp/cvs-serv2980/acqui.simple

Modified Files:
        additem.pl 
Log Message:
little improvments (mandatory subfields in item appear red if not filled)

Index: additem.pl
===================================================================
RCS file: /cvsroot/koha/koha/acqui.simple/additem.pl,v
retrieving revision 1.10
retrieving revision 1.11
diff -C2 -r1.10 -r1.11
*** additem.pl  12 Dec 2002 16:34:41 -0000      1.10
--- additem.pl  14 Jan 2003 16:45:33 -0000      1.11
***************
*** 172,178 ****
                $subfield_data{tag}=$tag;
                $subfield_data{subfield}=$subfield;
!               $subfield_data{marc_lib}=$tagslib->{$tag}->{$subfield}->{lib};
!               
$subfield_data{marc_mandatory}=$tagslib->{$tag}->{$subfield}->{mandatory};
!               
$subfield_data{marc_repeatable}=$tagslib->{$tag}->{$subfield}->{repeatable};
                my ($x,$value);
                ($x,$value) = find_value($tag,$subfield,$itemrecord) if 
($itemrecord);
--- 172,179 ----
                $subfield_data{tag}=$tag;
                $subfield_data{subfield}=$subfield;
! #             $subfield_data{marc_lib}=$tagslib->{$tag}->{$subfield}->{lib};
!               $subfield_data{marc_lib}="<DIV 
id=\"error$i\">".$tagslib->{$tag}->{$subfield}->{lib}."</div>";
!               
$subfield_data{mandatory}=$tagslib->{$tag}->{$subfield}->{mandatory};
!               
$subfield_data{repeatable}=$tagslib->{$tag}->{$subfield}->{repeatable};
                my ($x,$value);
                ($x,$value) = find_value($tag,$subfield,$itemrecord) if 
($itemrecord);




reply via email to

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