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

Paul POULAIN tipaul at users.sourceforge.net
Tue Jan 14 17:45:42 CET 2003


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);





More information about the Koha-cvs mailing list