From ee9a9ebf742df7b5b412cecc64ccf57588a6a344 Mon Sep 17 00:00:00 2001
From: aqquq <jannik.wurche@student.uni-halle.de>
Date: Wed, 3 Jul 2024 17:14:58 +0200
Subject: [PATCH] =?UTF-8?q?=F0=9F=93=A4=20add=20UploadFileView=20to=20chec?=
=?UTF-8?q?k=20and=20upload=20files=20to=20Firebase?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
---
src/Pages/UploadFileView.elm | 8 ++++++++
src/Types.elm | 1 +
src/View.elm | 19 +++++++++++--------
3 files changed, 20 insertions(+), 8 deletions(-)
create mode 100644 src/Pages/UploadFileView.elm
diff --git a/src/Pages/UploadFileView.elm b/src/Pages/UploadFileView.elm
new file mode 100644
index 0000000..080180e
--- /dev/null
+++ b/src/Pages/UploadFileView.elm
@@ -0,0 +1,8 @@
+module Pages.UploadFileView exposing (..)
+
+import Html exposing (..)
+import Types exposing (Msg)
+
+uploadView : Html Msg
+uploadView =
+ div [] []
\ No newline at end of file
diff --git a/src/Types.elm b/src/Types.elm
index 3e9417d..6f8a187 100644
--- a/src/Types.elm
+++ b/src/Types.elm
@@ -36,6 +36,7 @@ type Route
= HomeRoute
| QuestionRoute Int
| ResultRoute
+ | Upload
| NotFound
-- Represents a graph, including its window and functions.
diff --git a/src/View.elm b/src/View.elm
index 8b8bab0..31406f4 100644
--- a/src/View.elm
+++ b/src/View.elm
@@ -3,10 +3,11 @@ module View exposing (..)
import Html exposing (..)
import Browser
-import Pages.HomeView
-import Pages.QuizView
-import Pages.ResultView
-import Pages.NotFound
+import Pages.HomeView exposing (homeView)
+import Pages.QuizView exposing (questionView)
+import Pages.ResultView exposing (resultView)
+import Pages.NotFound exposing (notFoundView)
+import Pages.UploadFileView exposing (uploadView)
import Types exposing (Model, Msg(..), Route(..))
@@ -16,13 +17,15 @@ view model =
let
routeContent = case model.route of
HomeRoute ->
- Pages.HomeView.homeView model
+ homeView model
QuestionRoute n ->
- Pages.QuizView.questionView n model.quiz
+ questionView n model.quiz
ResultRoute ->
- Pages.ResultView.resultView model
+ resultView model
+ Upload ->
+ uploadView
NotFound ->
- Pages.NotFound.notFoundView
+ notFoundView
in
{ title = "Mathe Quiz App"
, body = [routeContent]
--
GitLab