From fa55cd636bd5674c406a1db12c3e5fbb196e9db8 Mon Sep 17 00:00:00 2001 From: "Difrex(Denis Zheleztsov)" Date: Tue, 12 Aug 2014 10:46:30 +0400 Subject: [PATCH] Notify config --- II/Config.pm | 8 +++++--- II/Get.pm | 4 +++- 2 files changed, 8 insertions(+), 4 deletions(-) diff --git a/II/Config.pm b/II/Config.pm index c6c89cd..7a5ed39 100644 --- a/II/Config.pm +++ b/II/Config.pm @@ -15,15 +15,16 @@ sub new { sub load { my ($self) = @_; my $file = $self->{_file}; - + my $tiny = Config::Tiny->new(); $config = $tiny->read($file); - + my $key = $config->{auth}->{key}; my $nick = $config->{auth}->{nick}; my $host = $config->{node}->{host}; my @echoareas = split /,/, $config->{node}->{echoareas}; my $name = $config->{node}->{name}; + my $notify = $config->{notify}->{enabled}; $c = { nick => $nick, @@ -31,6 +32,7 @@ sub load { host => $host, echoareas => [@echoareas], name => $name, + notify => $notify, }; return $c; @@ -40,7 +42,7 @@ sub load { sub reload { my ($self) = @_; - my $c = II::Config->new(); + my $c = II::Config->new(); my $config = $c->load(); return $config; diff --git a/II/Get.pm b/II/Get.pm index 539e749..fd1bfe9 100644 --- a/II/Get.pm +++ b/II/Get.pm @@ -148,7 +148,9 @@ sub get_echo { # Notify my @notify_cmd = ('notify-send', 'Сеть ii', 'Есть новые сообщения'); - system(@notify_cmd) == 0 or warn "Cannot send notify: $!\n"; + if ($notify == 1) { + system(@notify_cmd) == 0 or warn "Cannot send notify: $!\n"; + } } return $msgs; }