From 788ce9de6d7643a163ac8d36d668b4353ec27c8f Mon Sep 17 00:00:00 2001 From: BirDt_ Date: Sun, 31 May 2026 18:38:41 +0800 Subject: [PATCH] Add hook for post AWS sign-in --- userland/aws.el | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) diff --git a/userland/aws.el b/userland/aws.el index 8129a94..7902e3a 100644 --- a/userland/aws.el +++ b/userland/aws.el @@ -43,6 +43,9 @@ (defvar aws-reauth-timer nil "The reauth timer, if created.") +(defvar aws-post-signin-hook nil + "Hook to run after an AWS sign-in.") + (defun aws--login (role) "Internal login function --- handles the command as a process, and prompts for MFA." (let* ((process-name (format "%s-%s" aws-cli-auth-provider (replace-regexp-in-string "[/:]" "-" role))) @@ -67,7 +70,11 @@ (when (string-match-p prompt-regexp buffer-contents) (setq prompt-sent t) (let ((token (read-passwd "MFA token: "))) - (process-send-string proc (concat token "\n"))))))))))) + (process-send-string proc (concat token "\n")))))))) + :sentinel + (lambda (proc event) + (when (string= "finished\n" event) + (run-hooks 'aws-post-signin-hook)))))) (defun aws-sign-in () "Sign in with AWS."