From 6d0d8dfb8b53d8e7e39b2569943adbaed4babeaa Mon Sep 17 00:00:00 2001 From: Drew Crampsie Date: Thu, 23 Feb 2006 19:24:51 -0800 Subject: [PATCH 1/1] removed warning which caused error darcs-hash:20060224032451-5417e-9773dccc4a0a7662d6a6b89488d3721fce7987ca.gz --- src/mewa.lisp | 1 - 1 file changed, 1 deletion(-) diff --git a/src/mewa.lisp b/src/mewa.lisp index 7bb9522..1b7d9e2 100644 --- a/src/mewa.lisp +++ b/src/mewa.lisp @@ -505,7 +505,6 @@ in that object presentation." type) (plist-union initargs (when a (description.properties a)))))) - (warn "attribute? ~A ~A " (and a (description.type (find-attribute object type)) ) (description.properties a)) (setf (slot-value i 'instance) object) (initialize-slots i) (setf (slot-value i 'initializedp) t) -- 2.20.1