From b506b3db34d2b253d0d6b175aac8b5613f76a360 Mon Sep 17 00:00:00 2001 Message-Id: From: Mark Wooding Date: Sun, 27 Feb 2005 23:33:34 +0000 Subject: [PATCH] Bug fix Organization: Straylight/Edgeware From: espen --- examples/ginspect.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/examples/ginspect.lisp b/examples/ginspect.lisp index f16abd1..9aa69b9 100644 --- a/examples/ginspect.lisp +++ b/examples/ginspect.lisp @@ -103,7 +103,7 @@ (defmethod decompose-describe-object ((object standard-object)) collect (let* ((slot-name (pcl:slot-definition-name slotd)) (slot-value (if (slot-boundp object slot-name) (slot-value object slot-name) - *inspect-unbound-object-marker*))) + *ginspect-unbound-object-marker*))) (cons (string slot-name) slot-value))))) -- [mdw]