outlook2ldap/libs/Torus.pm

##    ------------------------------------------------------------------------
##    $Id$
##    ------------------------------------------------------------------------
##    $Log$
##    ------------------------------------------------------------------------


package Torus;

use strict;
use warnings;

use base qw( DesignPattern::Object DesignPattern::Bridge );

sub _init {
  my $self = shift;
  
  $self->load("Config");
  $self->loadConfig();
  
  $self->load("Core");
  $self->initDebugLevel();
}

1;
1	joko	1.1	## ------------------------------------------------------------------------
2			## $Id$
3			## ------------------------------------------------------------------------
4			## $Log$
5			## ------------------------------------------------------------------------
6
7
8			package Torus;
9
10			use strict;
11			use warnings;
12
13			use base qw( DesignPattern::Object DesignPattern::Bridge );
14
15			sub _init {
16			my $self = shift;
17
18			$self->load("Config");
19			$self->loadConfig();
20
21			$self->load("Core");
22			$self->initDebugLevel();
23			}
24
25			1;
MailToCvsAdmin">MailToCvsAdmin	ViewVC Help
Powered by ViewVC 1.1.26