From: Kevin M. Rosenberg <kevin@rosenberg.net>
Date: Sun, 16 May 2004 08:57:26 +0000 (+0000)
Subject: r9371: minor formatting change
X-Git-Tag: v3.8.6~449
X-Git-Url: http://git.kpe.io/?p=clsql.git;a=commitdiff_plain;h=0298f640eee047a87b675c6c55ca895017bf9a9f

r9371: minor formatting change
---

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."