[elephant-cvs] CVS update: elephant/src/berkeley-db.lisp

[blee at common-lisp.net]

Update of /project/elephant/cvsroot/elephant/src
In directory common-lisp.net:/tmp/cvs-serv27751/src

Modified Files:
	berkeley-db.lisp 
Log Message:
docstring fix

Date: Sun Sep 19 19:46:57 2004
Author: blee

Index: elephant/src/berkeley-db.lisp
diff -u elephant/src/berkeley-db.lisp:1.1 elephant/src/berkeley-db.lisp:1.2
--- elephant/src/berkeley-db.lisp:1.1	Thu Sep 16 06:19:57 2004
+++ elephant/src/berkeley-db.lisp	Sun Sep 19 19:46:56 2004
@@ -1370,5 +1370,5 @@
    (lambda (condition stream)
      (declare (type db-error condition) (type stream stream))
      (format stream "Berkeley DB error: ~A"
-	     (db-strerror (db-error-errno condition))))
-   :documentation "Berkeley DB / Sleepycat errors."))
+	     (db-strerror (db-error-errno condition)))))
+  (:documentation "Berkeley DB / Sleepycat errors."))