Reorganise Guix home declaration into module tree

1 files changed, 0 insertions, 29 deletions

diff --git a/sessionmenu b/sessionmenu
deleted file mode 100755
index 552c2b3c..00000000
--- a/sessionmenu
+++ /dev/null
@@ -1,29 +0,0 @@
-#!/usr/bin/env -S guile --no-auto-compile
-!#
-(use-modules (ice-9 format)
-             (ice-9 match)
-             (ice-9 ports))
-
-(define (call-command/stderr . command)
-  "Call COMMAND using `system*', but redirect all output to stderr."
-  (with-output-to-port (current-error-port)
-    (lambda () (apply system* command))))
-
-(match (command-line)
-  ((_ "quit")
-   (exit 0))
-  ((_ "Reload i3 configuration")
-   (call-command/stderr "i3-msg" "reload"))
-  ((_ "Log out")
-   (call-command/stderr "i3-msg" "exit"))
-  ((_ "Shutdown")
-   (call-command/stderr "sudo" "-n" "/run/current-system/profile/sbin/shutdown"))
-  ((_ "Reboot")
-   (call-command/stderr "sudo" "-n" "/run/current-system/profile/sbin/reboot"))
-  (_
-   (format #t "\0~a\x1f~a~%~{~a\0icon\x1f~a~%~}"
-           "prompt" "Session"
-           '("Reload i3 configuration" "reload"
-             "Log out" "system-log-out"
-             "Shutdown" "system-shutdown"
-             "Reboot" "system-reboot"))))