From d64219bedc7eac24f566484bfdf5372a2c8ff458 Mon Sep 17 00:00:00 2001 From: Benson Chu Date: Sun, 23 Oct 2022 20:07:15 -0500 Subject: [PATCH] Timeout my/window-name if no window pops up --- lisp/exwm-tagging/my-exwmx-quickrun.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/exwm-tagging/my-exwmx-quickrun.el b/lisp/exwm-tagging/my-exwmx-quickrun.el index 8d92b92..f46a419 100644 --- a/lisp/exwm-tagging/my-exwmx-quickrun.el +++ b/lisp/exwm-tagging/my-exwmx-quickrun.el @@ -121,7 +121,8 @@ (interactive) (let ((name (or name cmd))) (setq my/window-name name) - (start-process-shell-command cmd nil cmd))) + (start-process-shell-command cmd nil cmd) + (run-at-time 30 nil #'(lambda () (setq my/window-name nil))))) (defun exwm-rename-buffer () (interactive)