tweak for HttpUtils logging and minor fix
git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@4858 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
@@ -829,7 +829,7 @@ sub Calendar_GetUpdate($) {
|
|||||||
my $ics;
|
my $ics;
|
||||||
|
|
||||||
if($type eq "url"){
|
if($type eq "url"){
|
||||||
$ics= GetFileFromURLQuiet($url) if($type eq "url");
|
$ics= GetFileFromURLQuiet($url,10,undef,0,1) if($type eq "url");
|
||||||
} elsif($type eq "file") {
|
} elsif($type eq "file") {
|
||||||
if(open(ICSFILE, $url)) {
|
if(open(ICSFILE, $url)) {
|
||||||
while(<ICSFILE>) {
|
while(<ICSFILE>) {
|
||||||
@@ -962,7 +962,7 @@ sub Calendar_Get($@) {
|
|||||||
if(defined($a[3])) {
|
if(defined($a[3])) {
|
||||||
my $keep= $a[3];
|
my $keep= $a[3];
|
||||||
return "Argument $keep is not a number." unless($keep =~ /\d+/);
|
return "Argument $keep is not a number." unless($keep =~ /\d+/);
|
||||||
splice @texts, $keep if($#texts>= 0);
|
splice @texts, $keep if($#texts>= 0 && $#texts >= $keep);
|
||||||
}
|
}
|
||||||
return join("\n", @texts);
|
return join("\n", @texts);
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user