From a47db60a745c7570964f95f12a0e10df2273ef8c Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Tue, 13 Apr 2010 05:25:13 -0700 Subject: [PATCH] mason.server.notify: fix heartbeat logic --- extra/mason/server/notify/notify.factor | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/extra/mason/server/notify/notify.factor b/extra/mason/server/notify/notify.factor index 3303749c4f..bfa1027d92 100644 --- a/extra/mason/server/notify/notify.factor +++ b/extra/mason/server/notify/notify.factor @@ -25,11 +25,9 @@ SYMBOLS: host-name target-os target-cpu message message-arg ; target-cpu get >>cpu dup select-tuple [ ] [ dup insert-tuple ] ?if ; -: heartbeat ( -- ) - now >>heartbeat-timestamp ; +: heartbeat ( builder -- ) now >>heartbeat-timestamp drop ; -: git-id ( builder id -- ) - >>current-git-id +starting+ >>status drop ; +: git-id ( builder id -- ) >>current-git-id +starting+ >>status drop ; : make-vm ( builder -- ) +make-vm+ >>status drop ;