$id = $id ? [ $id ] : [];
}
unless ( $userid or @$id ) {
unless ( $userid or @$id or $interval ) {
warn "ERROR: userid or id is required for history deletion";
warn "ERROR: userid, id or interval is required for history deletion";
return;
use C4::Context;
use C4::Dates;
use C4::Search;
use C4::Search::History;
use Getopt::Long;
use C4::Log;
-