Dovecot 2 doesn't need imaps and pop3s protocols

https://www.virtualmin.com/node/19776

diff --git a/dovecot/dovecot-lib.pl b/dovecot/dovecot-lib.pl
index 988d19c..dd13d34 100755 (executable)
--- a/dovecot/dovecot-lib.pl
+++ b/dovecot/dovecot-lib.pl
@@ -4,7 +4,6 @@ BEGIN { push(@INC, ".."); };
 use WebminCore;
 &init_config();
 
-@supported_protocols = ( "imap", "pop3", "imaps", "pop3s" );
 @supported_auths = ( "anonymous", "plain", "digest-md5", "cram-md5", "apop" );
 @mail_envs = ( undef, "maildir:~/Maildir", "mbox:~/mail/:INBOX=/var/mail/%u",
               "maildir:~/Maildir:mbox:~/mail/" );
@@ -392,6 +391,18 @@ foreach my $f (reverse(&unique(map { $_->{'file'} } @$conf))) {
        }
 }
 
+# get_supported_protocols()
+# Returns the list of usable protocols for the current Dovecot version
+sub get_supported_protocols
+{
+if (&get_dovecot_version() >= 2) {
+       return ( "imap", "pop3" );
+       }
+else {
+       return ( "imap", "pop3", "imaps", "pop3s" );
+       }
+}
+
 1;
 r
 

diff --git a/dovecot/edit_net.cgi b/dovecot/edit_net.cgi
index 16cd6c3..30d94aa 100755 (executable)
--- a/dovecot/edit_net.cgi
+++ b/dovecot/edit_net.cgi
@@ -9,6 +9,7 @@ print &ui_form_start("save_net.cgi", "post");
 print &ui_table_start($text{'net_header'}, "width=100%", 4);
 
 # Mail protocols
+@supported_protocols = &get_supported_protocols();
 @protos = split(/\s+/, &find_value("protocols", $conf));
 print &ui_table_row($text{'net_protocols'},
            &ui_select("protocols", \@protos,