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 : String
|
||||||
hostname =
|
hostname =
|
||||||
"https://cdn.hitsofcode.com/"
|
"https://gitcdn.tk/"
|
||||||
|
|
||||||
|
|
||||||
type Provider
|
type Provider
|
||||||
|
@ -1,7 +1,7 @@
|
|||||||
module Main exposing (Model, Msg(..), init, main, update, view)
|
module Main exposing (Model, Msg(..), init, main, update, view)
|
||||||
|
|
||||||
import Browser
|
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 exposing (Html, br, div, h1, input, table, td, text, tr)
|
||||||
import Html.Attributes exposing (disabled, placeholder, style, value)
|
import Html.Attributes exposing (disabled, placeholder, style, value)
|
||||||
import Html.Events exposing (onInput)
|
import Html.Events exposing (onInput)
|
||||||
@ -95,7 +95,7 @@ view state =
|
|||||||
, br [] []
|
, br [] []
|
||||||
, renderMUrl state.parsed
|
, 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