17 lines
644 B
Scheme
17 lines
644 B
Scheme
(use-modules (ordo playbook))
|
|
|
|
(playbook
|
|
#:name "Example playbook"
|
|
#:vars '((foo . 1) (bar . "baz"))
|
|
#:plays (list
|
|
(play #:name "Example play"
|
|
#:host "localhost"
|
|
#:tasks (list
|
|
(task #:name "First task"
|
|
#:action (const #t))
|
|
(task #:name "Second task"
|
|
#:action (lambda (conn)
|
|
(trigger-handler! 'foo))))
|
|
#:handlers (list
|
|
(handler #:name 'foo
|
|
#:action (const #f))))))
|