diff --git a/C4/Log.pm b/C4/Log.pm
index b38fb9c163..05a81f1a26 100644
--- a/C4/Log.pm
+++ b/C4/Log.pm
@@ -90,10 +90,9 @@ sub logaction {
         }
     }
 
-    my $script =
-        $interface eq 'cron'        ? basename($0)
-      : $interface eq 'commandline' ? basename($0)
-      :                               undef;
+    my $script = ( $interface eq 'cron' or $interface eq 'commandline' )
+        ? basename($0)
+        : undef;
 
     my $dbh = C4::Context->dbh;
     my $sth=$dbh->prepare("Insert into action_logs (timestamp,user,module,action,object,info,interface,script) values (now(),?,?,?,?,?,?,?)");