Gitweb:
https://git.exim.org/exim.git/commitdiff/6a8ea81fe457204adbaaedb0c1c6690c9464b6c0
Commit: 6a8ea81fe457204adbaaedb0c1c6690c9464b6c0
Parent: 67072519f5db4f3b3df763fda9de20f280d31394
Author: Wolfgang Breyha <wbreyha@???>
AuthorDate: Fri Oct 20 15:02:38 2023 +0100
Committer: Jeremy Harris <jgh146exb@???>
CommitDate: Sat Oct 21 14:08:36 2023 +0100
Fix exipick for new message-id format
Broken-by: 46a36afae41f
---
src/src/exipick.src | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/src/src/exipick.src b/src/src/exipick.src
index c3830f4a5..ba847f14f 100644
--- a/src/src/exipick.src
+++ b/src/src/exipick.src
@@ -434,10 +434,10 @@ sub get_all_msgs {
if ($e =~ /^[a-zA-Z0-9]$/) {
opendir(DD, "$d/$e") || next;
foreach my $f (grep !/^\./, readdir(DD)) {
- push(@m, { message => $1, path => "$d/$e" }) if ($f =~ /^(.{16})-H$/);
+ push(@m, { message => $1, path => "$d/$e" }) if ($f =~ /^(.{23}|.{16})-H$/);
}
closedir(DD);
- } elsif ($e =~ /^(.{16})-H$/) {
+ } elsif ($e =~ /^(.{23}|.{16})-H$/) {
push(@m, { message => $1, path => $d });
}
}
--
## subscription configuration (requires account):
##
https://lists.exim.org/mailman3/postorius/lists/exim-cvs.lists.exim.org/
## unsubscribe (doesn't require an account):
## exim-cvs-unsubscribe@???
## Exim details at
http://www.exim.org/
## Please use the Wiki with this list -
http://wiki.exim.org/