diff src/event-Xt.c @ 446:1ccc32a20af4 r21-2-38

Import from CVS: tag r21-2-38
author cvs
date Mon, 13 Aug 2007 11:37:21 +0200
parents 576fb035e263
children 3078fd1074e8
line wrap: on
line diff
--- a/src/event-Xt.c	Mon Aug 13 11:36:20 2007 +0200
+++ b/src/event-Xt.c	Mon Aug 13 11:37:21 2007 +0200
@@ -1350,10 +1350,10 @@
 	    Lisp_Object l_dndlist = Qnil, l_item = Qnil;
 	    struct gcpro gcpro1, gcpro2, gcpro3, gcpro4;
 
-	    GCPRO4 (l_type, l_data, l_dndlist, l_item);
-
 	    if (! frame)
 	      return 0;	/* not for us */
+
+	    GCPRO4 (l_type, l_data, l_dndlist, l_item);
 	    XSETFRAME (emacs_event->channel, frame);
 
 	    emacs_event->event_type = misc_user_event;