X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fpcl%2Fdescribe.lisp;h=b02ccb0b404722b6731fac518143357e5aeba901;hb=683874b497a99cd2c11b6c5d9b47e2785b1ede5f;hp=998d45c79dd469dc6b145e90c9093d8f3f6dcdf9;hpb=59f7d9254f3601cfd48f0c299d5c30562111e991;p=sbcl.git

diff --git a/src/pcl/describe.lisp b/src/pcl/describe.lisp
index 998d45c..b02ccb0 100644
--- a/src/pcl/describe.lisp
+++ b/src/pcl/describe.lisp
@@ -115,7 +115,7 @@
 	    (ft "It has no name (the name is NIL).~%")))
       (ft "The direct superclasses are: ~:S, and the direct~%~
 	   subclasses are: ~:S. The class precedence list is:~%~S~%~
-	   There are ~D methods specialized for this class."
+	   There are ~W methods specialized for this class."
 	  (mapcar #'pretty-class (class-direct-superclasses class))
 	  (mapcar #'pretty-class (class-direct-subclasses class))
 	  (mapcar #'pretty-class (class-precedence-list class))