Home configuration: break out allow-downgrades

1 files changed, 8 insertions, 3 deletions

diff --git a/home-configuration.scm b/home-configuration.scm
index ad4419e..f84c0da 100644
--- a/home-configuration.scm
+++ b/home-configuration.scm
@@ -14,11 +14,16 @@
     ("NVM_DIR" . "$HOME/src/nvm")
     ("GUILE_AUTO_COMPILE" . "0")))
 
+(define allow-downgrades
+  "--allow-downgrades")
+
 (define pull-guix
   "guix pull ")
 
 (define pull-guix-
-  "pull-guix --allow-downgrades --disable-authentication")
+  (string-append pull-guix
+		 allow-downgrades
+		 "--disable-authentication"))
 
 (define guix-home
   "guix home reconfigure ")
@@ -33,7 +38,7 @@
 
 (define reconfigure-home-
   (string-append reconfigure-home
-		 "--allow-downgrades"))
+		 allow-downgrades))
 
 (define guix-system
   "sudo guix system reconfigure ")
@@ -48,7 +53,7 @@
 
 (define reconfigure-system-
   (string-append reconfigure-system
-		 "--allow-downgrades"))
+		 allow-downgrades))
 
 (define and
   "&& ")