summaryrefslogtreecommitdiff
path: root/lib/PerlDaemon/RunModules.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/PerlDaemon/RunModules.pm')
-rw-r--r--lib/PerlDaemon/RunModules.pm13
1 files changed, 10 insertions, 3 deletions
diff --git a/lib/PerlDaemon/RunModules.pm b/lib/PerlDaemon/RunModules.pm
index e806ca1..ca9ddf9 100644
--- a/lib/PerlDaemon/RunModules.pm
+++ b/lib/PerlDaemon/RunModules.pm
@@ -3,15 +3,22 @@ package PerlDaemon::RunModules;
sub new ($$$) {
my ($class, $conf) = @_;
- return bless { conf => $conf }, $class;
+ my $self = bless { conf => $conf }, $class;
+
+ my $modulesdir = $conf->{'daemon.modulesdir'};
+ my $logger = $conf->{logger};
+
+ if (-d $modulesdir) {
+ $logger->logmsg("Loading modules from $modulesdir");
+ }
+
+ return $self;
}
sub do ($) {
my $self = shift;
my $conf = $self->{conf};
my $logger = $conf->{logger};
-
- $logger->logmsg('Test');
}
1;