(define %os (load (string-append (dirname (current-filename)) "/vm.scm"))) (list (machine (operating-system %os) (environment managed-host-environment-type) (configuration (machine-ssh-configuration (host-name "ctftilde.koszko.org") (system "x86_64-linux") (port 22) (host-key "ssh-ed25519 AAAAC3NzaC1lZDI1NTE5AAAAII6BoIa4pfY/WCGqNTxRdobteq3J5PYELz/slkjF7Zvd") (allow-downgrades? #t)))))