From: Christophe Rhodes <csr21@cam.ac.uk>
Date: Tue, 14 Feb 2006 09:27:20 +0000 (+0000)
Subject: 0.9.9.28:
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=5b223181b0fdec8eaad5e787aa0d0340960fee3b;p=sbcl.git

0.9.9.28:
	Whoops.  SB-INTROSPECT is (was) using one of the symbols I
	renamed in 0.9.9.27...
---

diff --git a/contrib/sb-introspect/sb-introspect.lisp b/contrib/sb-introspect/sb-introspect.lisp
index d0bcbac..d614307 100644
--- a/contrib/sb-introspect/sb-introspect.lisp
+++ b/contrib/sb-introspect/sb-introspect.lisp
@@ -284,8 +284,8 @@ If an unsupported TYPE is requested, the function will return NIL.
               (sb-kernel::layout-source-location layout)))))))
     (method-combination
      (car
-      (find-definition-sources-by-name (sb-pcl::method-combination-type object)
-                                       :method-combination)))
+      (find-definition-sources-by-name
+       (sb-pcl::method-combination-type-name object) :method-combination)))
     (package
      (translate-source-location (sb-impl::package-source-location object)))
     (class
diff --git a/version.lisp-expr b/version.lisp-expr
index 77fb146..6ee12c9 100644
--- a/version.lisp-expr
+++ b/version.lisp-expr
@@ -17,4 +17,4 @@
 ;;; checkins which aren't released. (And occasionally for internal
 ;;; versions, especially for internal versions off the main CVS
 ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)
-"0.9.9.27"
+"0.9.9.28"