X-Git-Url: http://git.boinkor.net/gitweb/sbcl.git/blobdiff_plain/829d76d5f12e1c1b6b21ca4c71b34719b8fed5e1..4d31006db24db375cdb83a5726d66c524b36689c:/src/pcl/std-class.lisp

diff --git a/src/pcl/std-class.lisp b/src/pcl/std-class.lisp
index c7869ec..b1a60df 100644
--- a/src/pcl/std-class.lisp
+++ b/src/pcl/std-class.lisp
@@ -963,7 +963,7 @@
               (style-warn
                "~@<slot names with the same SYMBOL-NAME but ~
                   different SYMBOL-PACKAGE (possible package problem) ~
-                  for class ~S:~4I~@:_~<~@{~S~^~:@_~}~:>~@:>"
+                  for class ~S:~4I~@:_~<~@{~/sb-impl::print-symbol-with-prefix/~^~:@_~}~:>~@:>"
                class dupes)))
         (let* ((slot (car slots))
                (oslots (remove (slot-definition-name slot) (cdr slots)