From: Christopher Allan Webber Date: Mon, 25 Apr 2016 18:15:04 +0000 (-0500) Subject: actors: Remove unnecessary "begin". X-Git-Tag: v0.2.0~42 X-Git-Url: https://jxself.org/git/?a=commitdiff_plain;h=24964693f8dfc06f75d706acc3255d0686458ce8;p=8sync.git actors: Remove unnecessary "begin". * 8sync/systems/actors.scm (hive-process-message): Remove "begin", which was only wrapping one thing. --- diff --git a/8sync/systems/actors.scm b/8sync/systems/actors.scm index fd5391a..51a6e50 100644 --- a/8sync/systems/actors.scm +++ b/8sync/systems/actors.scm @@ -462,10 +462,9 @@ more compact following syntax: (message-handler actor message))) ;; Possibly autoreply (if (message-needs-reply message) - (begin - ;; @@: Should we give *autoreply* as the action instead of *reply*? - (reply-message actor message - #:*auto-reply* #t))) + ;; @@: Should we give *autoreply* as the action instead of *reply*? + (reply-message actor message + #:*auto-reply* #t)) ;; Returning result allows actors to possibly make a run-request ;; at the end of handling a message. ;; ... We do want that, right?