diff --git a/sosc/transport.rkt b/sosc/transport.rkt
index 7f8d879..39e6d92 100644
--- a/sosc/transport.rkt
+++ b/sosc/transport.rkt
@@ -38,7 +38,7 @@
   (lambda (fd s)
     (let ((p (recv fd)))
       (cond
-       ((not p) (error "wait" "timed out"))
+       ((not p) (error "error" "Could not connect to the SuperCollider server"))
        ((not (string=? (car p) s)) (error "wait" "bad return packet" p s))
        (else p)))))