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

#include "copyright.h"

/* $XConsortium: XPmapBord.c,v 11.7 88/09/06 16:09:42 jim Exp $ */
/* Copyright    Massachusetts Institute of Technology    1986	 */

/* -- MULTIPLEX Extension -- */

#include "Xlibint.h"

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

XSetWindowBorderPixmap (dpy, w, pixmap)
  register Display *dpy;
  Window w;
  Pixmap pixmap;
{
  register xChangeWindowAttributesReq *req;
  LockDisplay (dpy);
  GetReqExtra (ChangeWindowAttributes, 4, req);
  req->window = w;
  req->valueMask = CWBorderPixmap;
  OneDataCard32 (dpy, NEXTPTR (req, xChangeWindowAttributesReq), pixmap);

  /* -- update the appropriate resource info if necessary -- */
  if (XmuXStoreResources (dpy)) {
    XSetWindowAttributes attributes;

    attributes.border_pixmap = pixmap;
    XmuXUpdateWindowInfo (dpy, w, CWBorderPixmap, &attributes);
  }
  UnlockDisplay (dpy);
  SyncHandle ();
}
