[Koha-patches] [PATCH] If the catalogue contains a value that is not in authorised values and it should, display the code

paul.poulain at biblibre.com paul.poulain at biblibre.com
Wed May 28 22:33:56 CEST 2008


From: Paul POULAIN <paul.poulain at biblibre.com>

very usefull for us (UNIMARC) to find languages that are in the database but not in the auth values.
---
 catalogue/MARCdetail.pl |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/catalogue/MARCdetail.pl b/catalogue/MARCdetail.pl
index 40437e6..1448f6e 100755
--- a/catalogue/MARCdetail.pl
+++ b/catalogue/MARCdetail.pl
@@ -202,7 +202,7 @@ for ( my $tabloop = 0 ; $tabloop <= 10 ; $tabloop++ ) {
                     }
                     $subfield_data{marc_value} =
                       GetAuthorisedValueDesc( $fields[$x_i]->tag(),
-                        $subf[$i][0], $subf[$i][1], '', $tagslib);
+                        $subf[$i][0], $subf[$i][1], '', $tagslib) || $subf[$i][1];
 
                 }
                 $subfield_data{marc_subfield} = $subf[$i][0];
@@ -259,7 +259,7 @@ foreach my $field (@fields) {
         $witness{ $subf[$i][0] } =
         $tagslib->{ $field->tag() }->{ $subf[$i][0] }->{lib};
         $this_row{ $subf[$i][0] } = GetAuthorisedValueDesc( $field->tag(),
-                        $subf[$i][0], $subf[$i][1], '', $tagslib);
+                        $subf[$i][0], $subf[$i][1], '', $tagslib) || $subf[$i][1];
     }
     if (%this_row) {
         push( @big_array, \%this_row );
-- 
1.5.3.2




More information about the Koha-patches mailing list