1
# See bottom of file for license and copyright information
2
package Foswiki::Configure::Checkers::MailProgram;
6
use Foswiki::Configure::Checker;
8
use base 'Foswiki::Configure::Checker';
13
return '' if ( !$Twiki::cfg{EnableEmail} );
19
$n = "Net::SMTP is <b>not</b> installed in this environment. ";
22
elsif ( !$Foswiki::cfg{SMTP}{MAILHOST} ) {
24
'Net::SMTP is installed in this environment, but {SMTP}{MAILHOST} is not defined, so the {MailProgram} <b>will</b> be used..'
30
'<em>Net::SMTP is installed in this environment, so this setting will <b>not</b> be used.</em>'
35
my $val = $Foswiki::cfg{MailProgram} || '';
38
$n .= $this->WARN("<tt>$val</tt> was not found. Check the path.");
47
# Foswiki - The Free and Open Source Wiki, http://foswiki.org/
49
# Copyright (C) 2008 Foswiki Contributors. All Rights Reserved.
50
# Foswiki Contributors are listed in the AUTHORS file in the root
51
# of this distribution. NOTE: Please extend that file, not this notice.
53
# Additional copyrights apply to some or all of the code in this
56
# Copyright (C) 2000-2006 TWiki Contributors. All Rights Reserved.
57
# TWiki Contributors are listed in the AUTHORS file in the root
58
# of this distribution. NOTE: Please extend that file, not this notice.
60
# This program is free software; you can redistribute it and/or
61
# modify it under the terms of the GNU General Public License
62
# as published by the Free Software Foundation; either version 2
63
# of the License, or (at your option) any later version. For
64
# more details read LICENSE in the root of this distribution.
66
# This program is distributed in the hope that it will be useful,
67
# but WITHOUT ANY WARRANTY; without even the implied warranty of
68
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
70
# As per the GPL, removal of this notice is prohibited.