- 

use Modern::Perl;

return {

    bug_number => "18984",

    description => "Remove NORMARC from search_marc_map.marc_type",

    up => sub {

        my ($args) = @_;

        my ($dbh, $out) = @$args{qw(dbh out)};

        $dbh->do(q{DELETE FROM search_marc_map WHERE marc_type='normarc'});

        $dbh->do(q{ALTER TABLE search_marc_map MODIFY `marc_type` enum('marc21','unimarc') COMMENT 'what MARC type this map is for'});

    },

}