From 8f5c0abd09f3bcebd8b48524f4f5b8ba3f7df06d Mon Sep 17 00:00:00 2001
From: Nick Clemens <nick@bywatersolutions.com>
Date: Fri, 29 May 2026 11:17:00 +0000
Subject: [PATCH] Bug 42714: Adjust cronlogaction to use caller(1)

Since we are calling from within another module we need more caller information to
log the correct script

Signed-off-by: David Nind <david@davidnind.com>
Signed-off-by: Martin Renvoize <martin.renvoize@openfifth.co.uk>
Signed-off-by: Pedro Amorim <pedro.amorim@openfifth.co.uk>
---
 C4/Log.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/C4/Log.pm b/C4/Log.pm
index 964bb32f77..15d68531ca 100644
--- a/C4/Log.pm
+++ b/C4/Log.pm
@@ -221,7 +221,7 @@ sub cronlogaction {
     my $info   = $params->{info};
     my $action = $params->{action};
     $action ||= "Run";
-    my $loginfo = ( caller(0) )[1];
+    my $loginfo = ( caller(1) )[1];
     $loginfo .= ' ' . $info                        if $info;
     logaction( 'CRONJOBS', $action, $$, $loginfo ) if C4::Context->preference('CronjobLog');
 }