Changeset 5504 for trunk/Nebulous/t/03_server_create_object.t
- Timestamp:
- Nov 10, 2005, 12:07:53 PM (21 years ago)
- File:
-
- 1 edited
-
trunk/Nebulous/t/03_server_create_object.t (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/Nebulous/t/03_server_create_object.t
r5502 r5504 3 3 # Copryight (C) 2004-2005 Joshua Hoblitt 4 4 # 5 # $Id: 03_server_create_object.t,v 1. 9 2005-11-10 21:53:56jhoblitt Exp $5 # $Id: 03_server_create_object.t,v 1.10 2005-11-10 22:07:53 jhoblitt Exp $ 6 6 7 7 use strict; 8 8 use warnings FATAL => qw( all ); 9 9 10 use Test::More tests => 1 3;10 use Test::More tests => 14; 11 11 12 12 use lib qw( ./t ./lib ); … … 90 90 91 91 eval { 92 $neb->create_object( 1, 0, 'node01', 'x' x 256 ); 93 }; 94 like( $@, qr/comment length/, "comment is too long" ); 95 96 Test::Nebulous->setup; 97 98 eval { 92 99 $neb->create_object(); 93 100 };
Note:
See TracChangeset
for help on using the changeset viewer.
