From 156b164bc84b8c01fe5a586108babb20cbad1923 Mon Sep 17 00:00:00 2001 From: Andrew Yates <ayates@ebi.ac.uk> Date: Fri, 8 Jun 2012 10:58:56 +0000 Subject: [PATCH] Skip now works. --- modules/t/schema.t | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/modules/t/schema.t b/modules/t/schema.t index ed637e1f2b..f28a150b98 100644 --- a/modules/t/schema.t +++ b/modules/t/schema.t @@ -16,10 +16,9 @@ my $sql_file = catfile($sql_dir, 'table.sql'); my $result = ok(-f $sql_file, 'Checking SQL schema file exists'); -if(! $result) { - skip 'Skipping DB creation tests as schema file cannot be found at '.$sql_file, 1; -} -else { +SKIP: { + skip 'Skipping DB creation tests as schema file cannot be found at '.$sql_file, 1 unless $result; + #Create DB & load schema my $new_db_name = $db->create_db_name('temp'); note 'Creating database '.$new_db_name; @@ -40,4 +39,5 @@ else { note 'Dropping database '.$new_db_name; $dba->dbc()->do("drop database $new_db_name"); } + done_testing(); \ No newline at end of file -- GitLab