Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: utzoo!mnetor!uunet!seismo!sundc!pitstop!sun!amdcad!ames!sdcsvax!ucbvax!ZERMATT.LCS.MIT.EDU!RWS
From: RWS@ZERMATT.LCS.MIT.EDU (Robert Scheifler)
Newsgroups: comp.windows.x
Subject: V11 CLX window-priority setf bug fix
Message-ID: <871013085528.9.RWS@KILLINGTON.LCS.MIT.EDU>
Date: Tue, 13-Oct-87 08:55:00 EDT
Article-I.D.: KILLINGT.871013085528.9.RWS
Posted: Tue Oct 13 08:55:00 1987
Date-Received: Wed, 14-Oct-87 07:24:45 EDT
Sender: daemon@ucbvax.BERKELEY.EDU
Organization: The ARPA Internet
Lines: 19

VERSION:
	X11 release 1
SYNOPSIS:
	extraneous arg in CLX window-priority setf
DESCRIPTION:
	ditto
REPEAT-BY:
	try to call it
FIX:
	in lib/CLX/attributes.l, redo the defsetf as follows:

(defsetf window-priority (window &optional sibling) (mode)
  ;; A bit strange, but retains setf form.
  `(progn
     (change-drawable-geometry
       ,window 6 (position ,mode '(:above :below :top-if :bottom-if :opposite)))
     ,@(when sibling
	 `((change-drawable-geometry ,window 5 (window-id ,sibling))))
     ,mode))