Bug 13889: (QA followup) Supress warning, set object column to undef instead of 0

Signed-off-by: Tomas Cohen Arazi <tomascohen@gmail.com>
This commit is contained in:
Kyle Hall 2015-04-23 07:51:30 -04:00 committed by Tomas Cohen Arazi
parent a9a8abb32f
commit a9f47539ec

View file

@ -93,8 +93,9 @@ Logs the path and name of the calling script plus the information privided by pa
#'
sub cronlogaction {
my ($infos)=@_;
my $loginfo = (caller(0))[1] . ' ' . $infos;
logaction( 'CRONJOBS', 'Run', 0, $loginfo ) if C4::Context->preference('CronjobLog');
my $loginfo = (caller(0))[1];
$loginfo .= ' ' . $infos if $infos;
logaction( 'CRONJOBS', 'Run', undef, $loginfo ) if C4::Context->preference('CronjobLog');
}