diff options
-rw-r--r-- | tw/system.scm | 2 | ||||
-rw-r--r-- | tw/system/cern.scm | 7 |
2 files changed, 2 insertions, 7 deletions
diff --git a/tw/system.scm b/tw/system.scm index 3a5bd694..30710b8f 100644 --- a/tw/system.scm +++ b/tw/system.scm @@ -71,7 +71,7 @@ ,(local-file "system/files/timo.pub") ,(local-file "system/files/timo-phone-gpg.pub"))))))) -(define (tw-login-configuration config) +(define-public (tw-login-configuration config) "Patch the given `login-configuration' to my liking." (login-configuration (inherit config) diff --git a/tw/system/cern.scm b/tw/system/cern.scm index 002386f6..0f706e21 100644 --- a/tw/system/cern.scm +++ b/tw/system/cern.scm @@ -239,12 +239,7 @@ (cons* (geoclue-application "redshift" #:system? #f) %standard-geoclue-applications)))) - (login-service-type - config => - (login-configuration - (inherit config) - (motd (plain-file "no-motd" "")) - (allow-empty-passwords? #f))) + (login-service-type config => (tw-login-configuration config)) ;; openntpd works better. (delete ntp-service-type)))))) |