vbrandl/yagcdn
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Change hostname

Browse Source
This commit is contained in:
Valentin Brandl
2019-07-27 20:33:26 +02:00
parent b1b611326a
commit 504cd02ca0
2 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
frontend/src/Data.elm
View File

@ -1,9 +1,9 @@
module Data exposing (Provider(..), Url, pathSeparator, toHost, toUrl)
module Data exposing (Provider(..), Url, hostname, pathSeparator, toHost, toUrl)
hostname : String
hostname =
"https://cdn.hitsofcode.com/"
"https://gitcdn.tk/"
type Provider

4
frontend/src/Main.elm
View File

@ -1,7 +1,7 @@
module Main exposing (Model, Msg(..), init, main, update, view)
import Browser
import Data exposing (Url, toHost, toUrl)
import Data exposing (Url, hostname, toHost, toUrl)
import Html exposing (Html, br, div, h1, input, table, td, text, tr)
import Html.Attributes exposing (disabled, placeholder, style, value)
import Html.Events exposing (onInput)
@ -95,7 +95,7 @@ view state =
, br [] []
, renderMUrl state.parsed
]
, input (myStyle2 [ placeholder "https://host/<service>/<user>/<repo>/<gitref>/<file>", disabled True, value (displayMUrl state.parsed) ]) []
, input (myStyle2 [ placeholder "https://" ++ hostname ++ "/<service>/<user>/<repo>/<gitref>/<file>", disabled True, value (displayMUrl state.parsed) ]) []
]
]