diff --git a/prospect/examples/actor/file-system-lll.rkt b/prospect/examples/actor/file-system-lll.rkt
index 6a1090f..4232aea 100644
--- a/prospect/examples/actor/file-system-lll.rkt
+++ b/prospect/examples/actor/file-system-lll.rkt
@@ -37,15 +37,14 @@
     [(? patch? p)
      (transition files
                  (for-trie/list [((observe (file $name _)) (patch-added p))]
-                   (let ()
-                     (printf "At least one reader exists for ~v\n" name)
-                     (define initial-content (hash-ref files name #f))
-                     (spawn (file-observation-event-handler name)
-                            initial-content
-                            (patch-seq (core:assert (file name initial-content))
-                                       (sub (observe (file name ?)))
-                                       (sub (save (file name ?)))
-                                       (sub (delete name)))))))]
+                   (printf "At least one reader exists for ~v\n" name)
+                   (define initial-content (hash-ref files name #f))
+                   (spawn (file-observation-event-handler name)
+                          initial-content
+                          (patch-seq (core:assert (file name initial-content))
+                                     (sub (observe (file name ?)))
+                                     (sub (save (file name ?)))
+                                     (sub (delete name))))))]
     [(message (save (file name new-content)))
      (transition (hash-set files name new-content) '())]
     [(message (delete name))