- Timestamp:
- Nov 27, 2019, 12:04:14 PM (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/Nebulous-Server/t/11_server_is_valid_volume_name.t
r24356 r41172 8 8 use warnings FATAL => qw( all ); 9 9 10 use Test::More tests => 3;10 use Test::More tests => 5; 11 11 12 12 use lib qw( ./t ./lib ); … … 31 31 Test::Nebulous->setup; 32 32 33 is($neb->_is_valid_volume_name('foo', 'node99'), undef, "invalid volume name"); 33 is($neb->_is_valid_volume_name('foo', 'node99'), 0, "invalid volume name"); 34 35 Test::Nebulous->setup; 36 37 # key does not need to exist (is hashed to select db server) 38 ok($neb->_is_valid_volume_name('bax', 'node01'), "valid volume name"); 39 40 Test::Nebulous->setup; 41 42 # 'any' should always be a valid name 43 ok($neb->_is_valid_volume_name('foo', 'any'), "valid volume name"); 34 44 35 45 Test::Nebulous->cleanup;
Note:
See TracChangeset
for help on using the changeset viewer.
