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 fd5391ad2e7c59bf40cdbae798088b7127350f4f..51a6e50c88abfee680426b3356d2b159f0e00882 100644 (file)
--- 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?