aboutsummaryrefslogtreecommitdiff
path: root/tojo-tokyo
diff options
context:
space:
mode:
authorMasaya Tojo <masaya@tojo.tokyo>2021-09-10 23:55:34 +0900
committerMasaya Tojo <masaya@tojo.tokyo>2021-09-10 23:56:48 +0900
commitaefb1d36a95b7f42441cb1a7a657596d17825cbe (patch)
tree898d913951e4c9891028c06ee36cd505230f7901 /tojo-tokyo
parentb2478b55441c1788580866fe706d01257742b990 (diff)
guile-tojo-tokyo-monitoring: Fix syntax.v0.1.3
Diffstat (limited to 'tojo-tokyo')
-rw-r--r--tojo-tokyo/monitoring.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/tojo-tokyo/monitoring.scm b/tojo-tokyo/monitoring.scm
index b7f56bb..b46f0a2 100644
--- a/tojo-tokyo/monitoring.scm
+++ b/tojo-tokyo/monitoring.scm
@@ -57,7 +57,7 @@
(define-syntax-rule (heartbeat (p? body ...) ...)
(let ((heartbeat-cancel? #f))
- (when p? body ... (set! heartbeat-cancel? #t))) ...
+ (when p? body ... (set! heartbeat-cancel? #t)) ...
(unless heartbeat-cancel?
- (http-request (current-heartbeat-url))))
+ (http-request (current-heartbeat-url)))))
(export-syntax heartbeat)