# HG changeset patch
# User Kim Alvefur <zash@zash.se>
# Date 1471098205 -7200
# Node ID b34f4591366a3d5e905305727a845352d3f6138f
# Parent  9c99200afd17e7947a268a8bea0938809ad70a67
mod_storage_xmlarchive: Fix date pattern in purge (related to #725)

diff -r 9c99200afd17 -r b34f4591366a mod_storage_xmlarchive/mod_storage_xmlarchive.lua
--- a/mod_storage_xmlarchive/mod_storage_xmlarchive.lua	Fri Aug 12 18:20:08 2016 +0200
+++ b/mod_storage_xmlarchive/mod_storage_xmlarchive.lua	Sat Aug 13 16:23:25 2016 +0200
@@ -219,7 +219,7 @@
 function provider:purge(username)
 	for store in dm.stores(username, module.host) do
 		local dates = dm.list_load(username, module.host, store) or empty;
-		if dates[1] and type(dates[1]) == "string" and dates[1]:match("^%d%d%d%d%-%d%d-%d%d$") then
+		if dates[1] and type(dates[1]) == "string" and dates[1]:match("^%d%d%d%d%-%d%d%-%d%d$") then
 			module:log("info", "Store %s looks like an archive store, emptying it...", store);
 			provider:open(store, "archive"):delete(username);
 		end