Bug fix

b6424823 · Linshizhi · a3bdeb63 · b6424823
Commit b6424823 authored Nov 03, 2022 by Linshizhi
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

Lib.hs src/Lib.hs +1 -1

No files found.
--- a/src/Lib.hs
+++ b/src/Lib.hs
@@ -73,7 +73,7 @@ onSuccess mi = do
  current <- getCurrentTime

  if not $ status mi
-    then do let cmd = buildCMD (url mi) ("Api has recovered: " ++ url mi)
+    then do let cmd = buildCMD webHook ("Api has recovered: " ++ url mi)
            system cmd >> return (MI (url mi) True current)
    else return mi