From 32bc4f06ba9d6c332a88dd29f4c499a1a0b6dab0 Mon Sep 17 00:00:00 2001
From: anemofilia <anemofilia@disroot.org>
Date: Mon, 7 Aug 2023 20:50:30 -0300
Subject: [PATCH] feat: remove bash and bash-completion from system definition

---
 buer.scm | 35 ++++++++++++++++++++++-------------
 1 file changed, 22 insertions(+), 13 deletions(-)

diff --git a/buer.scm b/buer.scm
index da4dd39..62fb99f 100644
--- a/buer.scm
+++ b/buer.scm
@@ -29,13 +29,14 @@
 
 (use-package-modules
  #|A|# admin
- #|B|# base bash
+ #|B|# base
  #|C|# certs compression curl
  #|F|# file
  #|G|# gawk glib guile guile-xyz
  #|L|# less linux
  #|M|# man maths
  #|P|# pulseaudio
+ #|S|# shells
  #|T|# texinfo text-editors tmux
  #|V|# vpn)
 
@@ -66,10 +67,11 @@
             (gfxmode '("1280x720x32"))))))
 
  (kernel linux-libre-6.4)
- (kernel-arguments '("modprobe.blacklist=usbmouse,usbkbd"
-                     "thinkpad_acpi.fan_control=1"
-                     "loglevel=5"
-                     "quiet"))
+ (kernel-arguments
+   '("modprobe.blacklist=usbmouse,usbkbd"
+     "thinkpad_acpi.fan_control=1"
+     "loglevel=5"
+     "quiet"))
 
  (file-systems
   (cons* (file-system
@@ -87,18 +89,24 @@
          (target (file-system-label "swap")))))
 
  (users
-  (cons (user-account
-         (name "radio")
-         (password %radio-password)
-         (group "users")
-         (supplementary-groups `("audio" "input" "video" "wheel")))
-        %base-user-accounts))
+  (cons* (user-account
+          (name "radio")
+          (password %radio-password)
+          (shell (file-append dash "/bin/dash"))
+          (group "users")
+          (supplementary-groups `("audio" "input" "video" "wheel")))
+         (user-account
+          (name "root")
+          (password %root-password)
+          (uid 0)
+          (group "root")
+          (shell (file-append dash "/bin/dash")))
+         %base-user-accounts))
 
  #|System level packages|#
  (packages
   (list #|admin       |# htop inetutils isc-dhcp opendoas shadow
         #|base        |# coreutils diffutils findutils grep patch sed tar which
-        #|bash        |# bash bash-completion
         #|certs       |# nss-certs
         #|compression |# bzip2 gzip lzip unzip xz zstd
         #|curl        |# curl
@@ -111,6 +119,7 @@
         #|man         |# man-db mandoc man-pages
         #|math        |# libqalculate
         #|pulseaudio  |# pulseaudio
+        #|shells      |# dash
         #|texinfo     |# info-reader
         #|text-editors|# kakoune
         #|tmux        |# tmux
@@ -213,7 +222,7 @@
 
         #|Special file services|#
         (service special-files-service-type
-        `(("/bin/sh"      ,(file-append bash      "/bin/bash"))
+        `(("/bin/sh"      ,(file-append dash      "/bin/dash"))
           ("/usr/bin/env" ,(file-append coreutils "/bin/env"))))
 
         #|Miscellaneous services|#