From 2d73f3eb423b35d4630432fe1f716c4ebf544cf1 Mon Sep 17 00:00:00 2001
From: Nick Clemens <nick@bywatersolutions.com>
Date: Thu, 4 Jun 2026 11:37:20 +0000
Subject: [PATCH] Bug 42714: (QA follow-up) Add comment with Perl doc for bash

Signed-off-by: Pedro Amorim <pedro.amorim@openfifth.co.uk>
---
 C4/Log.pm | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/C4/Log.pm b/C4/Log.pm
index 33049698ec..d41ae51803 100644
--- a/C4/Log.pm
+++ b/C4/Log.pm
@@ -215,13 +215,16 @@ Logs the path and name of the calling script plus the information provided by pa
 
 =cut
 
-#'
 sub cronlogaction {
     my $params = shift;
     my $info   = $params->{info};
     my $action = $params->{action};
     $action ||= "Run";
+
+    # $0 is a special Perl variable containing the program that is currently running
+    # https://perldoc.perl.org/variables/$0
     my $loginfo = $0;
+
     $loginfo .= ' ' . $info                        if $info;
     logaction( 'CRONJOBS', $action, $$, $loginfo ) if C4::Context->preference('CronjobLog');
 }