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