1 changed files with 35 additions and 2 deletions
@ -1,3 +1,36 @@ |
|||||
bolt |
Bolt |
||||
==== |
==== |
||||
README text here. |
|
||||
|
Bolt is an automation DSL, similar to [http://fabfile.org](http://fabfile.org) |
||||
|
|
||||
|
Example: |
||||
|
|
||||
|
``` |
||||
|
#! /usr/bin/env racket |
||||
|
#lang racket |
||||
|
|
||||
|
(require "src/bolt.rkt") |
||||
|
|
||||
|
; This is based on an entry in ~/.ssh/config |
||||
|
(define metaverse |
||||
|
(remote |
||||
|
#:host "hostname" |
||||
|
#:user "alice" |
||||
|
#:key "/home/alice/.ssh/id_rsa.key")) |
||||
|
|
||||
|
(define (deploy) |
||||
|
(with-host metaverse |
||||
|
(with-shell-vars |
||||
|
(["FOO" "BAR"]) |
||||
|
(become "alice" |
||||
|
(copy-dir "../myode" "/home/alice/mycode") |
||||
|
|
||||
|
(with-cwd "/home/alice/mycode" |
||||
|
|
||||
|
(become "root" |
||||
|
(exec "pip install pipenv")) |
||||
|
|
||||
|
(with-cwd "project" |
||||
|
(exec "pipenv install"))))))) |
||||
|
(deploy) |
||||
|
``` |
||||
|
Loading…
Reference in new issue