diff --git a/ordo/action/filesystem.scm b/ordo/action/filesystem.scm
index 009363d..87e421b 100644
--- a/ordo/action/filesystem.scm
+++ b/ordo/action/filesystem.scm
@@ -12,8 +12,8 @@
             install-dir
             install-file
             file-info
-            delete
-            link))
+            remove-file
+            create-link))
 
 (define* (file-info conn #:key path (atime? #t) (ctime? #t))
   (define (parse-stat-result s)
@@ -43,15 +43,13 @@
        (let ((st-after (file-info conn #:path path #:atime? #f #:ctime? #f)))
          (not (equal? st-before st-after)))))))
 
-(define* (delete conn #:key path (recurse? #f))
+(define* (remove-file conn #:key path (recurse? #f))
   (changed-if-stat-changed
    conn path
-   (remote-cmd conn "rm" "-f"
-               (when recurse? "-r")
-               path
+   (remote-cmd conn "rm" "-f" (when recurse? "-r") path
                #:check? #t)))
 
-(define* (link conn #:key target link-name (symbolic? #f) (force? #t) (backup? #f))
+(define* (create-link conn #:key target link-name (symbolic? #f) (force? #t) (backup? #f))
   "Create a link to @code{target} with the name @code{link-name}."
   (changed-if-stat-changed
    conn link-name