WRITE-INSTANCE-TO-STREAM and READ-INSTANCE-FROM-STREAM
* sql/expressions.lisp: Avoid duplicate FROM names when selecting
from a table that has more than one primary index.
+ * sql/conditions.lisp: Fix printing of closed-database error
13 Jun 2004 Kevin Rosenberg <kevin@rosenberg.net>
* Version 2.11.9
:reader sql-error-connection-spec))
(:report (lambda (c stream)
(format stream "While trying to connect to database ~A~% using database-type ~A:~% Error ~D / ~A~% has occurred."
- (database-name-from-spec
- (sql-error-connection-spec c)
- (sql-error-database-type c))
+ (when (and (sql-error-connection-spec c)
+ (sql-error-database-type c))
+ (database-name-from-spec
+ (sql-error-connection-spec c)
+ (sql-error-database-type c)))
(sql-error-database-type c)
(sql-error-error-id c)
(sql-error-database-message c))))
(defun signal-closed-database-error (database)
(error 'sql-fatal-error
:database database
+ :connection-spec (when database (connection-spec database))
+ :database-type (when database (database-type database))
:message "Database is closed."))
(defun signal-no-database-error (database)