Lines 26-31
use C4::Templates;
Link Here
|
26 |
use C4::Log qw( logaction ); |
26 |
use C4::Log qw( logaction ); |
27 |
use Koha::ActionLogs; |
27 |
use Koha::ActionLogs; |
28 |
use Koha::Notice::Template; |
28 |
use Koha::Notice::Template; |
|
|
29 |
use Koha::Patrons; |
29 |
|
30 |
|
30 |
=head1 NAME |
31 |
=head1 NAME |
31 |
|
32 |
|
Lines 257-271
sub get_request_logs {
Link Here
|
257 |
foreach my $alias(@{$aliases}) { |
258 |
foreach my $alias(@{$aliases}) { |
258 |
$alias_hash->{$alias->{authorised_value}} = $alias; |
259 |
$alias_hash->{$alias->{authorised_value}} = $alias; |
259 |
} |
260 |
} |
260 |
foreach my $log(@{$logs}) { |
261 |
foreach my $log ( @{$logs} ) { |
|
|
262 |
$log->{patron} = Koha::Patrons->find( $log->{user} ); |
261 |
$log->{notice_types} = $notice_hash; |
263 |
$log->{notice_types} = $notice_hash; |
262 |
$log->{aliases} = $alias_hash; |
264 |
$log->{aliases} = $alias_hash; |
263 |
$log->{info} = from_json($log->{info}); |
265 |
$log->{info} = from_json( $log->{info} ); |
264 |
$log->{template} = $self->get_log_template({ |
266 |
$log->{template} = $self->get_log_template( |
265 |
request => $request, |
267 |
{ |
266 |
origin => $log->{info}->{log_origin}, |
268 |
request => $request, |
267 |
action => $log->{action} |
269 |
origin => $log->{info}->{log_origin}, |
268 |
}); |
270 |
action => $log->{action} |
|
|
271 |
} |
272 |
); |
269 |
} |
273 |
} |
270 |
|
274 |
|
271 |
return $logs; |
275 |
return $logs; |
272 |
- |
|
|