remove duplicate openssh services as it has been introduced to %sovereign-services

1 files changed, 7 insertions, 6 deletions

diff --git a/deployment/systems/akashi.scm b/deployment/systems/akashi.scm
index b7b8361..142ffae 100644
--- a/deployment/systems/akashi.scm
+++ b/deployment/systems/akashi.scm
@@ -37,6 +37,10 @@
   #:use-module ((sovereign systems)
                 #:prefix sovereign:systems:))
 
+(define-public architecture "x86_64-linux")
+
+(define-public system-name "akashi")
+
 (define root-partition
   ((@ (gnu system file-systems) file-system)
    (mount-point "/")
@@ -45,9 +49,6 @@
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
-(define host-name*
-  "akashi")
-
 (define system-keyboard-layout
   (gnu:system:keyboard:keyboard-layout "pl"))
 
@@ -87,18 +88,18 @@
                                    gnu:system:%default-kernel-arguments))
    (hurd                    #f)
    (bootloader              (machines:thinkpad-x200:bootloader-configuration* system-keyboard-layout))
-   (label                   (sovereign:systems:operating-system-label* host-name*
+   (label                   (sovereign:systems:operating-system-label* system-name
                                                                        gnu:system:this-operating-system))
    (keyboard-layout         system-keyboard-layout)
    (initrd                  gnu:system:linux-initrd:base-initrd)
    (initrd-modules          gnu:system:linux-initrd:%base-initrd-modules)
    (firmware                (list))
-   (host-name               host-name*)
+   (host-name               system-name)
    (hosts-file              #f)
    (mapped-devices          (list))
    (file-systems            (cons* root-partition
                                    gnu:system:file-systems:%base-file-systems))
-   (swap-devices            (machines:thinkpad-x200:swap-devices* host-name*))
+   (swap-devices            (machines:thinkpad-x200:swap-devices* system-name))
    (users                   (list uid1000-account))
    (groups                  gnu:system:shadow:%base-groups)
    (skeletons               (gnu:system:shadow:default-skeletons))