Change hostname
This commit is contained in:
parent
b1b611326a
commit
504cd02ca0
@ -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
|
||||
|
@ -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) ]) []
|
||||
]
|
||||
]
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user