~ubuntu-branches/ubuntu/natty/spamassassin/natty

« back to all changes in this revision

Viewing changes to lib/Mail/SpamAssassin/Dns.pm

  • Committer: Package Import Robot
  • Author(s): Noah Meyerhans
  • Date: 2010-03-21 23:20:31 UTC
  • mfrom: (0.4.1) (1.4.1) (29.2.1 maverick)
  • Revision ID: package-import@ubuntu.com-20100321232031-ryqjxh9cx27epnka
Tags: 3.3.1-1
* New upstream version.
* Update several patches now that bugfixes have been incorporated
  upstream.

Show diffs side-by-side

added added

removed removed

Lines of Context:
29
29
use Mail::SpamAssassin::PerMsgStatus;
30
30
use Mail::SpamAssassin::AsyncLoop;
31
31
use Mail::SpamAssassin::Constants qw(:ip);
32
 
use Mail::SpamAssassin::Util qw(untaint_var);
 
32
use Mail::SpamAssassin::Util qw(untaint_var am_running_on_windows);
33
33
 
34
34
use File::Spec;
35
35
use IO::Socket;
635
635
 
636
636
  # Check version numbers - runtime check only
637
637
  if (defined $Net::DNS::VERSION) {
638
 
    if (Mail::SpamAssassin::Util::am_running_on_windows()) {
 
638
    if (am_running_on_windows()) {
639
639
      if ($Net::DNS::VERSION < 0.46) {
640
640
        warn("dns: Net::DNS version is $Net::DNS::VERSION, but need 0.46 for Win32");
641
641
        return $IS_DNS_AVAILABLE;
751
751
sub enter_helper_run_mode {
752
752
  my ($self) = @_;
753
753
 
754
 
  dbg("info: entering helper-app run mode");
 
754
  dbg("dns: entering helper-app run mode");
755
755
  $self->{old_slash} = $/;              # Razor pollutes this
756
756
  %{$self->{old_env}} = ();
757
757
  if ( defined %ENV ) {
787
787
sub leave_helper_run_mode {
788
788
  my ($self) = @_;
789
789
 
790
 
  dbg("info: leaving helper-app run mode");
 
790
  dbg("dns: leaving helper-app run mode");
791
791
  $/ = $self->{old_slash};
792
792
  %ENV = %{$self->{old_env}};
793
793