From dc4dfc2d42bdc96dcb40a391dedca332ff530a1b Mon Sep 17 00:00:00 2001
From: Andreas Romeyke <andreas.romeyke@slub-dresden.de>
Date: Fri, 20 Sep 2024 14:23:38 +0200
Subject: [PATCH] - improved message report

---
 perl/exit_strategy.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/perl/exit_strategy.pl b/perl/exit_strategy.pl
index 6e135f0..0223437 100644
--- a/perl/exit_strategy.pl
+++ b/perl/exit_strategy.pl
@@ -674,10 +674,10 @@ sub parse_iexml($filename, $recovery_flag) {
     if (!defined $repid) {
       say STDERR "No repid found in file $filename, is IE intentionally purged?";
       if ($is_deleted) {
-        say STDERR "   Yes, a corresponding purge event is found.";
+        say STDERR "   Yes, a corresponding purge/delete/recover event is found.";
       }
       else {
-        say STDERR "   No, a corresponding purge event was missed. This indicates an error in archive.";
+        say STDERR "   No, a corresponding purge/delete/recover event was missed. This indicates an error in archive.";
       }
       return $ret;
     }
-- 
GitLab