[Koha-cvs] koha C4/Biblio.pm koha-tmpl/intranet-tmpl/prog/... [rel_3_0]

Antoine Farnault antoine at koha-fr.org
Fri Dec 8 18:55:45 CET 2006


CVSROOT:	/sources/koha
Module name:	koha
Branch:		rel_3_0
Changes by:	Antoine Farnault <toins>	06/12/08 17:55:45

Modified files:
	C4             : Biblio.pm 
	koha-tmpl/intranet-tmpl/prog/en/catalogue: detail.tmpl 
	koha-tmpl/opac-tmpl/prog/en: opac-detail.tmpl 
	opac           : opac-detailprint.pl 

Log message:
	GetMarcAuthors now get authors for all subfields

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/C4/Biblio.pm?cvsroot=koha&only_with_tag=rel_3_0&r1=1.178.2.38&r2=1.178.2.39
http://cvs.savannah.gnu.org/viewcvs/koha/koha-tmpl/intranet-tmpl/prog/en/catalogue/detail.tmpl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.2.2.15&r2=1.2.2.16
http://cvs.savannah.gnu.org/viewcvs/koha/koha-tmpl/opac-tmpl/prog/en/opac-detail.tmpl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.1.2.8&r2=1.1.2.9
http://cvs.savannah.gnu.org/viewcvs/koha/opac/opac-detailprint.pl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.3.2.4&r2=1.3.2.5

Patches:
Index: C4/Biblio.pm
===================================================================
RCS file: /sources/koha/koha/C4/Biblio.pm,v
retrieving revision 1.178.2.38
retrieving revision 1.178.2.39
diff -u -b -r1.178.2.38 -r1.178.2.39
--- C4/Biblio.pm	7 Dec 2006 15:42:14 -0000	1.178.2.38
+++ C4/Biblio.pm	8 Dec 2006 17:55:44 -0000	1.178.2.39
@@ -33,7 +33,7 @@
 use vars qw($VERSION @ISA @EXPORT);
 
 # set the version for version checking
-$VERSION = do { my @v = '$Revision: 1.178.2.38 $' =~ /\d+/g; shift(@v).".".join( "_", map { sprintf "%03d", $_ } @v ); };
+$VERSION = do { my @v = '$Revision: 1.178.2.39 $' =~ /\d+/g; shift(@v).".".join( "_", map { sprintf "%03d", $_ } @v ); };
 
 @ISA = qw( Exporter );
 
@@ -1595,7 +1595,7 @@
             my $subfieldcode     = $authors_subfield->[0];
             my $value            = $authors_subfield->[1];
             $hash{'tag'}         = $field->tag;
-            $hash{$subfieldcode} = $value;
+            $hash{value}        .= $value . " " if ($subfieldcode != 9) ;
         }
         push @marcauthors, \%hash;
     }
@@ -3568,8 +3568,11 @@
 
 =cut
 
-# $Id: Biblio.pm,v 1.178.2.38 2006/12/07 15:42:14 toins Exp $
+# $Id: Biblio.pm,v 1.178.2.39 2006/12/08 17:55:44 toins Exp $
 # $Log: Biblio.pm,v $
+# Revision 1.178.2.39  2006/12/08 17:55:44  toins
+# GetMarcAuthors now get authors for all subfields
+#
 # Revision 1.178.2.38  2006/12/07 15:42:14  toins
 # synching opac & intranet.
 # fix some broken link & bugs.

Index: koha-tmpl/intranet-tmpl/prog/en/catalogue/detail.tmpl
===================================================================
RCS file: /sources/koha/koha/koha-tmpl/intranet-tmpl/prog/en/catalogue/detail.tmpl,v
retrieving revision 1.2.2.15
retrieving revision 1.2.2.16
diff -u -b -r1.2.2.15 -r1.2.2.16
--- koha-tmpl/intranet-tmpl/prog/en/catalogue/detail.tmpl	7 Dec 2006 15:42:14 -0000	1.2.2.15
+++ koha-tmpl/intranet-tmpl/prog/en/catalogue/detail.tmpl	8 Dec 2006 17:55:44 -0000	1.2.2.16
@@ -66,8 +66,8 @@
         <!-- TMPL_IF name="MARCAUTHORS" -->
             <p><label><b>Additional Author:</b></label>
                 <!-- TMPL_LOOP NAME="MARCAUTHORS" -->
-                <a href="/cgi-bin/koha/catalogue/search.pl?q=au:<!-- TMPL_VAR NAME="a" -->">
-                    <!-- TMPL_VAR NAME="a" -->
+                <a href="/cgi-bin/koha/catalogue/search.pl?q=au:<!-- TMPL_VAR NAME="value" -->">
+                    <!-- TMPL_VAR NAME="value" -->
                 </a>&nbsp;
                 <!-- /TMPL_LOOP -->
             </p>

Index: koha-tmpl/opac-tmpl/prog/en/opac-detail.tmpl
===================================================================
RCS file: /sources/koha/koha/koha-tmpl/opac-tmpl/prog/en/opac-detail.tmpl,v
retrieving revision 1.1.2.8
retrieving revision 1.1.2.9
diff -u -b -r1.1.2.8 -r1.1.2.9
--- koha-tmpl/opac-tmpl/prog/en/opac-detail.tmpl	8 Dec 2006 14:28:06 -0000	1.1.2.8
+++ koha-tmpl/opac-tmpl/prog/en/opac-detail.tmpl	8 Dec 2006 17:55:45 -0000	1.1.2.9
@@ -62,8 +62,8 @@
     <!-- TMPL_IF name="MARCAUTHORS" -->
     <p><label><b>Additional Author:</b></label>
         <!-- TMPL_LOOP NAME="MARCAUTHORS" -->
-        <a href="/cgi-bin/koha/opac-search.pl?q=au:<!-- TMPL_VAR NAME="a" -->">
-            <!-- TMPL_VAR NAME="a" -->
+        <a href="/cgi-bin/koha/opac-search.pl?q=au:<!-- TMPL_VAR NAME="value" -->">
+            <!-- TMPL_VAR NAME="value" -->
         </a>&nbsp;
         <!-- /TMPL_LOOP -->
     </p>

Index: opac/opac-detailprint.pl
===================================================================
RCS file: /sources/koha/koha/opac/opac-detailprint.pl,v
retrieving revision 1.3.2.4
retrieving revision 1.3.2.5
diff -u -b -r1.3.2.4 -r1.3.2.5
--- opac/opac-detailprint.pl	7 Dec 2006 15:42:15 -0000	1.3.2.4
+++ opac/opac-detailprint.pl	8 Dec 2006 17:55:45 -0000	1.3.2.5
@@ -53,7 +53,7 @@
 
 $dat->{'additional'} = "";
 foreach (@$addauthor) {
-    $dat->{'additional'} .= "|" . $_->{'a'};
+    $dat->{'additional'} .= "|" . $_->{'value'};
 }    # for
 
 my @results;





More information about the Koha-cvs mailing list