From 9a4543d9e185bda0d1d7301ba201c87b7b2de6db Mon Sep 17 00:00:00 2001
From: pw <pw>
Date: Wed, 10 Apr 2002 17:18:53 +0000
Subject: [PATCH] From Iban Hatchondo:

Wrong type MEMBER in DECLARE-EVENT :CONFIGURE-REQUEST, should be MEMBER8.
---
 clx/input.lisp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/clx/input.lisp b/clx/input.lisp
index a30fa67bc..2bfb0276a 100644
--- a/clx/input.lisp
+++ b/clx/input.lisp
@@ -26,7 +26,7 @@
 ;;; 12/10/87	LGO	Created
 #+cmu
 (ext:file-comment
-  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/clx/input.lisp,v 1.8 2001/05/12 15:09:17 pw Exp $")
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/clx/input.lisp,v 1.9 2002/04/10 17:18:53 pw Exp $")
 
 (in-package :xlib)
 
@@ -910,7 +910,7 @@
   (boolean override-redirect-p))
 
 (declare-event :configure-request
-  ((data (member :above :below :top-if :bottom-if :opposite)) stack-mode)
+  ((data (member8 :above :below :top-if :bottom-if :opposite)) stack-mode)
   (card16 sequence)
   (window (parent event-window) window)
   ((or null window) above-sibling)
-- 
GitLab