system.scm (1143B)

      1 (define-module (mt system)
      2   #:use-module (guix gexp)
      3   #:use-module (gnu packages admin)
      4   #:use-module (gnu packages curl)
      5   #:use-module (gnu packages version-control)
      6   #:use-module (gnu system)
      7   #:use-module (gnu system file-systems)
      8   #:use-module (mt scripts)
      9   #:export (%mt-file-systems
     10             %mt-swap-devices
     11             %mt-base-packages))
     12 
     13 ;; Keeping these for compatibility, may change them later, namely boot partition
     14 (define %mt-file-systems
     15   (append
     16     (list (file-system
     17             (mount-point "/boot/efi")
     18             (device (file-system-label "guix-boot"))
     19             (type "vfat"))
     20           (file-system
     21             (mount-point "/")
     22             (device (file-system-label "guix-root"))
     23             (type "ext4"))
     24           (file-system
     25             (mount-point "/home")
     26             (device (file-system-label "guix-home"))
     27             (type "ext4")))
     28      %base-file-systems))
     29 
     30 (define %mt-swap-devices
     31   (list (swap-space
     32           (target (file-system-label "guix-swap")))))
     33 
     34 (define %mt-base-packages
     35   (append
     36     (list fastfetch
     37           git
     38           curl
     39           mt-scripts)
     40      %base-packages))