/*
 * -- $Header: /cec/src/nestor/servers/R3/shXlib/XSelInput.c,v 1.1.1.1
 * 90/04/23 10:05:28 spanachi Exp $
 */

#include "copyright.h"

/* $XConsortium: XSelInput.c,v 11.8 88/09/06 16:10:22 jim Exp $ */
/* Copyright    Massachusetts Institute of Technology    1986	 */

/* -- MULTIPLEX Extension -- */

#include "Xlibint.h"

/* -- additional includes -- */
#include "resources.h"
#include "ApplCtx.h"

XSelectInput (dpy, w, mask)
  register Display *dpy;
  Window w;
  long mask;
{
  register xChangeWindowAttributesReq *req;
  /* -- additional variables -- */
  Bool mux_add_events;

  mux_add_events = XmuXMustAddEvents (dpy, w, XmuXUpdate);

  LockDisplay (dpy);
  GetReqExtra (ChangeWindowAttributes, 4, req);
  req->window = w;
  req->valueMask = CWEventMask;

  /*
   * -- if w is a top-level window (indicated by mux_add_events), add --
   * XmuXMask to the new event mask and store the change in the top-level --
   * list
   */
  if (mux_add_events) {
    long mux_specific_mask;

    mux_specific_mask = ~mask & XmuXMask;
    mask |= XmuXMask;
    XmuXChangeToplevelInfo (dpy, w, mux_specific_mask);
  }
  OneDataCard32 (dpy, NEXTPTR (req, xChangeWindowAttributesReq), mask);
  UnlockDisplay (dpy);
  SyncHandle ();
}