From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Sun, 1 Apr 2007 21:47:48 +0000 (+0000)
Subject:  r1185@llin:  dpavlin | 2007-04-01 23:47:05 +0200
X-Git-Url: http://git.rot13.org/?a=commitdiff_plain;h=ee8466d76e7fb846aa1da7dd67edf65fee140dd6;p=webpac2

 r1185@llin:  dpavlin | 2007-04-01 23:47:05 +0200
  r1183@llin:  dpavlin | 2007-04-01 23:47:01 +0200
  propagate changes through documentation and actuall running code :-)



git-svn-id: svn+ssh://mjesec/home/dpavlin/svn/webpac2/trunk@814 07558da8-63fa-0310-ba24-9fe276d99e06
---

diff --git a/lib/WebPAC/Output/MARC.pm b/lib/WebPAC/Output/MARC.pm
index 035aed9..f8c17c4 100644
--- a/lib/WebPAC/Output/MARC.pm
+++ b/lib/WebPAC/Output/MARC.pm
@@ -75,7 +75,7 @@ sub new {
   $marc->add(
 	id => $mfn,
 	fields => WebPAC::Normalize::_get_marc_fields(),
-	leader => WebPAC::Normalize::marc_leader(),
+	leader => WebPAC::Normalize::_get_marc_leader(),
 	row => $row,
   );
 
diff --git a/run.pl b/run.pl
index 72ccca1..08552ed 100755
--- a/run.pl
+++ b/run.pl
@@ -544,7 +544,7 @@ while (my ($database, $db_config) = each %{ $config->databases }) {
 					$marc->add(
 						id => $mfn . ( $i ? "/$i" : '' ),
 						fields => $fields,
-						leader => WebPAC::Normalize::marc_leader(),
+						leader => WebPAC::Normalize::_get_marc_leader(),
 						row => $row,
 					);
 					$i++;