From 67824820bfd28d7fe23a898f2b48d01196b22a1c Mon Sep 17 00:00:00 2001 Message-Id: <67824820bfd28d7fe23a898f2b48d01196b22a1c.1746378959.git.mdw@distorted.org.uk> From: Mark Wooding Date: Thu, 28 Oct 2004 09:37:27 +0000 Subject: [PATCH] Fixed small syntax error Organization: Straylight/Edgeware From: espen --- gdk/gdk.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/gdk/gdk.lisp b/gdk/gdk.lisp index 69835ef..d6c2b0c 100644 --- a/gdk/gdk.lisp +++ b/gdk/gdk.lisp @@ -15,7 +15,7 @@ ;; License along with this library; if not, write to the Free Software ;; Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA -;; $Id: gdk.lisp,v 1.8 2004/10/28 09:28:25 espen Exp $ +;; $Id: gdk.lisp,v 1.9 2004/10/28 09:37:27 espen Exp $ (in-package "GDK") @@ -273,7 +273,7 @@ (defbinding window-get-pointer () window (defbinding %get-default-root-window () window) -(defun get-root-window (%optional display) +(defun get-root-window (&optional display) (if display (error "Not implemented") (%get-default-root-window))) -- [mdw]