[Bps-public-commit] r11386 - in SVN-PropDB: .
jesse at bestpractical.com
jesse at bestpractical.com
Wed Apr 2 05:23:53 EDT 2008
Author: jesse
Date: Wed Apr 2 05:23:52 2008
New Revision: 11386
Modified:
SVN-PropDB/ (props changed)
SVN-PropDB/lib/Prophet/Test/Participant.pm
Log:
r28982 at 31b: jesse | 2008-04-01 23:23:37 -1000
* it's ok to skip update/delete if you don't have any nodes to play with
Modified: SVN-PropDB/lib/Prophet/Test/Participant.pm
==============================================================================
--- SVN-PropDB/lib/Prophet/Test/Participant.pm (original)
+++ SVN-PropDB/lib/Prophet/Test/Participant.pm Wed Apr 2 05:23:52 2008
@@ -77,6 +77,7 @@
my $args = shift;
$args->{record} ||= get_random_local_record();
+ return undef unless ($args->{record});
$self->record_action('delete_record', $args);
run_ok('prophet-node-delete', [qw(--type Scratch --uuid), $args->{record}]);
@@ -100,10 +101,8 @@
my $args = shift;
$args->{record} ||= get_random_local_record();
- unless($args->{'record'}) {
- ok(0,"The user didn't have a record in their db - ".$ENV{'PROPHET_USER'}) ;
- return;
- }
+ return undef unless($args->{'record'});
+
my ($ok, $stdout, $stderr) = run_script('prophet-node-show', [qw(--type Scratch --uuid), $args->{record}]);
my %props = map { split(/: /,$_,2) } split(/\n/,$stdout);
More information about the Bps-public-commit
mailing list