diff --git a/src/ShapePicture_Editor.elm b/src/ShapePicture_Editor.elm deleted file mode 100644 index ec2fb0ce2f0e4e8d64c8811255b88c0c6ed98dac..0000000000000000000000000000000000000000 --- 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