[Koha-patches] [PATCH] (bug #4522) fix plugin unimarc 210$c

Nahuel ANGELINETTI nahuel.angelinetti at biblibre.com
Tue May 18 10:02:38 CEST 2010


This patch change the way to retrieve the value to insert in the record.
The way it was done, was verry ugly.
---
 cataloguing/value_builder/unimarc_field_210c.pl    |    9 +++++----
 .../value_builder/unimarc_field_210c.tmpl          |    2 +-
 2 files changed, 6 insertions(+), 5 deletions(-)

diff --git a/cataloguing/value_builder/unimarc_field_210c.pl b/cataloguing/value_builder/unimarc_field_210c.pl
index c91eeb6..44a6829 100755
--- a/cataloguing/value_builder/unimarc_field_210c.pl
+++ b/cataloguing/value_builder/unimarc_field_210c.pl
@@ -136,9 +136,10 @@ my ($input) = @_;
                                             $startfrom*$resultsperpage, $resultsperpage,$authtypecode, $orderby);
 
 	# Getting the $b if it exists
-	foreach my $_ (@$results) {
-		if ($_->{reported_tag} =~ m/^\$b/) {
-		    $_->{to_report} = substr($_->{reported_tag}, 2);
+	for (@$results) {
+	    my $authority = GetAuthority($_->{authid});
+		if ($authority->field('200') and $authority->subfield('200','b')) {
+		    $_->{to_report} = $authority->subfield('200','b');
 	    }
  	}
 
@@ -181,7 +182,7 @@ my ($input) = @_;
             $to = (($startfrom+1)*$resultsperpage);
         }
         my $link="../cataloguing/plugin_launcher.pl?plugin_name=unimarc_field_210c.pl&authtypecode=EDITORS&and_or=$and_or&marclist=$marclist&operator=$operator&orderby=$orderby&excluding=$excluding&".join("&",map {"value=".$_} @value)."&op=do_search&type=intranet&index=$index";
-        warn "$link ,".getnbpages($total, $resultsperpage);
+
         $template->param(result => $results) if $results;
         $template->param('index' => $query->param('index'));
         $template->param(startfrom=> $startfrom,
diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/value_builder/unimarc_field_210c.tmpl b/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/value_builder/unimarc_field_210c.tmpl
index bde1feb..c2d19c7 100644
--- a/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/value_builder/unimarc_field_210c.tmpl
+++ b/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/value_builder/unimarc_field_210c.tmpl
@@ -3,7 +3,7 @@
 <html xmlns="http://www.w3.org/1999/xhtml">
 <head>
 <meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
-<title>UNIMARC_Field 125b builder</title>
+<title>UNIMARC_Field 210c builder</title>
 </head>
 <body>
 
-- 
1.7.0.4




More information about the Koha-patches mailing list