* src/haikumenu.c (haiku_dialog_show): Set `popup_activated_p'.

Author:

diff --git a/src/haikumenu.c b/src/haikumenu.c
index 61c48a5e104c54eed779395d8b938cda4240fdb8..11a76217a9d2b1beb50e021616957a500074153b 100644 (file)
--- a/src/haikumenu.c
+++ b/src/haikumenu.c
@@ -258,8 +258,10 @@ haiku_dialog_show (struct frame *f, Lisp_Object title,
   unblock_input ();
 
   unrequest_sigio ();
+  ++popup_activated_p;
   int32_t val = BAlert_go (alert, block_input, unblock_input,
                           process_pending_signals);
+  --popup_activated_p;
   request_sigio ();
 
   if (val < 0)