Guest User

Untitled

a guest
Apr 3rd, 2021
20
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. (use-modules (gnu)
  2. (srfi srfi-1)
  3. )
  4. (use-service-modules desktop networking ssh xorg sddm virtualization)
  5. (use-package-modules wm shells)
  6.  
  7. (operating-system
  8. (locale "en_US.utf8")
  9. (timezone "Europe/Moscow")
  10. (keyboard-layout (keyboard-layout "us"))
  11. (host-name "guix")
  12. (users (cons* (user-account
  13. (name "username")
  14. (comment "Username")
  15. (group "users")
  16. (shell (file-append zsh "/bin/zsh"))
  17. (home-directory "/home/username")
  18. (supplementary-groups
  19. '("wheel" "netdev" "audio" "video")))
  20. %base-user-accounts))
  21. (packages
  22. (append (map specification->package
  23. '("sway" "swaybg" "swayidle" "swaylock" "waybar"
  24. "sddm"
  25. "zsh" "tmux" "zsh-autosuggestions"
  26. "neovim" "openssh"
  27. "termite" "git" "nss-certs"))
  28. %base-packages))
  29.  
  30. (services (cons* (service qemu-binfmt-service-type ;; crosscompile
  31. (qemu-binfmt-configuration
  32. (platforms (lookup-qemu-platforms "arm" "aarch64"))))
  33. (service openssh-service-type
  34. (openssh-configuration
  35. (password-authentication? #f)
  36. (allow-agent-forwarding? #f)
  37. (allow-tcp-forwarding? #f)
  38. (gateway-ports? #f)
  39. (use-pam? #f)
  40. (authorized-keys
  41. `(("username", (local-file "external.pub"))))))
  42. (service sddm-service-type) ;; enable sddm instead gdm
  43. (remove (lambda (service)
  44. (eq? (service-kind service) gdm-service-type))
  45. %desktop-services)))
  46.  
  47. (bootloader
  48. (bootloader-configuration
  49. (bootloader grub-bootloader)
  50. (target "/dev/sda")
  51. (keyboard-layout keyboard-layout)))
  52. (swap-devices
  53. (list (uuid "4a5cb1cc-91d5-446f-b6cd-b4ec7f1ca930")))
  54. (file-systems
  55. (cons* (file-system
  56. (mount-point "/")
  57. (device
  58. (uuid "e8100f83-4a3e-48a9-b615-5237df9b8de8"
  59. 'ext4))
  60. (type "ext4"))
  61. %base-file-systems)))
RAW Paste Data