summaryrefslogtreecommitdiff
path: root/lib/App/XScreenSaver/DBus.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/App/XScreenSaver/DBus.pm')
-rw-r--r--lib/App/XScreenSaver/DBus.pm13
1 files changed, 13 insertions, 0 deletions
diff --git a/lib/App/XScreenSaver/DBus.pm b/lib/App/XScreenSaver/DBus.pm
index 2ab384a..db9355f 100644
--- a/lib/App/XScreenSaver/DBus.pm
+++ b/lib/App/XScreenSaver/DBus.pm
@@ -6,6 +6,7 @@ use Net::DBus::Reactor;
use Log::Any;
use App::XScreenSaver::DBus::InhibitSleep;
use App::XScreenSaver::DBus::Saver;
+use App::XScreenSaver::DBus::Lock;
# VERSION
# ABSTRACT: main application class
@@ -49,6 +50,17 @@ has saver => (
},
);
+=attr C<lock>
+
+instance of L<< C<App::XScreenSaver::DBus::Lock> >>.
+
+=cut
+
+has lock => (
+ is => 'lazy',
+ builder => sub { App::XScreenSaver::DBus::Lock->new() },
+);
+
=attr C<log>
a logger
@@ -67,6 +79,7 @@ not return
sub run($self) {
$self->inhibit_sleep->start();
$self->saver->start();
+ $self->lock->start();
$self->reactor->run;
}