From 5b14912b0f727252f4701c3fe4cb742e4192457b Mon Sep 17 00:00:00 2001 From: Christopher Allan Webber Date: Thu, 10 Aug 2017 17:00:26 -0500 Subject: [PATCH] Fix unnecessary conditional check. * 8sync/actors.scm (actor-main-loop): Remove accidental double-when. --- 8sync/actors.scm | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) 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) -- 2.31.1