From 0a4b98fc347ccde9c34bf2e3406346a60d376161 Mon Sep 17 00:00:00 2001
From: justme1968 <justme1968@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Sat, 7 Sep 2013 08:46:36 +0000
Subject: [PATCH] write sketch version to internal value VERSION

git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@3869 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/36_JeeLink.pm | 12 ++++++++----
 1 file changed, 8 insertions(+), 4 deletions(-)

diff --git a/fhem/FHEM/36_JeeLink.pm b/fhem/FHEM/36_JeeLink.pm
index 1b58a2102..c9f92a774 100644
--- a/fhem/FHEM/36_JeeLink.pm
+++ b/fhem/FHEM/36_JeeLink.pm
@@ -414,10 +414,14 @@ JeeLink_Parse($$$$)
   #Log3, $name, 5, "$name: $dmsg $rssi $lqi";
 
   next if(!$dmsg || length($dmsg) < 1);            # Bogus messages
-  return if($dmsg =~ m/^\[pcaSerial/ );              # ignore startup messages
-  return if($dmsg =~ m/^Available commands:/ );      # ignore startup messages
-  return if($dmsg =~ m/^  .* - / );                  # ignore startup messages
-  return if($dmsg =~ m/^-> ack/ );                   # ignore send ack
+  return if($dmsg =~ m/^Available commands:/ );    # ignore startup messages
+  return if($dmsg =~ m/^  .* - / );                # ignore startup messages
+  return if($dmsg =~ m/^-> ack/ );                 # ignore send ack
+
+  if($dmsg =~ m/^\[pcaSerial/ ) {
+    $hash->{VERSION} = $dmsg;
+    return;
+  }
 
   $hash->{"${name}_MSGCNT"}++;
   $hash->{"${name}_TIME"} = TimeNow();