notmuch-mutt: fix Perl syntax of hash index lookups

Fixes: commit 239fdbbbf0
This commit is contained in:
Paul Wise 2023-10-12 16:14:44 +08:00 committed by David Bremner
parent 6ea0b18d1e
commit 72de64034d

View file

@ -67,7 +67,7 @@ sub check_search_cache_maildir($) {
foreach my $d (@contents) { foreach my $d (@contents) {
-l "$maildir/$d" and die_dir( $maildir, "contains symlink $d"); -l "$maildir/$d" and die_dir( $maildir, "contains symlink $d");
-d "$maildir/$d" or die_dir( $maildir, "contains non-directory $d"); -d "$maildir/$d" or die_dir( $maildir, "contains non-directory $d");
exists($required[$d]) or die_dir( $maildir, "contains directory $d"); exists($required{$d}) or die_dir( $maildir, "contains directory $d");
} }
} }