changeset 34452:e381d256c0c2

(Fx_hide_tip): Fix last change.
author Gerd Moellmann <gerd@gnu.org>
date Mon, 11 Dec 2000 21:13:10 +0000
parents be899eb7b171
children c69ec20dda56
files src/xfns.c
diffstat 1 files changed, 6 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/xfns.c	Mon Dec 11 19:26:34 2000 +0000
+++ b/src/xfns.c	Mon Dec 11 21:13:10 2000 +0000
@@ -10764,9 +10764,13 @@
   
   if (!NILP (tip_timer))
     {
-      Lisp_Object tem = tip_timer;
+      Lisp_Object tem;
+      struct gcpro gcpro1;
+      tem = tip_timer;
+      GCPRO1 (tem);
       tip_timer = Qnil;
       call1 (intern ("cancel-timer"), tem);
+      UNGCPRO;
     }
 
   if (FRAMEP (tip_frame))
@@ -10779,6 +10783,7 @@
       tip_frame = Qnil;
       Fdelete_frame (frame, Qnil);
       deleted = Qt;
+      UNGCPRO;
 
 #ifdef USE_LUCID
       /* Bloodcurdling hack alert: The Lucid menu bar widget's