Don't let delete_frame select a tooltip frame (Bug#27647)
* src/frame.c (delete_frame): Don't select a tooltip frame. (Bug#27647)
This commit is contained in:
parent
e9dd580cc8
commit
6e6bf60eab
1 changed files with 4 additions and 1 deletions
|
@ -1920,6 +1920,7 @@ delete_frame (Lisp_Object frame, Lisp_Object force)
|
|||
See https://debbugs.gnu.org/cgi/bugreport.cgi?bug=15025. */
|
||||
FOR_EACH_FRAME (tail, frame1)
|
||||
if (!EQ (frame, frame1)
|
||||
&& NILP (Fframe_parameter (frame1, Qtooltip))
|
||||
&& (FRAME_TERMINAL (XFRAME (frame))
|
||||
== FRAME_TERMINAL (XFRAME (frame1)))
|
||||
&& FRAME_VISIBLE_P (XFRAME (frame1)))
|
||||
|
@ -1930,7 +1931,9 @@ delete_frame (Lisp_Object frame, Lisp_Object force)
|
|||
{
|
||||
FOR_EACH_FRAME (tail, frame1)
|
||||
{
|
||||
if (! EQ (frame, frame1) && FRAME_LIVE_P (XFRAME (frame1)))
|
||||
if (!EQ (frame, frame1)
|
||||
&& FRAME_LIVE_P (XFRAME (frame1))
|
||||
&& NILP (Fframe_parameter (frame1, Qtooltip)))
|
||||
{
|
||||
/* Do not change a text terminal's top-frame. */
|
||||
struct frame *f1 = XFRAME (frame1);
|
||||
|
|
Loading…
Add table
Reference in a new issue