1 files changed, 10 insertions, 1 deletions
diff --git a/community-garden.scm b/community-garden.scm
index a121b39..5c8c383 100644
--- a/community-garden.scm
+++ b/community-garden.scm
@@ -16,6 +16,9 @@
              (community-garden view)
              (goblins)
              (goblins vrun)
+             (goblins ocapn ids)
+             (goblins ocapn captp)
+             (goblins ocapn netlayer onion)
              (ice-9 atomic)
              (oop goops))
 
@@ -25,7 +28,6 @@
 (define-vat-run garden-run garden-vat)
 (define-vat-run catbird-run catbird-vat)
 (define-vat-run alice-run alice-vat)
-
 (define the-botanist (garden-run (spawn ^botanist)))
 (define the-garden-gate (garden-run (spawn ^garden-gate the-botanist)))
 (define sunflower/approved
@@ -38,6 +40,13 @@
           "Spritely Institute Community Garden"
           (make-garden-bed 8 8)
           the-garden-gate)))
+(define onion-netlayer (garden-run (new-onion-netlayer)))
+(define mycapn
+  (garden-run
+   (let* ((mycapn (spawn-mycapn onion-netlayer))
+          (garden-sref ($ mycapn 'register our-garden 'onion)))
+     (format #t "edit-garden Dave ~a\n" (ocapn-id->string garden-sref))
+     mycapn)))
 
 (define alice (alice-run (spawn ^gardener "Alice" our-garden)))
 (alice-run ($ alice 'plant 1 1 sunflower/approved))