Mailing List Archive

svn commit: rev 6664 - incubator/spamassassin/trunk/lib/Mail/SpamAssassin
Author: felicity
Date: Sun Feb 15 14:22:25 2004
New Revision: 6664

Modified:
incubator/spamassassin/trunk/lib/Mail/SpamAssassin/Conf.pm
Log:
3.0.0 isn't numeric... stupid perl. <G>

Modified: incubator/spamassassin/trunk/lib/Mail/SpamAssassin/Conf.pm
==============================================================================
--- incubator/spamassassin/trunk/lib/Mail/SpamAssassin/Conf.pm (original)
+++ incubator/spamassassin/trunk/lib/Mail/SpamAssassin/Conf.pm Sun Feb 15 14:22:25 2004
@@ -454,7 +454,13 @@
if ( $key eq 'require_version' ) {
my $req_version = $value;
$req_version =~ s/^\@\@VERSION\@\@$/$Mail::SpamAssassin::VERSION/;
- if ($Mail::SpamAssassin::VERSION != $req_version) {
+
+ # earlier versions used !=
+ # starting with 3.0.0, perl doesn't like != so it was switched to ne
+ # we should probably allow "require_version 3.0" be good for all
+ # "3.0.x" versions - tvd
+ #
+ if ($Mail::SpamAssassin::VERSION ne $req_version) {
warn "configuration file \"$self->{currentfile}\" requires version ".
"$req_version of SpamAssassin, but this is code version ".
"$Mail::SpamAssassin::VERSION. Maybe you need to use ".