From 7fd309f262b63a630a83c8a8139e9cf76ecec795 Mon Sep 17 00:00:00 2001 Message-Id: <7fd309f262b63a630a83c8a8139e9cf76ecec795.1717041071.git.mdw@distorted.org.uk> From: Mark Wooding Date: Mon, 10 Apr 2006 18:38:42 +0000 Subject: [PATCH] Bug fix 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 5012e40..65303a9 100644 --- a/gdk/gdk.lisp +++ b/gdk/gdk.lisp @@ -20,7 +20,7 @@ ;; TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE ;; SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. -;; $Id: gdk.lisp,v 1.23 2006/04/10 18:27:58 espen Exp $ +;; $Id: gdk.lisp,v 1.24 2006/04/10 18:38:42 espen Exp $ (in-package "GDK") @@ -531,7 +531,7 @@ (defmethod initialize-instance ((color color) &rest initargs (defbinding color-parse (spec &optional (make-instance 'color)) boolean (spec string) - (color color :in/return)) + (color color :return)) (defun ensure-color (color) (etypecase color -- [mdw]