From: Kevin M. Rosenberg Date: Fri, 4 Apr 2003 00:03:30 +0000 (+0000) Subject: r4370: Auto commit for Debian build X-Git-Tag: debian-2.11.0-2~165 X-Git-Url: http://git.kpe.io/?p=hyperobject.git;a=commitdiff_plain;h=080c65a15ef9aaf30d72d73fec24c77d3d474f5f r4370: Auto commit for Debian build --- diff --git a/mop.lisp b/mop.lisp index 2c6d17e..d8dfe61 100644 --- a/mop.lisp +++ b/mop.lisp @@ -11,7 +11,7 @@ ;;;; in Text, HTML, and XML formats. This includes hyperlinking ;;;; capability and sub-objects. ;;;; -;;;; $Id: mop.lisp,v 1.39 2003/04/04 00:01:36 kevin Exp $ +;;;; $Id: mop.lisp,v 1.40 2003/04/04 00:03:30 kevin Exp $ ;;;; ;;;; This file is Copyright (c) 2000-2002 by Kevin M. Rosenberg ;;;; @@ -303,7 +303,7 @@ #+lispworks '(the-class the-instance the-slot-name) #+lispworks - '((ignore the-class)) + nil #+lispworks `(setf (slot-value the-instance the-slot-name) (,reader ,@keys)) nil)