bulkauthimport fix

Signed-off-by: Chris Cormack <crc@liblime.com>
Signed-off-by: Galen Charlton <galen.charlton@liblime.com>
Signed-off-by: Joshua Ferraro <jmf@liblime.com>

diff --git a/misc/migration_tools/bulkauthimport.pl b/misc/migration_tools/bulkauthimport.pl
index 7307075..c1ee508 100755 (executable)
--- a/misc/migration_tools/bulkauthimport.pl
+++ b/misc/migration_tools/bulkauthimport.pl
@@ -97,7 +97,7 @@ while ( my $record = $batch->next() ) {
         foreach my $pair ( $oldField->subfields() ) { 
             $pair->[1] =~ s/\<//g;
             $pair->[1] =~ s/\>//g;
-            push( @newSubfields, $pair->[0], $pair->[1], $char_encoding);
+            push( @newSubfields, $pair->[0], $pair->[1]);
         }
     
         # add the new field to our new record