From 1bb5d562679d485ad935604653def8bbc0ddca5e Mon Sep 17 00:00:00 2001
From: borisneubert <>
Date: Fri, 4 Jul 2014 17:19:57 +0000
Subject: [PATCH] do no parse empty lines in 57_Calendar.p

git-svn-id: https://svn.fhem.de/fhem/trunk@6197 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/CHANGED             | 1 +
 fhem/FHEM/57_Calendar.pm | 1 +
 2 files changed, 2 insertions(+)

diff --git a/fhem/CHANGED b/fhem/CHANGED
index 585141e29..8dae5da4e 100644
--- a/fhem/CHANGED
+++ b/fhem/CHANGED
@@ -1,5 +1,6 @@
 # Add changes at the top of the list. Keep it in ASCII, and 80-char wide.
 # Do not insert empty lines here, update check depends on it.
+  - change:  do no parse empty lines in 57_Calendar.pm
   - bugfix:  10_SOMFY.pm: save enc-key and rolling-code as reading instead of attribute
                          to prevent loss of control after FHEM restart.
   - feature: new module 10_SOMFY.pm to support Somfy RTS blinds
diff --git a/fhem/FHEM/57_Calendar.pm b/fhem/FHEM/57_Calendar.pm
index 444a69be5..a423f25b2 100644
--- a/fhem/FHEM/57_Calendar.pm
+++ b/fhem/FHEM/57_Calendar.pm
@@ -108,6 +108,7 @@ sub parseSub {
     $line =~ s/[\x0D]//; # chomp will not remove the CR
     #main::Debug "$ln: $line";
     $ln++;
+    next if($line eq ""); # remove empty line
     last if($line =~ m/^END:.*$/);
     if($line =~ m/^BEGIN:(.*)$/) {
       my $entry= ICal::Entry->new($1);