Bug 33080: Allow pagination to be built from stashed values

[srvgit] / C4 / Log.pm

diff --git a/C4/Log.pm b/C4/Log.pm
index 2d52001..cff2931 100644 (file)
--- a/C4/Log.pm
+++ b/C4/Log.pm
@@ -133,9 +133,11 @@ Logs the path and name of the calling script plus the information privided by pa
 sub cronlogaction {
     my $params = shift;
     my $info = $params->{info};
+    my $action = $params->{action};
+    $action ||= "Run";
     my $loginfo = (caller(0))[1];
     $loginfo .= ' ' . $info if $info;
-    logaction( 'CRONJOBS', 'Run', $$, $loginfo ) if C4::Context->preference('CronjobLog');
+    logaction( 'CRONJOBS', $action, $$, $loginfo ) if C4::Context->preference('CronjobLog');
 }
 
 1;