[patch] Quoting of string literals

It looks like CLSQL quotes the quote (') character using a backslash.
I think (I never actually saw the standard) that it should double the
quote instead.  This is an issue for the sqlite backend.

I had to apply the following patch to solve my problem.

Thanks for that great library,
Kim Minh.

--- clsql-2.11.12/sql/fdml.lisp.orig    2004-07-03 04:41:04.000000000 +0200
+++ clsql-2.11.12/sql/fdml.lisp 2004-07-05 18:48:59.000000000 +0200
@@ -213,7 +213,7 @@
                (declare (type integer i j))
                (let ((char (aref str i)))
                  (cond ((eql char #\')
-                        (setf (aref buf j) #\\)
+                        (setf (aref buf j) #\')
                         (incf j)
                         (setf (aref buf j) #\'))
                        ((eql char #\\)