select by id support

[dbsrgits/DBIx-Data-Store-old.git] / lib / DBIx / Data / Store / Command / Row.pm

diff --git a/lib/DBIx/Data/Store/Command/Row.pm b/lib/DBIx/Data/Store/Command/Row.pm
index 402b616..53cb4b5 100644 (file)
--- a/lib/DBIx/Data/Store/Command/Row.pm
+++ b/lib/DBIx/Data/Store/Command/Row.pm
@@ -7,7 +7,7 @@ use Method::Signatures::Simple;
 has 'column_order' => (is => 'ro', required => 1);
 
 method execute {
-  my $result = (my $stream = DBIx::Data::Stream::STH->new(
+  return unless my ($result) = (my $stream = DBIx::Data::Stream::STH->new(
     sth => $self->_new_active_sth, column_order => $self->column_order,
   ))->next;
   if ($stream->next) {