From e5bff72e57c9ac8bc5c8217b2932a6cbcd3090e5 Mon Sep 17 00:00:00 2001 From: Jamie Cameron Date: Tue, 19 Aug 2025 14:25:01 -0700 Subject: [PATCH] Return a useful error if IPC::Open3 is missing --- mailboxes/folders-lib.pl | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/mailboxes/folders-lib.pl b/mailboxes/folders-lib.pl index 8443e3ecf..6dab75517 100755 --- a/mailboxes/folders-lib.pl +++ b/mailboxes/folders-lib.pl @@ -2075,9 +2075,10 @@ if (!$h && $folder->{'server'} eq '*') { $imapcmd || return (0, "Dovecot imap command not found"); $imapcmd .= " -u ".($folder->{'user'} eq "*" ? $remote_user : $folder->{'user'}); print DEBUG "Running IMAP server $imapcmd\n"; - #&foreign_require("proc"); - #my ($h, $pid) = &proc::pty_process_exec($imapcmd); - use IPC::Open3; + eval "use IPC::Open3"; + if ($@) { + return (0, "Missing IPC::Open3 Perl module"); + } my ($writefh, $readfh, $errorfh); my $pid = open3($writefh, $readfh, $errorfh, $imapcmd); print DEBUG "pid=$pid\n";