Create an empty but reachable user page

1 files changed, 0 insertions, 21 deletions

diff --git a/src/client/elm/LoggedIn/Monthly/Update.elm b/src/client/elm/LoggedIn/Monthly/Update.elm
deleted file mode 100644
index 62b40e6..0000000
--- a/src/client/elm/LoggedIn/Monthly/Update.elm
+++ /dev/null
@@ -1,21 +0,0 @@
-module LoggedIn.Monthly.Update
-  ( update
-  ) where
-
-import LoggedIn.Monthly.Action as MonthlyAction
-import LoggedIn.Monthly.Model as MonthlyModel
-
-update : MonthlyAction.Action -> MonthlyModel.Model -> MonthlyModel.Model
-update action monthly =
-  case action of
-    MonthlyAction.ToggleDetail ->
-      { monthly | visibleDetail = not monthly.visibleDetail }
-    MonthlyAction.AddPayment payment ->
-      { monthly
-      | payments = payment :: monthly.payments
-      , visibleDetail = True
-      }
-    MonthlyAction.DeletePayment payment ->
-      { monthly
-      | payments = List.filter (((/=) payment.id) << .id) monthly.payments
-      }