comparison src/xterm.c @ 83224:7a0245dd1848

Merged in changes from CVS trunk. Patches applied: * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-653 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-654 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-655 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-656 Update from CVS: lisp/man.el (Man-xref-normal-file): Fix help-echo. * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-657 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-658 Merge from gnus--rel--5.10 * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-659 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-660 Merge from gnus--rel--5.10 * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-661 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-662 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-663 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-664 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-665 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-666 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-667 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-668 Merge from gnus--rel--5.10 * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-669 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-670 Update from CVS * [e-mail]--gnu-2004/emacs--cvs-trunk--0--patch-671 Update from CVS * [e-mail]--gnu-2004/gnus--rel--5.10--patch-64 Update from CVS * [e-mail]--gnu-2004/gnus--rel--5.10--patch-65 Update from CVS * [e-mail]--gnu-2004/gnus--rel--5.10--patch-66 Update from CVS * [e-mail]--gnu-2004/gnus--rel--5.10--patch-67 Update from CVS * [e-mail]--gnu-2004/gnus--rel--5.10--patch-68 Update from CVS git-archimport-id: [e-mail]--2004/emacs--multi-tty--0--patch-264

83223:4056279af756

     Display *display;
     Window window_id;
{
  Lisp_Object tail;

#ifdef USE_GTK
  window_id = (Window) xg_get_scroll_id_for_window (display, window_id);
#endif /* USE_GTK */

  for (tail = Vframe_list;
       XGCTYPE (tail) == Lisp_Cons;
       tail = XCDR (tail))
    {

		  0, 0, 0, 0, True);
#endif /* not USE_TOOLKIT_SCROLL_BARS */
}


/* Define a queue to save up SelectionRequest events for later handling.  */

struct selection_event_queue
  {
    XEvent event;
    struct selection_event_queue *next;
  };

static struct selection_event_queue *queue;

/* Nonzero means queue up certain events--don't process them yet.  */

static int x_queue_selection_requests;

/* Queue up an X event *EVENT, to be processed later.  */

static void
x_queue_event (f, event)
     FRAME_PTR f;
     XEvent *event;
{
  struct selection_event_queue *queue_tmp
    = (struct selection_event_queue *) xmalloc (sizeof (struct selection_event_queue));

  if (queue_tmp != NULL)
    {
      queue_tmp->event = *event;
      queue_tmp->next = queue;
      queue = queue_tmp;
    }
}

/* Take all the queued events and put them back
   so that they get processed afresh.  */

static void
x_unqueue_events (display)
     Display *display;
{
  while (queue != NULL)
    {
      struct selection_event_queue *queue_tmp = queue;
      XPutBackEvent (display, &queue_tmp->event);
      queue = queue_tmp->next;
      xfree ((char *)queue_tmp);
    }
}

/* Start queuing SelectionRequest events.  */

void
x_start_queuing_selection_requests (display)
     Display *display;
{
  x_queue_selection_requests++;
}

/* Stop queuing SelectionRequest events.  */

void
x_stop_queuing_selection_requests (display)
     Display *display;
{
  x_queue_selection_requests--;
  x_unqueue_events (display);
}

/* The main X event-reading loop - XTread_socket.  */

#if 0
/* Time stamp of enter window event.  This is only used by XTread_socket,
   but we have to put it out here, since static variables within functions

    case SelectionRequest:	/* Someone wants our selection.  */
#ifdef USE_X_TOOLKIT
      if (!x_window_to_frame (dpyinfo, event.xselectionrequest.owner))
        goto OTHER;
#endif /* USE_X_TOOLKIT */
      if (x_queue_selection_requests)
        x_queue_event (x_window_to_frame (dpyinfo, event.xselectionrequest.owner),
                       &event);
      else
        {
          XSelectionRequestEvent *eventp
            = (XSelectionRequestEvent *) &event;

          inev.kind = SELECTION_REQUEST_EVENT;
          SELECTION_EVENT_DISPLAY (&inev) = eventp->display;

          SELECTION_EVENT_SELECTION (&inev) = eventp->selection;
          SELECTION_EVENT_TARGET (&inev) = eventp->target;
          SELECTION_EVENT_PROPERTY (&inev) = eventp->property;
          SELECTION_EVENT_TIME (&inev) = eventp->time;
          inev.frame_or_window = Qnil;
        }
      break;

    case PropertyNotify:
#if 0 /* This is plain wrong.  In the case that we are waiting for a
	 PropertyNotify used as an ACK in incremental selection

  Display *dpy = XSAVE_VALUE (first)->pointer;
  
  /* The display may have been closed before this function is called.
     Check if it is still open before calling XSync.  */
  if (x_display_info_for_display (dpy) != 0)
    XSync (dpy, False);

  x_error_message_string = XCDR (old_val);
  return Qnil;
}

83224:7a0245dd1848

     Display *display;
     Window window_id;
{
  Lisp_Object tail;

#if defined (USE_GTK) && defined (USE_TOOLKIT_SCROLL_BARS)
  window_id = (Window) xg_get_scroll_id_for_window (display, window_id);
#endif /* USE_GTK  && USE_TOOLKIT_SCROLL_BARS */

  for (tail = Vframe_list;
       XGCTYPE (tail) == Lisp_Cons;
       tail = XCDR (tail))
    {

		  0, 0, 0, 0, True);
#endif /* not USE_TOOLKIT_SCROLL_BARS */
}


/* The main X event-reading loop - XTread_socket.  */

#if 0
/* Time stamp of enter window event.  This is only used by XTread_socket,
   but we have to put it out here, since static variables within functions

    case SelectionRequest:	/* Someone wants our selection.  */
#ifdef USE_X_TOOLKIT
      if (!x_window_to_frame (dpyinfo, event.xselectionrequest.owner))
        goto OTHER;
#endif /* USE_X_TOOLKIT */
      {
          XSelectionRequestEvent *eventp
            = (XSelectionRequestEvent *) &event;

          inev.kind = SELECTION_REQUEST_EVENT;
          SELECTION_EVENT_DISPLAY (&inev) = eventp->display;

          SELECTION_EVENT_SELECTION (&inev) = eventp->selection;
          SELECTION_EVENT_TARGET (&inev) = eventp->target;
          SELECTION_EVENT_PROPERTY (&inev) = eventp->property;
          SELECTION_EVENT_TIME (&inev) = eventp->time;
          inev.frame_or_window = Qnil;
      }
      break;

    case PropertyNotify:
#if 0 /* This is plain wrong.  In the case that we are waiting for a
	 PropertyNotify used as an ACK in incremental selection

  Display *dpy = XSAVE_VALUE (first)->pointer;
  
  /* The display may have been closed before this function is called.
     Check if it is still open before calling XSync.  */
  if (x_display_info_for_display (dpy) != 0)
    {
      BLOCK_INPUT;
      XSync (dpy, False);
      UNBLOCK_INPUT;
    }

  x_error_message_string = XCDR (old_val);
  return Qnil;
}