summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMarek Paśnikowski <marek@marekpasnikowski.pl>2024-01-14 11:17:09 +0100
committerMarek Paśnikowski <marek@marekpasnikowski.pl>2024-01-14 11:17:09 +0100
commitc6bf50ca9daf661eeb9770b97fb096e2d69499db (patch)
tree1867b68c2103668354fd7e4b0b3e54803893b788
parent0e2c0ad67208224f1b141543c10f0ef73e8e2f69 (diff)
Home configuration: break out reconfigure-system and reconfigure-system-
-rw-r--r--home-configuration.scm15
1 files changed, 11 insertions, 4 deletions
diff --git a/home-configuration.scm b/home-configuration.scm
index 7a0a102..7b76bd0 100644
--- a/home-configuration.scm
+++ b/home-configuration.scm
@@ -29,6 +29,15 @@
(string-append reconfigure-home
"--allow-downgrades"))
+(define reconfigure-system
+ (string-append "sudo guix system reconfigure "
+ config-prefix
+ "system-configuration.scm"))
+
+(define reconfigure-system-
+ (string-append reconfigure-system
+ "--allow-downgrades"))
+
(define system-update
"pull-guix && reconfigure-system && reconfigure-home")
@@ -43,10 +52,8 @@
("pull-guix-" . ,pull-guix-)
("reconfigure-home" . ,reconfigure-home)
("reconfigure-home-" . ,reconfigure-home-)
- ("reconfigure-system" . (string-append "sudo guix system reconfigure "
- ,config-prefix
- "system-configuration.scm"))
- ("reconfigure-system-" . "reconfigure-system --allow-downgrades")
+ ("reconfigure-system" . ,reconfigure-system)
+ ("reconfigure-system-" . ,reconfigure-system-)
("system-update" . ,system-update)
("system-update-" . ,system-update-)))