[svn:p5ee] r14579 - p5ee/trunk/App-WorkQueue/lib/App/WorkQueue
[email protected] Wed, 15 Dec 2010 11:29:57 -0800 (PST)
| Newsgroups | perl.cvs.p5ee |
|---|---|
| Message-ID | <[email protected]> |
Author: spadkins
Date: Wed Dec 15 11:29:57 2010
New Revision: 14579
Modified:
p5ee/trunk/App-WorkQueue/lib/App/WorkQueue/Memory.pm
Log:
modified sub update to return nrows
Modified: p5ee/trunk/App-WorkQueue/lib/App/WorkQueue/Memory.pm
==============================================================================
--- p5ee/trunk/App-WorkQueue/lib/App/WorkQueue/Memory.pm (original)
+++ p5ee/trunk/App-WorkQueue/lib/App/WorkQueue/Memory.pm Wed Dec 15 11:29:57 2010
@@ -74,8 +74,9 @@
sub update {
&App::sub_entry if ($App::trace);
my ($self, $entry, $columns, $values) = @_;
- $self->_update_ref($entry, $columns, $values);
- &App::sub_exit() if ($App::trace);
+ my $nrows = $self->_update_ref($entry, $columns, $values);
+ &App::sub_exit($nrows) if ($App::trace);
+ return $nrows;
}
sub num_entries {