X-Git-Url: https://git.distorted.org.uk/~mdw/clg/blobdiff_plain/ade112f80d1cd6c323769d60784e7e8eb623687f..b506b3db34d2b253d0d6b175aac8b5613f76a360:/examples/ginspect.lisp 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 @@ 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)))))