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 (file)
--- 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 (executable)
--- 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++;