diff --git a/emacs/.config/doom/config.el b/emacs/.config/doom/config.el index 86666c6..edef826 100644 --- a/emacs/.config/doom/config.el +++ b/emacs/.config/doom/config.el @@ -453,15 +453,14 @@ Always open the result in `eww`." (defun my/ensure-ssh-keys-loaded (&rest _ignore) "Ensure ssh-agent has keys loaded; if not, run injector script." - (unless (my/ssh-agent-has-keys-p) - (unless (file-executable-p my/ssh-key-injector-script) - (user-error "SSH injector script not executable: %s" my/ssh-key-injector-script)) - (let ((buf (get-buffer-create "*ssh-key-injector*"))) - (with-current-buffer buf (erase-buffer)) - (let ((exit (call-process-shell-command my/ssh-key-injector-script nil buf t))) - (unless (eq exit 0) - (display-buffer buf) - (user-error "SSH key injection failed (see *ssh-key-injector*)")))))) + (unless (file-executable-p my/ssh-key-injector-script) + (user-error "SSH injector script not executable: %s" my/ssh-key-injector-script)) + (let ((buf (get-buffer-create "*ssh-key-injector*"))) + (with-current-buffer buf (erase-buffer)) + (let ((exit (call-process-shell-command my/ssh-key-injector-script nil buf t))) + (unless (eq exit 0) + (display-buffer buf) + (user-error "SSH key injection failed (see *ssh-key-injector*)"))))) ;; IMPORTANT: remove then re-add, so we don't keep an old advised function object around (advice-remove 'magit-status #'my/ensure-ssh-keys-loaded)