From 1297c253f158b28c24d1b04bf1ca10431e85a94d Mon Sep 17 00:00:00 2001
From: Timo Wilken
Date: Tue, 26 Dec 2023 09:55:14 +0100
Subject: Move to SSDs on lud

---
 tw/system/lud.scm | 12 ++++++++----
 1 file changed, 8 insertions(+), 4 deletions(-)

diff --git a/tw/system/lud.scm b/tw/system/lud.scm
index b66bc4ac..31040e61 100644
--- a/tw/system/lud.scm
+++ b/tw/system/lud.scm
@@ -23,10 +23,10 @@
   (uuid "51F3-FB71" 'fat32))
 (define guixsd-root-partition         ; /dev/sda2
   (uuid "c63af3e6-3c2b-43d2-b1e6-944f09a10e0f" 'btrfs))
-(define backups-partition             ; /dev/sdb1
-  (uuid "c6ac4033-cce6-4365-abcc-483b79c4ca36" 'btrfs))
-(define data-partition                ; /dev/sdc1
-  (uuid "4715ae0e-5cef-48f2-a59e-025321153888" 'btrfs))
+(define backups-partition             ; LABEL="backups"
+  (uuid "8ae64f58-24cd-4309-9553-cc722d3c7d4a" 'btrfs))
+(define data-partition                ; LABEL="data"
+  (uuid "5556c63c-ba63-42b8-850d-f86460e8759a" 'btrfs))
 
 (define-public %lud-system
   (operating-system
@@ -317,12 +317,16 @@ innodb_io_capacity = 4000
               (create-mount-point? #t)
               (device backups-partition)
               (flags '(no-atime))
+              (options (alist->file-system-options
+                        '("ssd" ("compress" . "zstd"))))
               (type "btrfs"))
             (file-system
               (mount-point "/var/data")
               (create-mount-point? #t)
               (device data-partition)
               (flags '(no-atime))
+              (options (alist->file-system-options
+                        '("ssd" ("compress" . "zstd"))))
               (type "btrfs"))
             %base-file-systems))))
 
-- 
cgit v1.2.3