← Back to branch summary

~clint-fewbar/ubuntu/hardy/spamassassin/remove-open-whois

« back to all changes in this revision

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

  • Committer: Bazaar Package Importer
  • Author(s): Scott Kitterman
  • Date: 2008-01-12 21:11:43 UTC
  • mfrom: (1.1.11 upstream)
  • Revision ID: james.westby@ubuntu.com-20080112211143-x6bpcnj60h9hsb6v
Tags: 3.2.4-0ubuntu1
* New upstream release
* Bump standards version to 3.7.3 without further change

Show diffs side-by-side

added added

removed removed

Lines of Context:
lib/Mail/SpamAssassin/Message.pm
524
524
  # Clean ourself up
525
525
  $self->finish_metadata();
526
526
 
527
 
  # delete temporary files
528
 
  if ($self->{'tmpfiles'}) {
529
 
    unlink @{$self->{'tmpfiles'}};
530
 
    delete $self->{'tmpfiles'};
531
 
  }
532
 
 
533
527
  # These will only be in the root Message node
534
528
  delete $self->{'mime_boundary_state'};
535
529
  delete $self->{'mbox_sep'};
543
537
 
544
538
  # Go ahead and clean up all of the Message::Node parts
545
539
  while (my $part = shift @toclean) {
 
540
    # bug 5557: windows requires tmp file be closed before it can be rm'd
 
541
    if (ref $part->{'raw'} eq 'GLOB') {
 
542
      close ($part->{'raw'});
 
543
    }
 
544
 
546
545
    delete $part->{'headers'};
547
546
    delete $part->{'raw_headers'};
548
547
    delete $part->{'header_order'};
560
559
      delete $part->{'body_parts'};
561
560
    }
562
561
  }
 
562
 
 
563
  # delete temporary files
 
564
  if ($self->{'tmpfiles'}) {
 
565
    unlink @{$self->{'tmpfiles'}};
 
566
    delete $self->{'tmpfiles'};
 
567
  }
563
568
}
564
569
 
565
570
# also use a DESTROY method, just to ensure (as much as possible) that