View | Details | Raw Unified | Return to bug 13889
Collapse All | Expand All

(-)a/C4/Log.pm (-3 / +5 lines)
Lines 83-97 sub logaction { Link Here
83
83
84
=item cronlogaction
84
=item cronlogaction
85
85
86
  &cronlogaction();
86
  &cronlogaction($infos);
87
87
88
Convenience routine to add a record into action_logs table from a cron job.
88
Convenience routine to add a record into action_logs table from a cron job.
89
Logs the path and name of the calling script plus the information privided by param $infos.
89
90
90
=cut
91
=cut
91
92
92
#'
93
#'
93
sub cronlogaction {
94
sub cronlogaction {
94
    logaction( 'CRONJOBS', 'Run', 0, (caller(0))[1] ) if C4::Context->preference('CronjobLog');
95
    my ($infos)=@_;
96
    my $loginfo = (caller(0))[1] . ' ' . $infos;
97
    logaction( 'CRONJOBS', 'Run', 0, $loginfo ) if C4::Context->preference('CronjobLog');
95
}
98
}
96
99
97
100
98
- 

Return to bug 13889