Handle hostnames with upper-case letters
[webmin.git] / procmail / install_check.pl
1 # install_check.pl
2
3 do 'procmail-lib.pl';
4
5 # is_installed(mode)
6 # For mode 1, returns 2 if Procmail is installed and configured for use by
7 # Webmin, 1 if installed but not configured, or 0 otherwise.
8 # For mode 0, returns 1 if installed, 0 if not
9 sub is_installed
10 {
11 # Check for procmail binary
12 return 0 if (!&has_command($config{'procmail'}));
13 if ($_[0]) {
14         # Check if configured too
15         local ($mod, $err) = &check_mailserver_config();
16         return $err ? 1 : 2;
17         }
18 else {
19         return 1;
20         }
21 }
22