]> code.delx.au - dotemacs/commitdiff
SSH_AUTH_SOCK master
authorJames Bunton <jamesbunton@delx.au>
Tue, 5 Mar 2024 14:15:03 +0000 (01:15 +1100)
committerJames Bunton <jamesbunton@delx.au>
Tue, 5 Mar 2024 14:15:03 +0000 (01:15 +1100)
init.el

diff --git a/init.el b/init.el
index 4af6e28ae3472b304cf6b69d222f300c2ef9b10e..a3ddcbd373db5485b8b6895c61bb23f88df2570f 100644 (file)
--- a/init.el
+++ b/init.el
 (global-set-key (kbd "C-z") nil)
 (global-set-key (kbd "C-x C-z") nil)
 
+;;;;;;;;;;;;;;;;;;;;;;;;
+;; Find SSH_AUTH_SOCK ;;
+;;;;;;;;;;;;;;;;;;;;;;;;
+
+(dolist (p '("keyring/ssh" "gcr/ssh" "openssh_agent"))
+  (let ((SSH_AUTH_SOCK (substitute-env-vars (concat "$XDG_RUNTIME_DIR/" p))))
+    (when (file-exists-p SSH_AUTH_SOCK)
+      (message "Found SSH_AUTH_SOCK %s" SSH_AUTH_SOCK)
+      (setenv "SSH_AUTH_SOCK" SSH_AUTH_SOCK))))
+
 ;;;;;;;;;;;;;;;;;;;
 ;; Load packages ;;
 ;;;;;;;;;;;;;;;;;;;