aboutsummaryrefslogtreecommitdiff
path: root/tw/home.scm
diff options
context:
space:
mode:
authorTimo Wilken2023-04-17 16:13:43 +0200
committerTimo Wilken2023-04-17 16:13:43 +0200
commitbb6c07c81da2af098aa89ce6842e39cdd41afd29 (patch)
tree76f17373690b7fcac32b0cc850d96490ce751c65 /tw/home.scm
parentd6fa2dc1c2da3b6f754d970b70ed2f16535294b3 (diff)
Simplify SSH config
Diffstat (limited to 'tw/home.scm')
-rw-r--r--tw/home.scm20
1 files changed, 9 insertions, 11 deletions
diff --git a/tw/home.scm b/tw/home.scm
index 6d632523..9f87a4f6 100644
--- a/tw/home.scm
+++ b/tw/home.scm
@@ -196,18 +196,16 @@ auto-expand-secmem
(host-key-algorithms '("+ssh-rsa"))
(accepted-key-types '("+ssh-rsa")))
;; CERN stuff
- ,(openssh-host
- (name "lxplus.cern.ch")
- (extra-content "GSSAPIDelegateCredentials yes")) ; needed for EOS home mount
- ,(openssh-host
- (name "aiadm.cern.ch")
- (extra-content "GSSAPIDelegateCredentials yes")) ; needed for EOS home mount
- ,(openssh-host
- (name "cvmfs-alice.cern.ch")
- (extra-content "GSSAPIDelegateCredentials yes")) ; needed for EOS home mount
+ ,@(map (lambda (host)
+ (openssh-host
+ (name host)
+ ;; Needed for EOS home mount.
+ (extra-content "GSSAPIDelegateCredentials yes")))
+ '("lxplus.cern.ch" "aiadm.cern.ch" "cvmfs-alice.cern.ch"))
,@(map (lambda (spec)
- (openssh-host (name (car spec)) (user (cdr spec))
- (identity-file "~/.local/share/ssh-keys/alicern_id_rsa")))
+ (openssh-host
+ (name (car spec)) (user (cdr spec))
+ (identity-file "~/.local/share/ssh-keys/alicern_id_rsa")))
'(("alimonitor.cern.ch" . "alibuild")
("alinsure.cern.ch" . "alibuild")
("alibuildmac*.cern.ch" . "alibuild")