From 37f74f4594a8951900104d9110724dd8d7f1b307 Mon Sep 17 00:00:00 2001
From: Jacob Bachmeyer <jcb@gnu.org>
Date: Fri, 4 Aug 2023 17:27:37 -0500
Subject: [PATCH] Tidy conditional near summary report

(Aggregates in Perl, treated as Boolean values, are false if empty.)
---
 gatekeeper.pl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/gatekeeper.pl b/gatekeeper.pl
index 43f81cd..417ec9d 100755
--- a/gatekeeper.pl
+++ b/gatekeeper.pl
@@ -3520,14 +3520,14 @@ foreach my $packet (@packets) {
   }
 }
 
-if ((scalar @packets) == 0) {
-  ftp_syslog info => "No files found for processing.";
-} else {
+if (@packets) {
   ftp_syslog info => "Processing complete: "
 	     .(scalar @packets)." uploads processed.";
   system FTPINDEX_TOOL, CONF_DIR_FTPRoot, CONF_DIR_Staging
     unless IN_TEST_MODE;
   ftp_syslog info => "Updated ftpindex";
+} else {
+  ftp_syslog info => "No files found for processing.";
 }
 
 # Clean up the inbox directory and the scratch directory by removing
-- 
2.25.1