diff --git a/projects/_deprecated/flixel-desktop-handloose/Project.xml b/projects/_deprecated/flixel-desktop-handloose/Project.xml
index 0f6c8c39..a75ed1fd 100644
--- a/projects/_deprecated/flixel-desktop-handloose/Project.xml
+++ b/projects/_deprecated/flixel-desktop-handloose/Project.xml
@@ -35,6 +35,9 @@
+
+
+
diff --git a/projects/_standalone/habit-puzzles/Project.xml b/projects/_standalone/habit-puzzles/Project.xml
index 67cc6a8e..36282e93 100644
--- a/projects/_standalone/habit-puzzles/Project.xml
+++ b/projects/_standalone/habit-puzzles/Project.xml
@@ -42,6 +42,10 @@
+
+
+
+
diff --git a/projects/_standalone/habit-puzzles/source/HabitModel.kiss b/projects/_standalone/habit-puzzles/source/HabitModel.kiss
index 8fe60c3e..c924daf4 100644
--- a/projects/_standalone/habit-puzzles/source/HabitModel.kiss
+++ b/projects/_standalone/habit-puzzles/source/HabitModel.kiss
@@ -9,7 +9,6 @@
(defNew [&prop :String textFile]
(let [s (Stream.fromFile textFile)
&mut lastHeader ""]
- // TODO could be whileLet
(loop
(case (s.takeLine)
((Some "DAILY")
@@ -183,7 +182,6 @@
(when (= today 0) (set today 7))
(and !(= lastDayDone (todayString)) (contains days today))))
((Monthly days lastDayDone)
- // TODO logic
(let [&mut nextDay
(DateTime.fromDate (Date.now))
oneDayInterval (DateTimeInterval.create (DateTime.make 1970 1 1) (DateTime.make 1970 1 2))