Goofy whitespace in signal-select-result.

diff --git a/src/runtime/thread.scm b/src/runtime/thread.scm
index 3d987d7a86fe3b8c2073dacf9fd12ba6a7cbad83..e3bd9cc17c3a4b1e656a54c1292a7e697552c8f3 100644 (file)
--- a/src/runtime/thread.scm
+++ b/src/runtime/thread.scm
@@ -676,7 +676,7 @@ USA.
                                  (vector-ref result 2)))
        ((eq? 'PROCESS-STATUS-CHANGE result)
         (%handle-subprocess-status-change))
-        ((eq? 'INTERRUPT result)
+       ((eq? 'INTERRUPT result)
         (unlock)
         (handle-interrupts)
         (lock))))