From 9ec7d09a3196930846e9ddec30e7ce7da2720055 Mon Sep 17 00:00:00 2001 From: Edward Sabinus <edward.sabinus@student.uni-halle.de> Date: Tue, 7 Jul 2020 16:36:26 +0200 Subject: [PATCH] Revert "Update correct Shapepicture editor.elm" This reverts commit e98b702fcb867dca8003f9ec3c792f5bd24e5ea3 --- src/ShapePicture_Editor.elm | 49 ------------------------------------- 1 file changed, 49 deletions(-) delete mode 100644 src/ShapePicture_Editor.elm diff --git a/src/ShapePicture_Editor.elm b/src/ShapePicture_Editor.elm deleted file mode 100644 index ec2fb0c..0000000 --- a/src/ShapePicture_Editor.elm +++ /dev/null @@ -1,49 +0,0 @@ -module ShapePicture_Editor exposing (main) ---Browser -import Browser -import Browser.Navigation as Nav --- Url -import Url --- Own -import TypeHolder exposing (Model, Msg(..)) -import Manager.UpdateManager exposing (update) -import Manager.ViewManager exposing (documentView) -import Manager.StateManager as StM -import Util.Util exposing (Picture, isEdit) - -main = Browser.application - { init = init - , subscriptions = subscriptions - , update = update - , view = documentView - , onUrlChange = UrlChanged - , onUrlRequest = LinkClicked - } --- INIT -init : () -> Url.Url -> Nav.Key-> (Model, Cmd Msg) -init _ url key = - ( Model - StM.Standby - [] - 0 - (Ok " Init") - ( Picture - ( Url.Url - Url.Http - "www.informatik.uni-halle.de" - Nothing - "/im/1285058520_1381_00_800.jpg" - Nothing - Nothing - ) - 0 - 0 - ) - (isEdit url) - url - key - , Cmd.none - ) --- SUBSCRIPTIONS -subscriptions : Model -> Sub Msg -subscriptions model = Sub.none -- GitLab