diff --git a/imperative/distributed/server/tcp.rkt b/imperative/distributed/server/tcp.rkt
index 08497a7..9acd227 100644
--- a/imperative/distributed/server/tcp.rkt
+++ b/imperative/distributed/server/tcp.rkt
@@ -22,7 +22,7 @@
       (send! (tcp-out id (encode p)))
       (when (Err? p) (stop-current-facet))))
 
-(define default-tcp-server-port 8001)
+(define default-tcp-server-port 21369)
 
 (define (spawn-tcp-server! [port default-tcp-server-port])
   (spawn #:name 'tcp-server-listener