Test (and bugfix) conditions

This commit is contained in:
Ray Miller 2025-01-10 17:31:11 +00:00
parent 875ce167e9
commit dba8ca3153
Signed by: ray
GPG key ID: 043F786C4CD681B8
2 changed files with 12 additions and 9 deletions

View file

@ -1,7 +1,8 @@
(use-modules
(ice-9 filesystem)
(ordo condition)
(ordo connection)
(ordo context )
(ordo context)
(ordo action filesystem)
(ordo play)
(ordo task)
@ -18,7 +19,8 @@
(task "Create test directory"
(bind-context-vars
(base-dir)
(action:install-dir base-dir)))
(action:install-dir base-dir))
#:condition (bind-context-vars (base-dir) (negate (cond:directory? base-dir))))
(task "Create test file from string content"
(bind-context-vars
(base-dir)