From 27e2d2d5a45ccc1103e1f8272b92ebc19b421432 Mon Sep 17 00:00:00 2001
From: skullbocks <dgikille@gmail.com>
Date: Tue, 19 Aug 2014 12:51:23 +0200
Subject: [PATCH] [WebUI #7] Fixing RPC service base

---
 lib/IntelliHome/RPC/Service/Base.pm | 10 +++++++---
 1 file changed, 7 insertions(+), 3 deletions(-)

diff --git a/lib/IntelliHome/RPC/Service/Base.pm b/lib/IntelliHome/RPC/Service/Base.pm
index 6e6437b..ad67d06 100644
--- a/lib/IntelliHome/RPC/Service/Base.pm
+++ b/lib/IntelliHome/RPC/Service/Base.pm
@@ -1,4 +1,5 @@
 package IntelliHome::RPC::Service::Base;
+
 =head1 NAME
 
 IntelliHome::RPC::Service::Base - Base class for RPC Services
@@ -32,9 +33,12 @@ has 'IntelliHome';
 sub new {
     my $self = shift;
     $self = $self->SUPER::new(@_);
-    $self->{'_rpcs'}
-        ->{ lc( ( split( "::", ( $self =~ /(.*)\=/ )[0] ) )[-1] ) }
-        ->{'with_mojo_tx'} = 1;
+
+    #   $self->{'_rpcs'}
+    #     ->{ lc( ( split( "::", ( $self =~ /(.*)\=/ )[0] ) )[-1] ) }
+    #    ->{'with_mojo_tx'} = 1;
+    $self->{'_rpcs'}->{$_}->{'with_mojo_tx'} = 1
+        for ( keys %{ $self->{'_rpcs'} } );
     return $self;
 }