Ignore:
Timestamp:
12/13/08 16:58:36 (3 years ago)
Author:
CrawfordCurrie
Message:

Item456: work in progress

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/MailInContrib/tools/mailincron

    r1050 r1323  
    44# 
    55# Copyright (C) 2005 TWiki Contributors. All Rights Reserved. 
    6 # TWiki Contributors are listed in the AUTHORS file in the root 
     6# Copyright (C) 2008 Foswiki Contributors. All Rights Reserved. 
     7# Foswiki Contributors are listed in the AUTHORS file in the root 
    78# of this distribution. 
    89# NOTE: Please extend that file, not this notice. 
     
    2627} 
    2728 
    28 use TWiki::Contrib::MailInContrib; 
     29use Foswiki::Contrib::MailInContrib; 
    2930 
    3031my $debug; 
     
    4344} 
    4445 
    45 my $twiki; 
    46 my $folders; 
    47 if( eval 'defined($TWiki::wikiversion)' ) { 
    48     TWiki::initialize(); 
    49     $twiki = undef; 
    50     eval "use LocalSite.cfg"; 
    51 } else { 
    52     $twiki = new TWiki(); 
    53     $TWiki::Plugins::SESSION = $twiki; 
    54 } 
    55 $folders = $TWiki::cfg{MailInContrib}; 
    56 my $processor = new TWiki::Contrib::MailInContrib($twiki, $debug); 
     46my $session = new Foswiki(); 
     47my $folders = $Foswiki::cfg{MailInContrib}; 
     48my $processor = new Foswiki::Contrib::MailInContrib($session, $debug); 
    5749foreach my $folder ( @$folders ) { 
    5850    $processor->processInbox( $folder ); 
Note: See TracChangeset for help on using the changeset viewer.