[Koha-cvs] koha/value_builder unimarc_field_4XX.pl [rel_2_2]

[paul poulain]

CVSROOT:        /cvsroot/koha
Module name:    koha
Branch:         rel_2_2
Changes by:     paul poulain <tipaul>   06/06/19 13:18:42

Modified files:
        value_builder  : unimarc_field_4XX.pl 

Log message:
        reverting cloneTag bugs (see joshua mail on koha-devel) :
        * going back to a previous version, with server call to clone a Tag
        * keeping BIG_LOOP in template (just 1 template for every tag)
        I didn't check npl templates, but synch'ing them should not be too hard.
        
        (ps : i've reverted default templates to 1.33.2.23)

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/value_builder/unimarc_field_4XX.pl?cvsroot=koha&only_with_tag=rel_2_2&r1=1.4.2.4&r2=1.4.2.5

Patches:
Index: unimarc_field_4XX.pl
===================================================================
RCS file: /cvsroot/koha/koha/value_builder/unimarc_field_4XX.pl,v
retrieving revision 1.4.2.4
retrieving revision 1.4.2.5
diff -u -b -r1.4.2.4 -r1.4.2.5
--- unimarc_field_4XX.pl        8 Dec 2005 09:35:50 -0000       1.4.2.4
+++ unimarc_field_4XX.pl        19 Jun 2006 13:18:42 -0000      1.4.2.5
@@ -72,7 +72,7 @@
        my $query = new CGI;
        my $op = $query->param('op');
        my $type=$query->param('type');
-       warn "operation  ".$op;
+#      warn "operation  ".$op;
        my $startfrom=$query->param('startfrom');
        $startfrom=0 if(!defined $startfrom);
        my ($template, $loggedinuser, $cookie);
@@ -112,7 +112,7 @@
                        $subfield_value_a.=" 
(".$marcrecord->field('700')->subfield("c")." - " if 
($marcrecord->field('700')->subfield("c"));
                        $subfield_value_a.=" (" if 
(($marcrecord->field('700')->subfield("f")) and not( 
$marcrecord->field('700')->subfield("c")));
                        
$subfield_value_a.=$marcrecord->field('700')->subfield("f") if 
($marcrecord->field('700')->subfield("f"));
-                       $subfield_value_a.=")" if 
($marcrecord->field('701')->subfield("f")) or 
($marcrecord->field('701')->subfield("c"));
+                       $subfield_value_a.=")" if 
($marcrecord->field('700')->subfield("f")) or 
($marcrecord->field('700')->subfield("c"));
                } elsif ($marcrecord->field('702')){
                        
$subfield_value_a=$marcrecord->field('702')->subfield("a");
                        $subfield_value_a.=", 
".$marcrecord->field('702')->subfield("b") if 
($marcrecord->field('702')->subfield("b"));