Merge pull request #209 from krkeegan/mstovenour-fix_issue_151

Fix for issue #151 - Warnings in message decoder test -- MANUAL MERGE
hollie · Jun 1, 2013 · 4f66c1f · 4f66c1f
2 parents e20d474 + f851d58
commit 4f66c1f
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/lib/Insteon/MessageDecoder.pm b/lib/Insteon/MessageDecoder.pm
@@ -519,11 +519,11 @@ sub plm_decode {
 				#include the STX for historical reasons
 				$plm_cmd_id = substr($plm_string,0,4);
 				$plm_message .= sprintf("%20s: (","PLM Command").$plm_cmd_id.") ".$plmcmd2string{$plm_cmd_id}."\n";
-				if(length($plm_string) < $plmcmdlen{$plm_cmd_id}->[0] * 2) {
+				if(length($plm_string) < $plmcmdlen{uc($plm_cmd_id)}->[0] * 2) {
 					$plm_message .= "        Message length too short for PLM command.  Not parsed\n";
 					$abort++;
-				} elsif(length($plm_string) > $plmcmdlen{$plm_cmd_id}->[0] * 2 
-						and length($plm_string) < $plmcmdlen{$plm_cmd_id}->[1] * 2) {
+				} elsif(length($plm_string) > $plmcmdlen{uc($plm_cmd_id)}->[0] * 2 
+						and length($plm_string) < $plmcmdlen{uc($plm_cmd_id)}->[1] * 2) {
 					$plm_message .= "        Message length too short for PLM command.  Not parsed\n";
 					$abort++;
 				} elsif(substr($plm_string,2,1) == '5') {