From 2b6e3b924b5bd821e87bd9458382e60f18f1b6d5 Mon Sep 17 00:00:00 2001
From: borisneubert <>
Date: Sun, 8 Jul 2012 08:28:37 +0000
Subject: [PATCH] fixed some "uninitialized string" warnings

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

diff --git a/fhem/FHEM/02_RSS.pm b/fhem/FHEM/02_RSS.pm
index 99f5e8481..f31961d46 100644
--- a/fhem/FHEM/02_RSS.pm
+++ b/fhem/FHEM/02_RSS.pm
@@ -216,6 +216,7 @@ RSS_color {
 sub
 RSS_itemText {
   my ($S,$x,$y,$text,%params)= @_;
+  return unless(defined($text));
   ($x,$y)= RSS_xy($S,$x,$y);
   $S->stringFT(RSS_color($S,$params{rgb}),$params{font},$params{pt},0,$x,$y,$text);
 }
diff --git a/fhem/FHEM/57_Calendar.pm b/fhem/FHEM/57_Calendar.pm
index 865ac5b8f..74fc9bd74 100644
--- a/fhem/FHEM/57_Calendar.pm
+++ b/fhem/FHEM/57_Calendar.pm
@@ -56,6 +56,7 @@ sub addproperty {
   my ($key,$parts)= split(";", $property,2);
   #main::debug "key= $key parts= $parts";
   $parts= "" unless(defined($parts));
+  $parameter= "" unless(defined($parameter));
   $self->{properties}{$key}= {
       PARTS => "$parts",
       VALUE => "$parameter"
@@ -336,7 +337,7 @@ sub fromVEvent {
     # weekly
     #
     if($freq eq "WEEKLY") {
-      my @weekdays= split(",",$r{"BYDAY"});
+      # my @weekdays= split(",",$r{"BYDAY"});# BYDAY is not always set
     }
   }