[Koha-cvs] koha/opac opac-MARCdetail.pl [rel_2_2]

[Joshua Ferraro]

CVSROOT:	/sources/koha
Module name:	koha
Branch: 	rel_2_2
Changes by:	Joshua Ferraro <kados at savannah.gnu.org>	06/03/15 04:53:20

Modified files:
	opac           : opac-MARCdetail.pl 

Log message:
	refining MARC detail in opac to check if visibility flag is >0 rather
	than if it just exists.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/koha/opac/opac-MARCdetail.pl.diff?only_with_tag=rel_2_2&tr1=1.4.2.13&tr2=1.4.2.14&r1=text&r2=text

Patches:
Index: koha/opac/opac-MARCdetail.pl
diff -u koha/opac/opac-MARCdetail.pl:1.4.2.13 koha/opac/opac-MARCdetail.pl:1.4.2.14
--- koha/opac/opac-MARCdetail.pl:1.4.2.13	Wed Mar  8 13:46:55 2006
+++ koha/opac/opac-MARCdetail.pl	Wed Mar 15 04:53:20 2006
@@ -88,7 +88,7 @@
 	my @loop_data =();
 	my @subfields_data;
 	# deal with leader
-	unless ($tagslib->{'000'}->{'@'}->{tab}  ne $tabloop  or $tagslib->{'000'}->{'@'}->{hidden}) {
+	unless ($tagslib->{'000'}->{'@'}->{tab}  ne $tabloop  or $tagslib->{'000'}->{'@'}->{hidden}>0) {
 		my %subfield_data;
 		$subfield_data{marc_lib}=$tagslib->{'000'}->{'@'}->{lib};
 		$subfield_data{marc_value}=$record->leader();
@@ -107,7 +107,7 @@
 		# if tag <10, there's no subfield, use the "@" trick
 		if ($fields[$x_i]->tag()<10) {
 			next if ($tagslib->{$fields[$x_i]->tag()}->{'@'}->{tab}  ne $tabloop);
-			next if ($tagslib->{$fields[$x_i]->tag()}->{'@'}->{hidden});
+			next if ($tagslib->{$fields[$x_i]->tag()}->{'@'}->{hidden}>0);
 			my %subfield_data;
 			$subfield_data{marc_lib}=$tagslib->{$fields[$x_i]->tag()}->{'@'}->{lib};
 			$subfield_data{marc_value}=$fields[$x_i]->data();
@@ -120,7 +120,7 @@
 			for my $i (0..$#subf) {
 				$subf[$i][0] = "@" unless $subf[$i][0];
 				next if ($tagslib->{$fields[$x_i]->tag()}->{$subf[$i][0]}->{tab}  ne $tabloop);
-				next if ($tagslib->{$fields[$x_i]->tag()}->{$subf[$i][0]}->{hidden});
+				next if ($tagslib->{$fields[$x_i]->tag()}->{$subf[$i][0]}->{hidden}>0);
 				my %subfield_data;
 				$subfield_data{marc_lib}=$tagslib->{$fields[$x_i]->tag()}->{$subf[$i][0]}->{lib};
 				$subfield_data{link}=$tagslib->{$fields[$x_i]->tag()}->{$subf[$i][0]}->{link};