Bug 24152: (QA follow-up) Add tests for alternative from and to pars
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:
parent
f59475a360
commit
c85d6f257f
1 changed files with 4 additions and 2 deletions
|
@ -209,6 +209,8 @@ unless ( $sessions
|
||||||
|| $pOldReserves
|
|| $pOldReserves
|
||||||
|| $pTransfers
|
|| $pTransfers
|
||||||
|| defined $pPseudoTransactions
|
|| defined $pPseudoTransactions
|
||||||
|
|| $pPseudoTransactionsFrom
|
||||||
|
|| $pPseudoTransactionsTo
|
||||||
) {
|
) {
|
||||||
print "You did not specify any cleanup work for the script to do.\n\n";
|
print "You did not specify any cleanup work for the script to do.\n\n";
|
||||||
usage(1);
|
usage(1);
|
||||||
|
@ -456,8 +458,8 @@ if ($pTransfers) {
|
||||||
print "Done with purging transfers.\n" if $verbose;
|
print "Done with purging transfers.\n" if $verbose;
|
||||||
}
|
}
|
||||||
|
|
||||||
if (defined $pPseudoTransactions) {
|
if (defined $pPseudoTransactions or $pPseudoTransactionsFrom or $pPseudoTransactionsTo ) {
|
||||||
print "Purging pseudonymized transactions older than $pPseudoTransactions days.\n" if $verbose;
|
print "Purging pseudonymized transactions\n" if $verbose;
|
||||||
Koha::PseudonymizedTransactions->filter_by_last_update(
|
Koha::PseudonymizedTransactions->filter_by_last_update(
|
||||||
{
|
{
|
||||||
timestamp_column_name => 'datetime',
|
timestamp_column_name => 'datetime',
|
||||||
|
|
Loading…
Reference in a new issue