disabled incus
This commit is contained in:
parent
f0a93f457e
commit
add2152e3a
6 changed files with 42 additions and 21 deletions
|
@ -114,15 +114,7 @@ Home lab root: ~a
|
|||
|
||||
(define (cmd-deploy machine-name . args)
|
||||
"Deploy configuration to machine using deploy-rs"
|
||||
(let* ((base-options (parse-deploy-options args))
|
||||
;; Auto-skip checks for local machines to speed up deployment
|
||||
(local-machines '("little-rascal"))
|
||||
(should-skip-checks (member machine-name local-machines))
|
||||
(options (if should-skip-checks
|
||||
(cons '(skip-checks . #t) base-options)
|
||||
base-options)))
|
||||
(when should-skip-checks
|
||||
(log-info "Auto-skipping checks for local machine: ~a" machine-name))
|
||||
(let* ((options (parse-deploy-options args)))
|
||||
(log-info "Deploying to machine: ~a using deploy-rs" machine-name)
|
||||
(if (validate-machine-name machine-name)
|
||||
(let ((result (deploy-machine machine-name "default" options)))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue