diff --git a/tryme.scm b/tryme.scm
index ca81cf1..5223a7e 100644
--- a/tryme.scm
+++ b/tryme.scm
@@ -18,14 +18,14 @@
                  (task "Create test directory"
                        (bind-context-vars
                         (base-dir)
-                        (install-directory base-dir)))
+                        (action:install-dir base-dir)))
                  (task "Create test file from string content"
                        (bind-context-vars
                         (base-dir)
-                        (install-file (file-name-join* base-dir "foo") #:content "Hello, world!\n"))
+                        (action:install-file (file-name-join* base-dir "foo") #:content "Hello, world!\n" #:mode #o600))
                        #:register 'foo)
                  (task "Get file status"
-                       (bind-context-vars (foo) (fs:stat foo))
+                       (bind-context-vars (foo) (action:stat foo))
                        #:register 'stat-out
                        #:triggers '(display-stat)))
         #:handlers `((display-stat . ,(handler "Display stat"