summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMarek Paśnikowski <marekpasnikowski@protonmail.com>2022-10-31 01:32:11 +0100
committerMarek Paśnikowski <marekpasnikowski@protonmail.com>2022-10-31 01:32:11 +0100
commit06f8be48bdad37ecf4ab923bb182deebce2ae119 (patch)
tree1867b68c2103668354fd7e4b0b3e54803893b788
parent9c5b8feee18ff130900dbefb21cbf2e2206fcc2b (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-)))