From 9aa9a8310ccd0c57c001fe17bdcb539afb3a3450 Mon Sep 17 00:00:00 2001
From: StefanStrobel <>
Date: Thu, 7 Jan 2021 13:07:42 +0000
Subject: [PATCH] 98_HTTPMOD: updated tests

git-svn-id: https://svn.fhem.de/fhem/trunk@23486 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/t/FHEM/98_HTTPMOD/50_Replacements.cfg | 21 ++++++++++++++-------
 fhem/t/FHEM/98_HTTPMOD/99_evalExpr.cfg     |  2 +-
 2 files changed, 15 insertions(+), 8 deletions(-)

diff --git a/fhem/t/FHEM/98_HTTPMOD/50_Replacements.cfg b/fhem/t/FHEM/98_HTTPMOD/50_Replacements.cfg
index ce596513b..efc3b7969 100644
--- a/fhem/t/FHEM/98_HTTPMOD/50_Replacements.cfg
+++ b/fhem/t/FHEM/98_HTTPMOD/50_Replacements.cfg
@@ -1,11 +1,18 @@
-defmod GeoTest HTTPMOD none 0
-attr GeoTest verbose 3
+define GeoTest HTTPMOD none 0
+attr GeoTest minSendDelay 0
+attr GeoTest verbose 5
 attr GeoTest enableControlSet 1
-attr GeoTest get01Name Tag01
-attr GeoTest get01Poll 1
-attr GeoTest get01Regex (?s)Zeit auswählen<br>(?<Tag01_WochenTag>[A-Za-z]+).-.(?<Tag01_Datum>[0-9\.]{10}).*?<td>09:15<\/td><td>(?<Tag01_09Uhr>.*?)<\/td>.*?<td>12:15<\/td><td>(?<Tag01_12Uhr>.*?)<\/td>
-attr GeoTest get01Replacement01Value {strftime("%d.%m.%Y", localtime( time))}
-attr GeoTest getURL file://geocache-planer.de/CAL/anmeldung.php?date=%%date%%&CALID=XYZ
+
 attr GeoTest replacement01Mode expression
 attr GeoTest replacement01Regex %%date%%
 
+attr GeoTest get01Name Tag01
+attr GeoTest get01Poll 1
+attr GeoTest get01Regex (?s)Zeit auswählen<br>(?<Tag01_WochenTag>[A-Za-z]+).-.(?<Tag01_Datum>[0-9\.]{10}).*?<td>09:15<\/td><td>(?<Tag01_09Uhr>.*?)<\/td>.*?<td>12:15<\/td><td>(?<Tag01_12Uhr>.*?)<\/td>
+attr GeoTest getURL file://geocache-planer.de/CAL/anmeldung.php?date=%%date%%&CALID=XYZ
+attr GeoTest get01Replacement01Value {strftime("%d.%m.%Y", localtime( time))}
+
+attr GeoTest get02Name Test2
+#attr GeoTest get02Replacement01Value {my $NAME = "GeoTest" ;;fhem("deletereading ".$NAME." message");;fhem("deletereading ".$NAME." auth.*");;my @chars=('a'..'z','A'..'Z','0'..'9'); my $r; foreach(1..16) {$r.=$chars[rand @chars];};; fhem("setreading ".$NAME." auth_randomString64 ".$r);; $r;;}
+attr GeoTest get02Replacement01Value {my $NAME = "GeoTest" ;;fhem("deletereading ".$NAME." message");;fhem("deletereading ".$NAME." auth.*");;my @chars=('a'..'z','A'..'Z','0'..'9');; my $r;; foreach(1..16) {$r.=$chars[rand @chars];;};; fhem("setreading ".$NAME." auth_randomString64 ".$r);; $r;;}
+attr GeoTest get02Poll 1
diff --git a/fhem/t/FHEM/98_HTTPMOD/99_evalExpr.cfg b/fhem/t/FHEM/98_HTTPMOD/99_evalExpr.cfg
index 1d099cc00..25ceb57f9 100644
--- a/fhem/t/FHEM/98_HTTPMOD/99_evalExpr.cfg
+++ b/fhem/t/FHEM/98_HTTPMOD/99_evalExpr.cfg
@@ -1,4 +1,4 @@
 define H2 HTTPMOD file://t/FHEM/98_HTTPMOD/JSON 0
-attr H2 verbose 3
+attr H2 verbose 5
 attr H2 get01Name TestGet
 attr H2 get01Data Post Data for Test