mhop/fhem
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

:for debug only

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@18722 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
betateilchen
2019-02-24 22:23:21 +00:00
parent f4d441169a
commit 15451109c6
1 changed files with 4 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
fhem/contrib/betateilchen/57_Calendar.pm
View File

@@ -1718,7 +1718,6 @@ sub Calendar_Define($$) {
my $url = $a[4];
$url =~ /(^https?:\/\/)(.*:.*@)?(.*)/;
#$1 = https:// $2 = user:password@ $3 = url
if($2) {
# credentials found in url, store them in keystore
setKeyValue($name,$2);
@@ -1726,15 +1725,11 @@ sub Calendar_Define($$) {
$hash->{DEF} = "$a[2] $a[3] $url";
}
$url =~ /(^https?:\/\/.*google.*)(\/private-.*\/)(.*)/;
#$1 = https:// $2 = /private-.*/ $3 = url
$url =~ /(^https?:\/\/.*google.*\/)(private-.*)(\/.*)/;
if($2) {
# private key found in url, store them in keystore
$url = $1.'/credentials@/'.$3;
my $cred = $2;
$cred =~ s/^\/|\/$//g;
Debug $cred;
setKeyValue($name,$cred);
# private key found in url, store it in keystore
setKeyValue($name,$2);
$url = $1.'credentials@'.$3;
$hash->{DEF} = "$a[2] $a[3] $url";
}