From 540edfb284ad21388ef101283dcbc2d145758810 Mon Sep 17 00:00:00 2001 From: "Robert P. Goldman" <rpgoldman@gmail.com> Date: Wed, 6 Aug 2014 15:46:25 -0500 Subject: [PATCH] Fix to error format string from Matt Niemeir. --- uiop/utility.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/uiop/utility.lisp b/uiop/utility.lisp index 74780f1e..e9dd0ca0 100644 --- a/uiop/utility.lisp +++ b/uiop/utility.lisp @@ -456,7 +456,7 @@ A symbol otherwise designates a class by name." (or (and found (or (eq super t) (#-cormanlisp subtypep #+cormanlisp cl::subclassp found super)) found) - (call-function error "Can't coerce ~S to a ~@[class~;subclass of ~:*~S]" class super))))) + (call-function error "Can't coerce ~S to a ~:[class~;subclass of ~:*~S~]" class super))))) ;;; Hash-tables -- GitLab