update DWeather::Debug, Logger, Serial

[dweather.git] / DWeather / dweather

diff --git a/DWeather/dweather b/DWeather/dweather
index 3844fcc7041933bd170854c19a7ce5de07f55ba1..b51543b3727abcfd6079c20af8572d0afd0510e3 100644 (file)
--- a/DWeather/dweather
+++ b/DWeather/dweather
@@ -2,12 +2,13 @@
 #
 # dweather - a distributed weather station
 #
-# copyright (c) 2012 Dirk Koopman G1TLH
+# Copyright (c) 2012-2014 Dirk Koopman G1TLH
 #
 #
 
 use strict;
 use warnings;
+use 5.01001;
 
 use lib qw(. ./blib ./lib ./DWeather/lib);
 
@@ -16,15 +17,9 @@ use DWeather::Logger;
 use DWeather::Debug;
 use AnyEvent;
 
-my $sigint = AnyEvent->signal (signal => "INT", cb => sub { my $sig = shift; terminate("on signal $sig")});
-my $sigterm = AnyEvent->signal (signal => "TERM", cb => sub { my $sig = shift; terminate("on signal $sig")});
-
 dbginit();
 dbg("*** dweather started");
 
-my $cv = AnyEvent->condvar;
-my @res = $cv->recv;
-
 exit 0;