From 3efe4a24e01aff9562188d2db14edf8e1f846291 Mon Sep 17 00:00:00 2001
From: justme-1968 <justme-1968@users.noreply.github.com>
Date: Fri, 25 Nov 2016 18:12:24 +0000
Subject: [PATCH] 39_alexa.pm: added customSlotTypes get command

git-svn-id: https://svn.fhem.de/fhem/trunk@12652 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/39_alexa.pm | 24 +++++++++++++++++++-----
 1 file changed, 19 insertions(+), 5 deletions(-)

diff --git a/fhem/FHEM/39_alexa.pm b/fhem/FHEM/39_alexa.pm
index 4e088cea6..f1ae4dd6b 100644
--- a/fhem/FHEM/39_alexa.pm
+++ b/fhem/FHEM/39_alexa.pm
@@ -20,7 +20,7 @@ alexa_Initialize($)
   #$hash->{NotifyFn} = "alexa_Notify";
   $hash->{UndefFn}  = "alexa_Undefine";
   $hash->{SetFn}    = "alexa_Set";
-  #$hash->{GetFn}    = "alexa_Get";
+  $hash->{GetFn}    = "alexa_Get";
   #$hash->{AttrFn}   = "alexa_Attr";
   $hash->{AttrList} = "$readingFnAttributes";
 }
@@ -80,11 +80,11 @@ alexa_Set($$@)
 
   if( $cmd eq 'reload' ) {
     $hash->{".triggerUsed"} = 1;
-	if( @args ) {
+    if( @args ) {
       FW_directNotify($name, "reload $args[0]");
-	} else {
+    } else {
       FW_directNotify($name, 'reload');
-	}
+    }
 
     return undef;
   }
@@ -97,7 +97,13 @@ alexa_Get($$@)
 {
   my ($hash, $name, $cmd) = @_;
 
-  my $list = "";
+  my $list = "customSlotTypes";
+
+  if( lc($cmd) eq 'customslottypes' ) {
+    FW_directNotify($name, 'customSlotTypes');
+
+    return undef;
+  }
 
   return "Unknown argument $cmd, choose one of $list";
 }
@@ -175,6 +181,14 @@ alexa_Attr($$$)
     </li>
   </ul>
 
+  <a name="alexa_Get"></a>
+  <b>Get</b>
+  <ul>
+    <li>customSlotTypes<br>
+      Instructs alexa-fhem to write the Custom Slot Types for the Interaction Model to the console.
+    </li>
+  </ul>
+
   <a name="alexa_Attr"></a>
   <b>Attr</b>
   <ul>