#!/gnu/store/4gvgcfdiz67wv04ihqfa8pqwzsb0qpv5-guile-3.0.9/bin/guile --no-auto-compile
!#
(eval-when (expand load eval) (let ((extensions (quote ())) (prepend (lambda (items lst) (let loop ((items items) (lst lst)) (if (null? items) lst (loop (cdr items) (cons (car items) (delete (car items) lst)))))))) (set! %load-path (prepend (cons "/gnu/store/1w8vi9acqbsv76plfgc4564irncjknkd-module-import" (map (lambda (extension) (string-append extension "/share/guile/site/" (effective-version))) extensions)) %load-path)) (set! %load-compiled-path (prepend (cons "/gnu/store/dkdp16vvmlnbl0ilfx83l11ihvin8mrf-module-import-compiled" (map (lambda (extension) (string-append extension "/lib/guile/" (effective-version) "/site-ccache")) extensions)) %load-compiled-path))))(begin (use-modules (gnu services herd) (srfi srfi-1)) (parameterize ((shepherd-message-port (%make-void-port "w"))) (load-services/safe (quote ("/gnu/store/rwnbrwksf07abdfk7r34gsc17sapdhc0-shepherd-swap-a5da62d0-0f8e-4401-8fb6-17b284e166d0.scm" "/gnu/store/m3vg39qma81hnlx34lxpbd0y6jp94i3j-shepherd-file-systems.scm" "/gnu/store/rasnwijkacdca7fsr644qs5hrqc4dg4q-shepherd-user-file-systems.scm" "/gnu/store/s649bkd4nhwj5vb5lpwahyia3g355il9-shepherd-file-system--boot-efi.scm" "/gnu/store/y9s7bx5m5s2b4ih91hrh9zdvk7njya20-shepherd-file-system--dev-pts.scm" "/gnu/store/413cakx4p0ncq9gzq62x162i14vgwqva-shepherd-file-system--sys-kernel-debug.scm" "/gnu/store/fsr3xgm1hjdlv3l73ib6iz7vizqn4s2b-shepherd-file-system--dev-shm.scm" "/gnu/store/zr8cw898ll98k51fv714190kvrqj27g6-shepherd-file-system--sys-firmware-efi-efivars.scm" "/gnu/store/3ndxis3ck67vnyr8ynifc0qdl1g6alzm-shepherd-file-system--gnu-store.scm" "/gnu/store/qnhwkikhw1dn9dfb6sx6yj5hqb3gf9bj-shepherd-file-system--run-systemd.scm" "/gnu/store/8qc4h5n7czf0nilb1j03vx0ci51yhkqf-shepherd-file-system--run-user.scm" "/gnu/store/qm5l5nnbqh577xh9rihjr47w03wdnks6-shepherd-file-system--sys-fs-cgroup-elogind.scm" "/gnu/store/hxlznya054iwmz4gx5migqngkrd4rldq-shepherd-file-system--sys-fs-cgroup.scm" "/gnu/store/hiwvgi2xrlxm01g95735xll44irx33zb-shepherd-file-system--var-cache-fontconfig.scm" "/gnu/store/2szda8p3wxrcm6d5rdlb5pl5qy8m58ja-shepherd-file-system--var-lib-gdm.scm" "/gnu/store/01ksp4rgj0qwsnbmacy5656xzq4jn3ph-shepherd-root-file-system.scm" "/gnu/store/5pdvhsmpbl3kb3spgn2c7b65sk6g3h9i-shepherd-user-processes.scm" "/gnu/store/amzaaa3wsyi3kvdf5vl1nbbwrr8j7czh-shepherd-host-name.scm" "/gnu/store/57pzvyari5kcs8vm17xc70vk6f4zlq5w-shepherd-user-homes.scm" "/gnu/store/ni21876zisgb842pmg94d09l1wjw0zgj-shepherd-pam.scm" "/gnu/store/w834wf9m5wjj8wlcfs43bg6wms4ji9y5-shepherd-sysctl.scm" "/gnu/store/gmgd67h49h0kc7m754r9hc3dwqjpvhwc-shepherd-udev.scm" "/gnu/store/k0zawlhhc9g1q2dja3pi36kp4n398vx9-shepherd-nscd.scm" "/gnu/store/gby743907sz0ddw9fv4l0zg9d6yxzw44-shepherd-guix-daemon.scm" "/gnu/store/w81qnrz5fwqyfgvmwwypx4aga0vbislg-shepherd-urandom-seed.scm" "/gnu/store/lkc3kad3h9dmfn9y08mwhdijw1c9i97m-shepherd-loopback.scm" "/gnu/store/yjzmqcwfjdv3r4z8r2kvfbw1ax35i0sb-shepherd-term-tty6.scm" "/gnu/store/rhmiab5407jkr5bmppidriwx5rgrnixy-shepherd-term-tty5.scm" "/gnu/store/4j2959k7ckz1c4xxg95bk7li81aq36xi-shepherd-term-tty4.scm" "/gnu/store/jr3klmkb2ngihrzfm52xqgrisxb4ix8w-shepherd-term-tty3.scm" "/gnu/store/3f4vb2rqdx40fcyhbxizd6hbsynh96v8-shepherd-term-tty2.scm" "/gnu/store/5pjs21vrhkgpv7ghqmp5yp8gcllh3z59-shepherd-term-tty1.scm" "/gnu/store/h5xwhki1qrr877zpfm6h0wypf0w1fi92-shepherd-term-console.scm" "/gnu/store/i04r8ga5n6kwi93hkdcii6kiaz151psd-shepherd-syslogd.scm" "/gnu/store/ma1xl0m4gdxlsylsi91qwl1lmvljdk83-shepherd-console-font-tty1.scm" "/gnu/store/6qhcf7xhi3gpyqvcx1h16mgliidsya9l-shepherd-console-font-tty2.scm" "/gnu/store/kb8y25d31ilzi6nix8g1gkyy4j5gqn0g-shepherd-console-font-tty3.scm" "/gnu/store/jhwnjglvzyh7bpn3nf4120rdzxidayz7-shepherd-console-font-tty4.scm" "/gnu/store/5qdvs1clyhwp4dd90igysfpba17dv2jc-shepherd-console-font-tty5.scm" "/gnu/store/a79hjns5yxdncbdf33d0han0radhsh97-shepherd-console-font-tty6.scm" "/gnu/store/mafr3hi19pgh28a5c1ylqb5rk8q7ln0b-shepherd-virtual-terminal.scm" "/gnu/store/cdk3ndlhflqx81qj8gp7r6yz9b9b3mx9-shepherd-x11-socket-directory.scm" "/gnu/store/a1k2js5qx9h2vhn8nsk38r6287rcr71i-shepherd-ntpd.scm" "/gnu/store/82l7mkfy7kxwc8s3id23gajv6922n94f-shepherd-dbus-system.scm" "/gnu/store/g35366nf8scx3cwqfrpg6igy0g5h6m4v-shepherd-elogind.scm" "/gnu/store/xvribapx948i7shr8xjgszh8arkxaf6i-shepherd-upower-daemon.scm" "/gnu/store/kinflmzjci9l428v3f593v6b10fp4923-shepherd-avahi-daemon.scm" "/gnu/store/2swffnr400h8c5b45ilj0kr6v2d5z0m3-shepherd-wpa-supplicant.scm" "/gnu/store/2s60gfbvpi9fs80lyq7v9swf3k6v02si-shepherd-NetworkManager-networking.scm" "/gnu/store/78qgzf9a3j18wbdc0064jy1lsgrxssar-shepherd-xorg-server.scm" "/gnu/store/4i29im39r50c60hy3lc2vx9ml8i3m9z7-shepherd-ganeti-metad.scm" "/gnu/store/881grw1lw4nnb8g6apczdx05rhzi2rg1-shepherd-ssh-daemon-ssh-sshd.scm" "/gnu/store/zna9bd9sj4irvjy0n80mc6hzvznzird8-shepherd-mcron.scm")))) (for-each unload-service (quote ())) (for-each start-service (quote (host-name user-homes sysctl x11-socket-directory ganeti-metad ssh-daemon))))