Koha-community/Koha
13
7
Fork 0
Code Issues Releases Wiki Activity

Bug 19712: Fix test mode for delete_records_via_leader.pl

Browse source 
Test plan:
perl misc/cronjobs/delete_records_via_leader.pl
=> Should display a warning
perl misc/cronjobs/delete_records_via_leader.pl --test
=> Should not display a warning and script should not apply changes
perl misc/cronjobs/delete_records_via_leader.pl --confirm
=> Should not display a warning and script should apply changes

Signed-off-by: Brendan Gallagher <brendan@bywatersolutions.com>

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
This commit is contained in:
Jonathan Druart 2017-12-20 19:10:44 -03:00
parent 69f71ca2bf
commit fcf2b798fd
1 changed files with 8 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
misc/cronjobs/delete_records_via_leader.pl
View file

@ -53,7 +53,14 @@ GetOptions(
'h|help' => \$help,
);
if ( $help || !$confirm ) {
pod2usage(q|--test and --confirm cannot be specified together|) if $test and $confirm;
unless ( $confirm or $test ) {
warn "Running in test mode as --confirm is not passed\n";
$test = 1;
}
if ( $help ) {
say qq{
delete_records_via_leader.pl - Attempt to delete any MARC records where the leader character 5 equals 'd'
usage: delete_records_via_leader.pl --confirm --verbose [--test]