From be82a5f94208a6f41e033398c53fc3e9d0f80e62 Mon Sep 17 00:00:00 2001 From: Paul Poulain Date: Thu, 21 Mar 2013 16:55:07 +0100 Subject: [PATCH] bug 5608 follow-up: exit immediately if UNIMARC Signed-off-by: Paul Poulain Signed-off-by: Jared Camins-Esakov --- misc/migration_tools/switch_marc21_series_info.pl | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/misc/migration_tools/switch_marc21_series_info.pl b/misc/migration_tools/switch_marc21_series_info.pl index 9f67e026c7..cfd204b57d 100755 --- a/misc/migration_tools/switch_marc21_series_info.pl +++ b/misc/migration_tools/switch_marc21_series_info.pl @@ -46,6 +46,11 @@ my $result = GetOptions( 'v' => \$verbose, ); +# warn and exit if we're running UNIMARC +if (C4::Context->preference('MARCFLAVOUR') eq 'UNIMARC') { + print "This script is useless when you're running UNIMARC\n"; + exit 0; +} if ( ! $result || $show_help ) { print_usage(); exit 0; -- 2.39.5