From d7267a7d674531d3098bef63516f327a8d631620 Mon Sep 17 00:00:00 2001
From: Jesse Gumm <gumm@sigma-star.com>
Date: Wed, 4 Jan 2017 15:53:16 -0600
Subject: [PATCH] Add sunday test to beginning_week

---
 src/qdate.erl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/qdate.erl b/src/qdate.erl
index 19caa69..6e93230 100644
--- a/src/qdate.erl
+++ b/src/qdate.erl
@@ -1264,7 +1264,9 @@ arith_tests(_) ->
         ?_assertEqual({{2017,1,2},{0,0,0}}, beginning_week({{2017,1,3},{0,0,0}})),
         ?_assertEqual({{2017,1,3},{0,0,0}}, beginning_week(2, {{2017,1,4},{0,0,0}})),
         ?_assertEqual({{2016,12,29},{0,0,0}}, beginning_week(4, {{2017,1,4},{0,0,0}})),
-        ?_assertEqual({{2016,12,31},{0,0,0}}, beginning_week(6, {{2017,1,6},{0,0,0}}))
+        ?_assertEqual({{2016,12,31},{0,0,0}}, beginning_week(6, {{2017,1,6},{0,0,0}})),
+        ?_assertEqual({{2017,1,1},{0,0,0}}, beginning_week(7, {{2017,1,6},{0,0,0}}))
+
     ]}.