From: Christopher Allan Webber Date: Thu, 10 Aug 2017 22:00:26 +0000 (-0500) Subject: Fix unnecessary conditional check. X-Git-Url: https://jxself.org/git/?a=commitdiff_plain;h=5b14912b0f727252f4701c3fe4cb742e4192457b;p=8sync.git Fix unnecessary conditional check. * 8sync/actors.scm (actor-main-loop): Remove accidental double-when. --- diff --git a/8sync/actors.scm b/8sync/actors.scm index 6d17e05..8abe41a 100644 --- a/8sync/actors.scm +++ b/8sync/actors.scm @@ -372,10 +372,9 @@ and handling them." (lambda vals ;; Return reply if necessary (when (message-wants-reply message) - (when (message-wants-reply message) - (%<- #f actor (message-from message) '*reply* - vals ((actor-msg-id-generator actor)) - (message-id message))))))) + (%<- #f actor (message-from message) '*reply* + vals ((actor-msg-id-generator actor)) + (message-id message)))))) (const #t) (let ((err (current-error-port))) (lambda (key . args)