X-Git-Url: http://git.equinoxoli.org/?p=migration-tools.git;a=blobdiff_plain;f=unicorn_patron_xml2text.pl;h=fcaaedfff2efbe5b185280df8b6f527a2df0aa98;hp=be223097b95305450f36a79affa7fd89d2b2bb82;hb=a51adaefa8666dc462d255280d8beca0506bf0c2;hpb=e17c9ee5b049fada8b14199fa1dbdf73ec7cca47

diff --git a/unicorn_patron_xml2text.pl b/unicorn_patron_xml2text.pl
index be22309..fcaaedf 100755
--- a/unicorn_patron_xml2text.pl
+++ b/unicorn_patron_xml2text.pl
@@ -110,7 +110,8 @@ for my $patron ( $doc->documentElement->childNodes ) {
 
     my $inactive_barcode1 = '';
     my $inactive_barcode2 = '';
-    for my $i_bc ( $patron->findnodes( "barcode" ) ) {
+    my @barcodes = $patron->findnodes( "barcodes" );
+    for my $i_bc ( $barcodes[0]->findnodes( "barcode" ) ) {
         my $active = $i_bc->getAttribute('active');
         if ($active eq "0") {
             if (! $inactive_barcode1 ) {