From c4874967a9af719a5cf176677007120fe2cbb036 Mon Sep 17 00:00:00 2001 From: "Kevin M. Rosenberg" Date: Mon, 12 Apr 2004 18:29:08 +0000 Subject: [PATCH] r8978: fix cleanup after a test --- ChangeLog | 4 ++++ tests/test-fddl.lisp | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/ChangeLog b/ChangeLog index 04cb77a..751cd4f 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,7 @@ +12 Apr 2004 Kevin Rosenberg (kevin@rosenberg.net) + * Version 2.6.8 + * test/test-fddl.lisp: Cleanup fix from Marcus Pearce + 12 Apr 2004 Kevin Rosenberg (kevin@rosenberg.net) * Version 2.6.7 * sql/*.lisp: Remove schema versioning cruft diff --git a/tests/test-fddl.lisp b/tests/test-fddl.lisp index ef79615..def32cb 100644 --- a/tests/test-fddl.lisp +++ b/tests/test-fddl.lisp @@ -165,7 +165,7 @@ :if-does-not-exist :ignore)) (t (clsql:drop-index [bar]:if-does-not-exist :ignore))) - (clsql:view-exists-p [bar] :owner *test-database-user*)))) + (clsql:index-exists-p [bar] :owner *test-database-user*)))) t nil) ;; create indexes with names as strings, symbols and in square brackets -- 2.34.1