Bugzilla – Attachment 23632 Details for
Bug 11417
remove_unused_authorities.pl doesn't accept --test
Home
|
New
|
Browse
|
Search
|
[?]
|
Reports
|
Help
|
New Account
|
Log In
[x]
|
Forgot Password
Login:
[x]
[patch]
Bug 11417 - remove_unused_authorities.pl doesn't accept --test
0001-Bug-11417-remove_unused_authorities.pl-doesn-t-accep.patch (text/plain), 2.12 KB, created by
Gaetan Boisson
on 2013-12-18 14:30:47 UTC
(
hide
)
Description:
Bug 11417 - remove_unused_authorities.pl doesn't accept --test
Filename:
MIME Type:
Creator:
Gaetan Boisson
Created:
2013-12-18 14:30:47 UTC
Size:
2.12 KB
patch
obsolete
>From a93a4b859d8b91ebce26fc448c0c711a2cbe2f03 Mon Sep 17 00:00:00 2001 >From: Gaetan Boisson <gaetan.boisson@biblibre.com> >Date: Wed, 18 Dec 2013 15:19:50 +0100 >Subject: [PATCH] Bug 11417 - remove_unused_authorities.pl doesn't accept > --test > >This patches adds support for the --test option, as well as a short message telling the user the script is running in test mode. > >Test plan : >- Launch the script with -h to see the help >- Launch the script with --test and --aut with an authtypecode that is used in your instance >- Make sure it does the same thing as launching it with -t >- Launch the script for real and make sure it still works as expected, deleting unused authorities. >--- > misc/migration_tools/remove_unused_authorities.pl | 15 ++++++++++----- > 1 file changed, 10 insertions(+), 5 deletions(-) > >diff --git a/misc/migration_tools/remove_unused_authorities.pl b/misc/migration_tools/remove_unused_authorities.pl >index fbeee78..7920923 100755 >--- a/misc/migration_tools/remove_unused_authorities.pl >+++ b/misc/migration_tools/remove_unused_authorities.pl >@@ -27,12 +27,13 @@ use C4::Context; > use C4::AuthoritiesMarc; > use Getopt::Long; > >-my ($test,@authtypes); >+my @authtypes; > my $want_help = 0; >+my $test = 0; > GetOptions( >- 'aut|authtypecode:s' => \@authtypes, >- 't' => \$test, >- 'h|help' => \$want_help >+ 'aut|authtypecode:s' => \@authtypes, >+ 't|test' => \$test, >+ 'h|help' => \$want_help > ); > > if ($want_help) { >@@ -40,6 +41,10 @@ if ($want_help) { > exit 0; > } > >+if ($test) { >+ print "testing only, authorities will not be deleted.\n"; >+} >+ > my $dbh=C4::Context->dbh; > @authtypes or @authtypes = qw( NC ); > my $thresholdmin=0; >@@ -88,7 +93,7 @@ This script will parse all authoritiestypes given as parameter, and remove autho > warning : there is no individual confirmation ! > parameters > --aut|authtypecode TYPE the list of authtypes to check >- --t|test test mode, don't delete really, just count >+ --test or -t test mode, don't delete really, just count > --help or -h show this message. > > _USAGE_ >-- >1.7.9.5 >
You cannot view the attachment while viewing its details because your browser does not support IFRAMEs.
View the attachment on a separate page
.
View Attachment As Diff
View Attachment As Raw
Actions:
View
|
Diff
|
Splinter Review
Attachments on
bug 11417
:
23632
|
23661
|
23667