Fix a test.

fukamachi · Aug 8, 2024 · f58761b · f58761b
1 parent ae02bd7
commit f58761b
Showing 1 changed file with 0 additions and 1 deletion.
diff --git a/t/dbd/postgres.lisp b/t/dbd/postgres.lisp
@@ -38,7 +38,6 @@
               (make-cursor conn "SELECT * FROM person")))
         (execute cursor)
         (ok (equal (getf (fetch cursor) :|name|) "Woody"))
-        (ok (equal (getf (fetch cursor :peek t) :|name|) "Buzz"))
         (ok (equal (getf (fetch cursor) :|name|) "Buzz"))))
     (with-transaction conn
       (let ((cursor (make-cursor conn "SELECT * FROM person WHERE name = 'Trixie'")))