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
This commit is contained in:
@@ -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;
|
||||
}
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user