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

Bug 30939: Fix use statement for DelAuthority

Browse source 
Without this patch, the script won't delete any
unused authorities, but gives an error instead
and dies:

Undefined subroutine &main::DelAuthority called at ./misc/migration_tools/remove_unused_authorities.pl line 98.

To test:
- Run from koha-shell:
  ./misc/migration_tools/remove_unused_authorities.pl -t
- Verify several authorities are reported as unused
- ./misc/migration_tools/remove_unused_authorities.pl -c
- Verify the error message is shown when the first unused
  authority is found and the script stops
- Apply patch and rerun:
  ./misc/migration_tools/remove_unused_authorities.pl -t
- Verify the error is gone, the script finishes and auhorities
  are deleted

https://bugs.koha-community.org/show_bug.cgi?id=30936

Signed-off-by: David Nind <david@davidnind.com>
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
(cherry picked from commit df393b38b8)

Signed-off-by: Lucas Gass <lucas@bywatersolutions.com>
This commit is contained in:
Katrin Fischer 2022-06-17 22:34:45 +00:00 committed by Lucas Gass
parent 588377511b
commit 29a627bdfc
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
misc/migration_tools/remove_unused_authorities.pl
View file

@ -24,7 +24,7 @@ use Modern::Perl;
use Koha::Script;
use C4::Context;
use C4::AuthoritiesMarc;
use C4::AuthoritiesMarc qw( DelAuthority );
use Getopt::Long qw( GetOptions );
use Koha::SearchEngine::Search;