From 038cddffa99e57f4e36aa3e8ed66dbb31415abde Mon Sep 17 00:00:00 2001
From: justme1968 <justme1968@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Sat, 18 Feb 2017 15:28:59 +0000
Subject: [PATCH] 39_alexa.pm: allow > 25 perl code intents after next
 alexa-fhem update

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

diff --git a/fhem/FHEM/39_alexa.pm b/fhem/FHEM/39_alexa.pm
index 5498816a0..6050d3eda 100644
--- a/fhem/FHEM/39_alexa.pm
+++ b/fhem/FHEM/39_alexa.pm
@@ -412,7 +412,11 @@ Log 1, Dumper $characteristicsOfIntent;
           $intent_name = 'FHEMperlCodeIntent';
           my $i = 1;
           while( defined($intents{$intent_name}) ) {
-            $intent_name = "FHEMperlCodeIntent".chr(65+$i);
+            if( $i < 26 ) {
+              $intent_name = "FHEMperlCodeIntent".chr(65+$i);
+            } else {
+              $intent_name = "FHEMperlCodeIntent".chr(64+int($i/26)).chr(65+$i%26);
+            }
             ++$i;
           }
         }