Domoticz

Code: Select all

pi@raspberrypi:~/domoticz/MyDomoAtHome$ ./start2.sh
perl: warning: Setting locale failed.
perl: warning: Please check that your locale settings:
	LANGUAGE = (unset),
	LC_ALL = (unset),
	LC_CTYPE = "UTF-8",
	LANG = "en_GB.UTF-8"
    are supported and installed on your system.
perl: warning: Falling back to the standard locale ("C").
YAML Warning: Duplicate map key found. Ignoring.
   Code: YAML_LOAD_WARN_DUPLICATE_KEY
   Line: 17
   Document: 1
 at /usr/share/perl5/YAML/Mo.pm line 24
	YAML::Mo::__ANON__('YAML::Loader=HASH(0x1f775a0)', 'YAML_LOAD_WARN_DUPLICATE_KEY') called at /usr/share/perl5/YAML/Loader.pm line 359
	YAML::Loader::_parse_mapping('YAML::Loader=HASH(0x1f775a0)', '') called at /usr/share/perl5/YAML/Loader.pm line 168
	YAML::Loader::_parse_node('YAML::Loader=HASH(0x1f775a0)') called at /usr/share/perl5/YAML/Loader.pm line 103
	YAML::Loader::_parse('YAML::Loader=HASH(0x1f775a0)') called at /usr/share/perl5/YAML/Loader.pm line 25
	YAML::Loader::load('YAML::Loader=HASH(0x1f775a0)', '# appdir/environments/development.yml
# configuration file fo...') called at /usr/share/perl5/YAML.pm line 34
	YAML::Load('# appdir/environments/development.yml
# configuration file fo...') called at /usr/share/perl5/YAML.pm line 75
	YAML::LoadFile('/home/pi/domoticz/MyDomoAtHome/environments/development.yml') called at /usr/share/perl5/Dancer/Config.pm line 201
	eval {...} called at /usr/share/perl5/Dancer/Config.pm line 201
	Dancer::Config::load_settings_from_yaml('/home/pi/domoticz/MyDomoAtHome/environments/development.yml') called at /usr/share/perl5/Dancer/Config.pm line 182
	Dancer::Config::load('Dancer::Config') called at /usr/share/perl5/Dancer.pm line 258
	Dancer::import('Dancer') called at bin/app.pl line 19
	Plack::Sandbox::bin_2fapp_2epl::BEGIN() called at bin/app.pl line 19
	eval {...} called at bin/app.pl line 19
	require bin/app.pl called at (eval 7) line 3
	eval 'package Plack::Sandbox::bin_2fapp_2epl;
{
    my $app = do $_file;
    if ( !$app && ( my $error = $@ || $! )) { die $error; }
    $app;
}

;' called at /usr/share/perl5/Plack/Util.pm line 118
	Plack::Util::_load_sandbox('bin/app.pl') called at /usr/share/perl5/Plack/Util.pm line 155
	Plack::Util::load_psgi('bin/app.pl') called at /usr/share/perl5/Plack/Runner.pm line 176
	Plack::Runner::__ANON__() called at /usr/share/perl5/Plack/Runner.pm line 23
	Plack::Runner::__ANON__() called at /usr/share/perl5/Plack/Runner.pm line 23
	Plack::Runner::__ANON__() called at /usr/share/perl5/Plack/Runner.pm line 23
	Plack::Runner::__ANON__() called at /usr/share/perl5/Plack/Runner.pm line 23
	Plack::Runner::__ANON__() called at /usr/share/perl5/Plack/Loader.pm line 59
	Plack::Loader::preload_app('Plack::Loader=HASH(0x1847a98)', 'CODE(0x187eb28)') called at /usr/share/perl5/Plack/Runner.pm line 260
	Plack::Runner::run('Plack::Runner=HASH(0x1714818)') called at /usr/bin/plackup line 10
Error while loading bin/app.pl: Can't locate Time/Moment.pm in @INC (@INC contains: /home/pi/domoticz/MyDomoAtHome/bin/../lib /home/pi/domoticz/MyDomoAtHome/lib /etc/perl /usr/local/lib/perl/5.14.2 /usr/local/share/perl/5.14.2 /usr/lib/perl5 /usr/share/perl5 /usr/lib/perl/5.14 /usr/share/perl/5.14 /usr/local/lib/site_perl .) at /home/pi/domoticz/MyDomoAtHome/lib/Domo.pm line 31.
BEGIN failed--compilation aborted at /home/pi/domoticz/MyDomoAtHome/lib/Domo.pm line 31.
Compilation failed in require at bin/app.pl line 20.
BEGIN failed--compilation aborted at bin/app.pl line 20.

Code: Select all

{ "id"=> "Piwnica", "name"=> "Piwnica" },

Code: Select all

#debug("DBG:".$f->{"idx"}.":".$f->{"Type"}.":".$f->{"SubType"}."\n");

debug("DBG:".$f->{"idx"}.":".$f->{"Type"}.":".$f->{"SubType"}.":PlanID:".$f->{"PlanID"}."\n");

my $PlanID = $f->{"PlanID"};

if ($PlanID == 2) {
                                                        $feeds={params =>[],"room" => "Piwnica","type" => "DevTemperature","name" => $name, "id" =>$
} else {
                                                        $feeds={params =>[],"room" => "Temp","type" => "DevTemperature","name" => $name, "id" => $f$
}

Code: Select all

json.htm?type=plans&order=name&used=true
..
"result" : [
      {
         "Devices" : 3,
         "Name" : "Piwnica",
         "Order" : "1",
         "idx" : "2" --> ( PlanID in /json.htm?type=devices )
      }
..

Code: Select all

get '/rooms' => sub {
       #Room list
  return {"rooms" => [
                { "id"=> "Switches", "name"=> "Switches" },
                { "id"=> "Scenes", "name"=> "Scenes" },
                { "id"=> "Temp", "name"=> "Temperature" },
                { "id"=> "Weather", "name"=> "Weather" },
                { "id"=> "Utility", "name"=> "Utility" },
                { "id"=> "Piwnica", "name"=> "Piwnica" },
                        ]};