[Koha-cvs] koha/C4 AuthoritiesMarc.pm [rel_2_2]

[paul poulain]

CVSROOT:	/cvsroot/koha
Module name:	koha
Branch: 	rel_2_2
Changes by:	paul poulain <tipaul at savannah.gnu.org>	06/03/15 15:10:29

Modified files:
	C4             : AuthoritiesMarc.pm 

Log message:
	added a new feature in summary building (for an authority)
	If you enter [XXX*] ([250*] for example), the whole field will be displayed as it's saved. This will solve the problem with reordered subfields.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/koha/C4/AuthoritiesMarc.pm.diff?only_with_tag=rel_2_2&tr1=1.9.2.13&tr2=1.9.2.14&r1=text&r2=text

Patches:
Index: koha/C4/AuthoritiesMarc.pm
diff -u koha/C4/AuthoritiesMarc.pm:1.9.2.13 koha/C4/AuthoritiesMarc.pm:1.9.2.14
--- koha/C4/AuthoritiesMarc.pm:1.9.2.13	Wed Mar 15 10:46:31 2006
+++ koha/C4/AuthoritiesMarc.pm	Wed Mar 15 15:10:29 2006
@@ -165,6 +165,8 @@
 			my @fields = $record->fields();
 			foreach my $field (@fields) {
 				my $tag = $field->tag();
+				my $tagvalue = $field->as_string();
+				$summary =~ s/\[(.?.?.?.?)$tag\*(.*?)]/$1$tagvalue$2\[$1$tag$2]/g;
 				if ($tag<10) {
 				} else {
 					my @subf = $field->subfields;
@@ -1041,8 +1043,12 @@
 
 =cut
 
-# $Id: AuthoritiesMarc.pm,v 1.9.2.13 2006/03/15 10:46:31 tipaul Exp $
+# $Id: AuthoritiesMarc.pm,v 1.9.2.14 2006/03/15 15:10:29 tipaul Exp $
 # $Log: AuthoritiesMarc.pm,v $
+# Revision 1.9.2.14  2006/03/15 15:10:29  tipaul
+# added a new feature in summary building (for an authority)
+# If you enter [XXX*] ([250*] for example), the whole field will be displayed as it's saved. This will solve the problem with reordered subfields.
+#
 # Revision 1.9.2.13  2006/03/15 10:46:31  tipaul
 # removing hardcoded link in summary of authority (on $heading) : it can be set in the template (in the # of biblios column) :
 # <a href="/cgi-bin/koha/opac-search.pl?type=opac&amp;op=do_search&amp;marclist=<!-- TMPL_VAR NAME="biblio_fields" -->&amp;operator==&amp;value=<!-- TMPL_VAR NAME="authid" -->&amp;and_or=and&amp;excluding="><!-- TMPL_VAR NAME="used" --></a>  <!-- TMPL_VAR NAME="used" -->