From 89c78fdb6bd116692e338af9a2520fd77ee77e46 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Gerd=20M=C3=B6llmann?= Date: Wed, 6 Nov 2024 10:22:50 +0100 Subject: [PATCH] Let tty tips disappear automatically * lisp/tty-tip.el (tty-tip--create-frame): Delete tip frame after x-show-tooltip-timeout seconds. (cherry picked from commit e0bfd3ce23eafb13ab0400f3046074b83784d9f8) --- lisp/tty-tip.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/lisp/tty-tip.el b/lisp/tty-tip.el index 92a115b2008..7f600fd3772 100644 --- a/lisp/tty-tip.el +++ b/lisp/tty-tip.el @@ -3,6 +3,8 @@ ;; Copyright (C) 2024 Free Software Foundation, Inc. +;; This file is part of GNU Emacs. + ;; GNU Emacs is free software: you can redistribute it and/or modify ;; it under the terms of the GNU General Public License as published by ;; the Free Software Foundation, either version 3 of the License, or @@ -141,7 +143,8 @@ (x (car pos)) (y (cdr pos))) (set-frame-position tty-tip--frame x y)) - (make-frame-visible tty-tip--frame)))) + (make-frame-visible tty-tip--frame) + (run-at-time x-show-tooltip-timeout nil #'tty-tip--delete-frame)))) (defvar tty-tip--help-message nil) (defvar tty-tip--hide-time nil) -- 2.39.5