Changeset 361 for trunk/t/32_supersearch_simple_metadata.t

Timestamp:

06/07/04 21:39:35 (5 years ago)

Author:

kake

Message:

Test overhaul - no longer require database access info.

Files:

• trunk/t/32_supersearch_simple_metadata.t (modified) (2 diffs)

trunk/t/32_supersearch_simple_metadata.t

@@ -1 @@
-local $^W = 1;
 use strict;
 use CGI::Wiki::Setup::SQLite;
 use Config::Tiny;
 use OpenGuides::SuperSearch;
-use Test::More;
+use Test::More tests => 10;
 
 eval { require DBD::SQLite; };
+my $have_sqlite = $@ ? 0 : 1;
 
-if ( $@ ) {
-    plan skip_all => "DBD::SQLite needed to run these tests";
-} else {
-    plan tests => 10;
+SKIP: {
+    skip "DBD::SQLite not installed - no database to test with", 10
+      unless $have_sqlite;
 
-    # Ensure the test database is set up.
-    CGI::Wiki::Setup::SQLite::setup( "t/sqlite.32.db" );
-
+    CGI::Wiki::Setup::SQLite::setup( { dbname => "t/node.db" } );
     my $config = Config::Tiny->new;
     $config->{_} = {
                      dbtype             => "sqlite",
-                     dbname             => "t/sqlite.32.db",
-                     indexing_directory => "t/index.32/",
+                     dbname             => "t/node.db",
+                     indexing_directory => "t/indexes",
                      script_name        => "wiki.cgi",
                      script_url         => "http://example.com/",
@@ -26 +23 @@
                      template_path      => "./templates",
                    };
+
     my $search = OpenGuides::SuperSearch->new( config => $config );