#!/usr/bin/perl
#
# dweather - a distributed weather station
#
# Copyright (c) 2012-2014 Dirk Koopman G1TLH
#
#

use strict;
use warnings;
use 5.01001;

use lib qw(. ./blib ./lib ./DWeather/lib);

use DWeather;
use DWeather::Logger;
use DWeather::Debug;
use AnyEvent;

dbginit();
dbg("*** dweather started");

exit 0;


sub terminate
{
	my $m = shift;
	dbg("*** dweather ended" . ($m ? " $m" : ' normally'));
	exit(0);
}