From 6b841f66fd7aca6bdbf36bc747de4d2e14a4a521 Mon Sep 17 00:00:00 2001
From: Matthew Wild <mwild1@gmail.com>
Date: Wed, 10 Oct 2018 22:03:11 +0100
Subject: storagemanager tests: Add some additional checks
---
spec/core_storagemanager_spec.lua | 12 ++++++++++++
1 file changed, 12 insertions(+)
diff --git a/spec/core_storagemanager_spec.lua b/spec/core_storagemanager_spec.lua
index ea518c62..25e5cc6a 100644
--- a/spec/core_storagemanager_spec.lua
+++ b/spec/core_storagemanager_spec.lua
@@ -108,7 +108,9 @@ describe("storagemanager", function ()
with = "contact@example.com";
});
assert.truthy(data);
+ local count = 0;
for id, item, when in data do
+ count = count + 1;
assert.truthy(id);
assert(st.is_stanza(item));
assert.equal("test", item.name);
@@ -116,10 +118,20 @@ describe("storagemanager", function ()
assert.equal(2, #item.tags);
assert.equal(test_time, when);
end
+ assert.equal(1, count);
end);
it("can be purged", function ()
local ok, err = archive:delete("user");
assert.truthy(ok);
+ local data, err = archive:find("user", {
+ with = "contact@example.com";
+ });
+ assert.truthy(data);
+ local count = 0;
+ for id, item, when in data do -- luacheck: ignore id item when
+ count = count + 1;
+ end
+ assert.equal(0, count);
end);
end);
end);
--
cgit v1.2.3