diff --git a/collects/racket/place/distributed.rkt b/collects/racket/place/distributed.rkt
index ce87e49363..537a1ed847 100644
--- a/collects/racket/place/distributed.rkt
+++ b/collects/racket/place/distributed.rkt
@@ -1409,7 +1409,7 @@
                             #:thunk [thunk #f])
     (define-values (node pl)
       (spawn-node-supervise-place-at/exec host 
-                            (mk-place-creation-addr (->writeable-module-path place-path) place-func thunk) 
+                            (mk-place-creation-addr (->writeable-module-path place-path) place-func #f thunk) 
                             #:listen-port listen-port
                             #:initial-message initial-message
                             #:racket-path racketpath
@@ -1427,7 +1427,7 @@
                             #:named [named #f]
                             #:thunk [thunk #f])
     (spawn-node-supervise-place-at/exec host 
-                            (mk-place-creation-addr (->writeable-module-path place-path) place-func thunk) 
+                            (mk-place-creation-addr (->writeable-module-path place-path) place-func #f thunk) 
                             #:listen-port listen-port
                             #:initial-message initial-message
                             #:racket-path racketpath
diff --git a/collects/racket/place/distributed/examples/multiple/master.rkt b/collects/racket/place/distributed/examples/multiple/master.rkt
index a766e24601..5307cc6ee5 100644
--- a/collects/racket/place/distributed/examples/multiple/master.rkt
+++ b/collects/racket/place/distributed/examples/multiple/master.rkt
@@ -25,7 +25,7 @@
 
 
 (define (main)
-  (define bank-node (spawn-node-with--place-at "localhost" #:listen-port 6344 bank-path 'make-bank))
+  (define bank-node (spawn-node-with-place-at "localhost" #:listen-port 6344 bank-path 'make-bank))
   (define bank-place (send bank-node get-first-place))
   (message-router
     (spawn-place-worker-at 6341 "ONE")
diff --git a/collects/racket/place/distributed/examples/restart/master.rkt b/collects/racket/place/distributed/examples/restart/master.rkt
index 5738ea9cf1..7c939b1587 100644
--- a/collects/racket/place/distributed/examples/restart/master.rkt
+++ b/collects/racket/place/distributed/examples/restart/master.rkt
@@ -15,6 +15,6 @@
 
 (define (main)
   (message-router
-    (spawn-node-with-place-thunk-at "localhost" #:listen-port 6345 (quote-module-name) 'wait-place-thunk #:restart-on-exit #t)
+    (spawn-node-with-place-at "localhost" #:listen-port 6345 (quote-module-name) 'wait-place-thunk #:thunk #t #:restart-on-exit #t)
     (after-seconds 50
       (exit 0))))
diff --git a/collects/racket/place/distributed/examples/restart/restarter.rkt b/collects/racket/place/distributed/examples/restart/restarter.rkt
index 97a9386f57..786d1a2014 100644
--- a/collects/racket/place/distributed/examples/restart/restarter.rkt
+++ b/collects/racket/place/distributed/examples/restart/restarter.rkt
@@ -15,5 +15,5 @@
 
 (define (main)
   (message-router
-    (spawn-node-with-place-thunk-at "localhost" #:listen-port 6345 (quote-module-name) 'wait-place-thunk 
-                                       #:restart-on-exit (restart-every 5 #:retry 3))))
+    (spawn-node-with-place-at "localhost" #:listen-port 6345 (quote-module-name) 'wait-place-thunk 
+                              #:thunk #t #:restart-on-exit (restart-every 5 #:retry 3))))
diff --git a/collects/tests/racket/place/distributed/distributed.rkt b/collects/tests/racket/place/distributed/distributed.rkt
index ee1a166fb3..2e4c637ce4 100644
--- a/collects/tests/racket/place/distributed/distributed.rkt
+++ b/collects/tests/racket/place/distributed/distributed.rkt
@@ -25,8 +25,8 @@
         ok?)))
 
   (define remote-node (spawn-remote-racket-node "localhost" #:listen-port 6344))
-  (define tuple-place (supervise-named-dynamic-place-at remote-node 'tuple-server tuple-path 'make-tuple-server))
-  (define bank-place  (supervise-dynamic-place-at remote-node bank-path 'make-bank))
+  (define tuple-place (supervise-place-at remote-node #:named 'tuple-server tuple-path 'make-tuple-server))
+  (define bank-place  (supervise-place-at remote-node bank-path 'make-bank))
 
   (message-router
     remote-node
diff --git a/collects/tests/racket/place/distributed/restarter.rkt b/collects/tests/racket/place/distributed/restarter.rkt
index 15aaea4fcd..326bb9f1d7 100644
--- a/collects/tests/racket/place/distributed/restarter.rkt
+++ b/collects/tests/racket/place/distributed/restarter.rkt
@@ -15,11 +15,12 @@
 
 (define (main)
   (message-router
-    (spawn-node-with-place-thunk-at
+    (spawn-node-with-place-at
       "localhost"
       #:listen-port 6345
       (quote-module-name)
       'wait-place-thunk
+      #:thunk #t
       #:restart-on-exit (restart-every 5
                                        #:retry 3
                                        #:on-final-fail (lambda ()