X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=sql%2Fconditions.lisp;h=cfe3aa34dc407dc297071507c4324c168b47f57f;hp=571054d4d95e9d10128c58c356b578383379b93e;hb=0298f640eee047a87b675c6c55ca895017bf9a9f;hpb=5398a720dd42b3c2787ff67414e6ce424bc34e1b

diff --git a/sql/conditions.lisp b/sql/conditions.lisp
index 571054d..cfe3aa3 100644
--- a/sql/conditions.lisp
+++ b/sql/conditions.lisp
@@ -104,7 +104,7 @@ and signal an clsql-invalid-spec-error if they don't match."
    (error :initarg :error :initarg nil :reader clsql-sql-error-error))
   (:report (lambda (c stream)
 	     (if (clsql-sql-error-message c)
-		 (format stream "While accessing database ~A~%, Error~%  ~A~%  has occurred."
+		 (format stream "While accessing database ~A,~%  Error ~A~%  has occurred."
 			 (clsql-sql-error-database c)
 			 (clsql-sql-error-message c))
 	       (format stream "While accessing database ~A~%  with expression ~S:~%  Error ~D / ~A~%  has occurred."