From 5e1c2702647295073bb97958994a2798a1ef1476 Mon Sep 17 00:00:00 2001
From: Ilia Ross <ilia@ross.gdn>
Date: Mon, 6 Nov 2023 13:34:59 +0200
Subject: [PATCH] Fix to `quotemeta` variables in glob

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

diff --git a/mailbox/mailbox-lib.pl b/mailbox/mailbox-lib.pl
index b03a90db..8cd48b9e 100755
--- a/mailbox/mailbox-lib.pl
+++ b/mailbox/mailbox-lib.pl
@@ -1058,7 +1058,7 @@ sub delete_folder
 # Delete mbox or Maildir index
 if ($folder->{'type'} == 0) {
 	my $ifile = &user_index_file($folder->{'file'});
-	unlink(glob("$ifile.*"), $ifile);
+	unlink(glob("\Q$ifile\E.*"), $ifile);
 	}
 elsif ($folder->{'type'} == 1) {
 	my $cachefile = &get_maildir_cachefile($folder->{'file'});
@@ -1067,7 +1067,7 @@ sub delete_folder
 
 # Delete sort index
 my $ifile = &folder_new_sort_index_file($folder);
-unlink(glob("$ifile.*"), $ifile);
+unlink(glob("\Q$ifile\E.*"), $ifile);
 
 # Delete sort direction file
 my $file = &folder_name($folder);