by request of Jason, accept comma separated list of fields to --trash
authormiker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Sat, 21 Jun 2008 23:49:38 +0000 (23:49 +0000)
committermiker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Sat, 21 Jun 2008 23:49:38 +0000 (23:49 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/trunk@9906 dcc99617-32d9-48b4-a31d-7c20da2025e4

Open-ILS/src/extras/import/marc2bre.pl

index b6c658b..1d958b7 100755 (executable)
@@ -50,6 +50,8 @@ GetOptions(
        'quiet'         => \$quiet
 );
 
+@trash_fields = split(/,/,join(',',@trash_fields));
+
 if ($enc) {
        MARC::Charset->ignore_errors(1);
        MARC::Charset->assume_encoding($enc);