"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "lib/Mail/SpamAssassin/Util/DependencyInfo.pm" between
Mail-SpamAssassin-3.4.4.tar.bz2 and Mail-SpamAssassin-3.4.5.tar.bz2

About: SpamAssassin is a mail filter that uses a wide range of heuristic tests on mail headers and body text to identify "spam" (also known as unsolicited commercial email) incl. Bayesian (statistical) spam filter and several internet-based realtime blacklists.

DependencyInfo.pm  (Mail-SpamAssassin-3.4.4.tar.bz2):DependencyInfo.pm  (Mail-SpamAssassin-3.4.5.tar.bz2)
skipping to change at line 36 skipping to change at line 36
loadplugin Mail:SpamAssassin::Util::DependencyInfo loadplugin Mail:SpamAssassin::Util::DependencyInfo
=cut =cut
package Mail::SpamAssassin::Util::DependencyInfo; package Mail::SpamAssassin::Util::DependencyInfo;
use strict; use strict;
use warnings; use warnings;
# use bytes; # use bytes;
use re 'taint'; use re 'taint';
use version 0.77;
our ( $EXIT_STATUS, $WARNINGS ); our ( $EXIT_STATUS, $WARNINGS );
our @MODULES = ( our @MODULES = (
{ {
'module' => 'Digest::SHA', 'module' => 'Digest::SHA',
'version' => 0, 'version' => 0,
'desc' => 'The Digest::SHA module is used as a cryptographic hash for some 'desc' => 'The Digest::SHA module is used as a cryptographic hash for some
tests and the Bayes subsystem. It is also required by the DKIM plugin.', tests and the Bayes subsystem. It is also required by the DKIM plugin.',
}, },
skipping to change at line 654 skipping to change at line 655
$installed = 1; $installed = 1;
} else { } else {
$eval_stat = $@ ne '' ? $@ : "errno=$!"; chomp $eval_stat; $eval_stat = $@ ne '' ? $@ : "errno=$!"; chomp $eval_stat;
# dbg("dependency: $eval_stat"); # dbg("dependency: $eval_stat");
}; };
} }
if ($installed) { if ($installed) {
eval { $module_version = $moddef->{module}->VERSION }; # wrap just in case eval { $module_version = $moddef->{module}->VERSION }; # wrap just in case
if (!$recommended_version || if (!$recommended_version ||
($module_version && $module_version >= $recommended_version)) { ($module_version && version->parse($module_version) >= version->parse($r ecommended_version))) {
$version_meets_recommended = 1; $version_meets_recommended = 1;
} }
$module_version = '' if !defined $module_version; $module_version = '' if !defined $module_version;
} }
my $errtype; my $errtype;
if (!$installed) { if (!$installed) {
$errtype = "is not installed"; $errtype = "is not installed";
if ($required_version || $recommended_version) { if ($required_version || $recommended_version) {
$errtype .= ",\n"; $errtype .= ",\n";
 End of changes. 2 change blocks. 
1 lines changed or deleted 2 lines changed or added

Home  |  About  |  Features  |  All  |  Newest  |  Dox  |  Diffs  |  RSS Feeds  |  Screenshots  |  Comments  |  Imprint  |  Privacy  |  HTTP(S)