[Koha-cvs] CVS: koha/value_builder marc21_leader.pl,1.1.2.2,1.1.2.3 unimarc_leader.pl,1.1.2.1,1.1.2.2

[Paul POULAIN]

Update of /cvsroot/koha/koha/value_builder
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv32368/value_builder

Modified Files:
      Tag: rel_2_2
	marc21_leader.pl unimarc_leader.pl 
Log Message:
minor change in default values

Index: marc21_leader.pl
===================================================================
RCS file: /cvsroot/koha/koha/value_builder/marc21_leader.pl,v
retrieving revision 1.1.2.2
retrieving revision 1.1.2.3
diff -C2 -r1.1.2.2 -r1.1.2.3
*** marc21_leader.pl	1 Aug 2005 12:02:51 -0000	1.1.2.2
--- marc21_leader.pl	9 Aug 2005 09:01:05 -0000	1.1.2.3
***************
*** 80,84 ****
  			     debug => 1,
  			     });
! 	$result = "     nam                 " unless $result;
  	my $f5 = substr($result,5,1);
  	my $f6 = substr($result,6,1);
--- 80,84 ----
  			     debug => 1,
  			     });
! 	$result = "     nam         7a      " unless $result;
  	my $f5 = substr($result,5,1);
  	my $f6 = substr($result,6,1);

Index: unimarc_leader.pl
===================================================================
RCS file: /cvsroot/koha/koha/value_builder/unimarc_leader.pl,v
retrieving revision 1.1.2.1
retrieving revision 1.1.2.2
diff -C2 -r1.1.2.1 -r1.1.2.2
*** unimarc_leader.pl	29 Jul 2005 09:57:29 -0000	1.1.2.1
--- unimarc_leader.pl	9 Aug 2005 09:01:06 -0000	1.1.2.2
***************
*** 80,84 ****
  			     debug => 1,
  			     });
! 	$result = "     nam                 " unless $result;
  	my $f5 = substr($result,5,1);
  	my $f6 = substr($result,6,1);
--- 80,84 ----
  			     debug => 1,
  			     });
! 	$result = "     nam         3       " unless $result;
  	my $f5 = substr($result,5,1);
  	my $f6 = substr($result,6,1);