Lines 50-55
my $input = new CGI;
Link Here
|
50 |
$debug or $debug = $cgi_debug; |
50 |
$debug or $debug = $cgi_debug; |
51 |
my $do_it = $input->param('do_it'); |
51 |
my $do_it = $input->param('do_it'); |
52 |
my @modules = $input->multi_param("modules"); |
52 |
my @modules = $input->multi_param("modules"); |
|
|
53 |
warn Data::Dumper::Dumper( @modules ); |
53 |
my $user = $input->param("user") // ''; |
54 |
my $user = $input->param("user") // ''; |
54 |
my @actions = $input->multi_param("actions"); |
55 |
my @actions = $input->multi_param("actions"); |
55 |
my @interfaces = $input->multi_param("interfaces"); |
56 |
my @interfaces = $input->multi_param("interfaces"); |
Lines 147-153
if ($do_it) {
Link Here
|
147 |
$search_params{info} = $info if $info; |
148 |
$search_params{info} = $info if $info; |
148 |
$search_params{object} = $object if $object; |
149 |
$search_params{object} = $object if $object; |
149 |
} |
150 |
} |
150 |
|
151 |
warn Data::Dumper::Dumper( \%search_params ); |
151 |
my @logs = Koha::ActionLogs->search(\%search_params); |
152 |
my @logs = Koha::ActionLogs->search(\%search_params); |
152 |
|
153 |
|
153 |
my @data; |
154 |
my @data; |
154 |
- |
|
|