# HG changeset patch
# User Kim Alvefur <zash@zash.se>
# Date 1454426858 -3600
# Node ID 459e1878d23cf3dcbf88a19f91933b604a059652
# Parent  464edd03099a029db5b3554f9e63652753469966
mod_storage_xmlarchive: Return earlier if attempting to delete from empty archive

diff -r 464edd03099a -r 459e1878d23c mod_storage_xmlarchive/mod_storage_xmlarchive.lua
--- a/mod_storage_xmlarchive/mod_storage_xmlarchive.lua	Tue Feb 02 16:26:21 2016 +0100
+++ b/mod_storage_xmlarchive/mod_storage_xmlarchive.lua	Tue Feb 02 16:27:38 2016 +0100
@@ -182,7 +182,11 @@
 	end
 	local before = query.before or query["end"] or "9999-12-31";
 	if type(before) == "number" then before = dt.date(before); else before = before:sub(1, 10); end
-	local dates = dm.list_load(username, module.host, self.store) or empty;
+	local dates, err = dm.list_load(username, module.host, self.store);
+	if not dates or next(dates) == nil then
+		if not err then return true end -- already empty
+		return dates, err;
+	end
 	local remaining_dates = {};
 	for d = 1, #dates do
 		if dates[d] >= before then