Skip to content

Instantly share code, notes, and snippets.

@sundbp

sundbp/example.clj

Created December 3, 2012 15:59
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save sundbp/4195927 to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save sundbp/4195927 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
example.clj
(defn setup-hetzner-kvm-server
"Set up a fresh hetzner box to act as a KVM server"
[hostname]
(println (format "Performing initial setup for %s" hostname))
(hetzner-initial-setup hostname)
(println "Sleeping 2mins to enable remote host to reboot..")
(Thread/sleep (* 2 60 1000)) ;; wait for the host to reboot
(println (format "Setting up %s as a KVM server.." hostname))
(configure-kvm-server hostname)
(println (format "Done with %s" hostname)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment