diff options
author | Robin Edwards <robin.ge@gmail.com> | 2011-02-08 16:22:17 +0000 |
---|---|---|
committer | Robin Edwards <robin.ge@gmail.com> | 2011-02-08 16:22:17 +0000 |
commit | 82d16fa8b502a1246bf284e45bb71cf8ddc68eb1 (patch) | |
tree | dbc737a3023b65a59d5a128c25ced460a727577f /t | |
parent | updated change log (diff) | |
download | net-riak-82d16fa8b502a1246bf284e45bb71cf8ddc68eb1.tar.gz |
added skip if riak env not set
Diffstat (limited to '')
-rw-r--r-- | t/90_bug_links.t | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/t/90_bug_links.t b/t/90_bug_links.t index e1f71db..1c209eb 100644 --- a/t/90_bug_links.t +++ b/t/90_bug_links.t @@ -1,16 +1,17 @@ -use Data::Dumper; +use strict; +use warnings; use Net::Riak; use Test::More; BEGIN { - unless ( $ENV{RELEASE_TESTING} ) { + unless ( $ENV{RIAK_REST_HOST} ) { require Test::More; Test::More::plan( - skip_all => 'these tests are for release candidate testing' ); + skip_all => 'RIAK_REST_HOST not set.. skipping' ); } } -ok my $client = Net::Riak->new(host => 'http://127.0.0.1:8098'), 'client created'; +ok my $client = Net::Riak->new(host => $ENV{RIAK_REST_HOST}), 'client created'; # set up a bucket containing two person/user records and store them my $bucket_one = $client->bucket('ONE'); |