From 1c2993dd867c73500c8b03551e6abf8331597f0d Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Sun, 28 Sep 2008 23:33:41 +0000
Subject: [PATCH] merge in a missing change required for NotifyAboutLowStock

---
 lib/WebGUI/Asset.pm | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/lib/WebGUI/Asset.pm b/lib/WebGUI/Asset.pm
index 6456b3477..9b43e6624 100644
--- a/lib/WebGUI/Asset.pm
+++ b/lib/WebGUI/Asset.pm
@@ -1111,9 +1111,14 @@ while (my $product = $productIterator->()) {
 sub getIsa {
     my $class    = shift;
     my $session  = shift;
+    my $offset   = shift;
     my $def = $class->definition($session);
     my $tableName = $def->[0]->{tableName};
-    my $sth = $session->db->read("select distinct(assetId) from $tableName");
+    my $sql = "select distinct(assetId) from $tableName";
+    if (defined $offset) {
+        $sql .= ' LIMIT '. $offset . ',1234567890';
+    }
+    my $sth = $session->db->read($sql);
     return sub {
         my ($assetId) = $sth->array;
         if (!$assetId) {
@@ -1409,6 +1414,8 @@ Name value pairs to add to the URL in the form of:
 
 =cut
 
+=cut
+
 sub getUrl {
 	my $self = shift;
 	my $params = shift;