More PPT fixes...

SineSwiper · Jun 18, 2013 · ad0a465 · ad0a465
1 parent 77fda0d
commit ad0a465
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/lib/P9Y/ProcessTable/Role/Table/PPT.pm b/lib/P9Y/ProcessTable/Role/Table/PPT.pm
@@ -52,7 +52,7 @@ sub _process_hash {
    my ($self, $pid) = @_;
    my $process = first { $_->pid == $pid } @{ $pt->table };
    return unless $process;
-   return $self->_convert_process;
+   return $self->_convert_process($process);
 }
 
 sub _convert_process {

diff --git a/t/51-basic.t b/t/51-basic.t
@@ -8,7 +8,7 @@ lives_ok { @tbl = P9Y::ProcessTable->table } 'get table';
 cmp_ok(@tbl, '>', 5, 'more than 5 processes');
 
 my $p = P9Y::ProcessTable->process;
-isa_ok($p, 'P9Y::ProcessTable::Process') || always_explain P9Y::ProcessTable::Table->_process_hash($$);
+isa_ok($p, 'P9Y::ProcessTable::Process') || always_explain( P9Y::ProcessTable::Table->_process_hash($$) );
 
 # neuter the ENV vars before posting
 if ($p->has_environ) {