master 385f2fa: Fix some sqlite doc string typos

[Lars Ingebrigtsen]

branch: master
commit 385f2faf347b18eb4624f97020a49ae7e3f315e2
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Fix some sqlite doc string typos
    
    * src/sqlite.c (Fsqlite_load_extension, Fsqlite_more_p): Fix typos
    in doc strings.
---
 src/sqlite.c             | 4 ++--
 test/src/sqlite-tests.el | 2 --
 2 files changed, 2 insertions(+), 4 deletions(-)

diff --git a/src/sqlite.c b/src/sqlite.c
index b1843bc..5098943 100644
--- a/src/sqlite.c
+++ b/src/sqlite.c
@@ -578,7 +578,7 @@ DEFUN ("sqlite-rollback", Fsqlite_rollback, 
Ssqlite_rollback, 1, 1, 0,
 
 DEFUN ("sqlite-load-extension", Fsqlite_load_extension,
        Ssqlite_load_extension, 2, 2, 0,
-       doc: /* Load a an SQlite module into DB.
+       doc: /* Load an SQlite module into DB.
 MODULE should be the file name of an SQlite module .so file.  */)
   (Lisp_Object db, Lisp_Object module)
 {
@@ -622,7 +622,7 @@ DEFUN ("sqlite-columns", Fsqlite_columns, Ssqlite_columns, 
1, 1, 0,
 }
 
 DEFUN ("sqlite-more-p", Fsqlite_more_p, Ssqlite_more_p, 1, 1, 0,
-       doc: /* Say whether there's any further results in SET.  */)
+       doc: /* Say whether there are any further results in SET.  */)
   (Lisp_Object set)
 {
   check_sqlite (set, true);
diff --git a/test/src/sqlite-tests.el b/test/src/sqlite-tests.el
index 3fffa01..412ea29 100644
--- a/test/src/sqlite-tests.el
+++ b/test/src/sqlite-tests.el
@@ -53,8 +53,6 @@
       (sqlite-select  db "select * from test1" nil 'full)
       '(("col1" "col2" "col3" "col4") ("foo" 2 9.45 "bar"))))))
 
-;; (setq db (sqlite-open))
-
 (ert-deftest sqlite-set ()
   (skip-unless (sqlite-available-p))
   (let ((db (sqlite-open))