diff --git a/src/Data.elm b/src/Data.elm index 54e6a81..fb015cb 100644 --- a/src/Data.elm +++ b/src/Data.elm @@ -22,7 +22,7 @@ init data url = { undoList = Undo.fresh data , grouping = Nothing , saved = False - , name = "non-titre" + , name = "untitled" , serverUrl = url } @@ -34,7 +34,7 @@ new data (D d) = | undoList = Undo.new data <| Undo.fresh (current <| D d) , grouping = Nothing , saved = False - , name = "non-titre" + , name = "untitled" } diff --git a/src/Doc.elm b/src/Doc.elm index 29c626b..3b67b5f 100644 --- a/src/Doc.elm +++ b/src/Doc.elm @@ -482,9 +482,9 @@ viewTop doc = [ width (fill |> maximum inputSize) , padding 2 ] - { label = Input.labelHidden "Nom du fichier" + { label = Input.labelHidden "Savename" , text = Data.getName doc.data - , placeholder = Just <| Input.placeholder [] <| text "nom-a-sauvegarder" + , placeholder = Just <| Input.placeholder [] <| text "savename" , onChange = EnteredFileName } ] @@ -553,7 +553,7 @@ viewComment : Model -> Element Msg viewComment { data } = Input.multiline [ Events.onLoseFocus UnFocusComment ] { text = (Data.current data).comment - , placeholder = Just <| Input.placeholder [] <| text "Laissez ici vos notes ou commentaires" + , placeholder = Just <| Input.placeholder [] <| text "Put notes and comments here" , onChange = ChangedComment , label = Input.labelHidden "Notes" , spellcheck = False diff --git a/src/Editor/Mobile.elm b/src/Editor/Mobile.elm index 14bce2c..a7f177b 100644 --- a/src/Editor/Mobile.elm +++ b/src/Editor/Mobile.elm @@ -1140,7 +1140,7 @@ viewTools model = , viewToolOption size (Edit False) ] , selected = Just model.tool - , label = Input.labelHidden "Outils" + , label = Input.labelHidden "Tools" } @@ -1791,7 +1791,7 @@ viewChannelSel wId cur max = ] , text = String.fromInt cur , placeholder = Nothing - , label = Input.labelLeft [] <| text "Canal :" + , label = Input.labelLeft [] <| text "Channel :" } ] @@ -1805,18 +1805,18 @@ viewDetails channels model mobile = ChangeSound id -> viewDetailsColumn <| [ text <| CommonData.getName ( id, [] ) mobile - , text "Choisir un son chargé" + , text "Chose a loaded sound" , Input.button [] - { label = text "Annuler" + { label = text "Abort" , onPress = Just <| ChangedMode Normal } ] SelectMotor -> viewDetailsColumn <| - [ text "Choisir nouvelle Motrice" + [ text "Chose a new motor" , Input.button [] - { label = text "Annuler" + { label = text "Abort" , onPress = Just <| ChangedMode Normal } ] @@ -1846,7 +1846,7 @@ viewEditDetails channels model mobile = in viewDetailsColumn <| [ Input.text [ Font.color (rgb 0 0 0) ] - { label = Input.labelAbove [] <| text "Roue :" + { label = Input.labelAbove [] <| text "Wheel :" , text = g.wheel.name , placeholder = Just <| Input.placeholder [] <| text <| CommonData.getName ( id, [] ) mobile , onChange = \str -> WheelMsgs [ ( wId, Wheel.Named str ) ] @@ -1857,16 +1857,16 @@ viewEditDetails channels model mobile = { label = text <| if g.wheel.viewContent then - "Ranger " ++ Sound.getPath s + "Hide " ++ Sound.getPath s else - "Voir " ++ Sound.getPath s + "Show " ++ Sound.getPath s , onPress = Just <| WheelMsgs [ ( wId, Wheel.ToggleContentView ) ] } Content.M _ -> Input.button [] - { label = text "Voir Mobile" + { label = text "Show Mobile" , onPress = Just <| OutMsg <| Inside wId } @@ -1875,10 +1875,10 @@ viewEditDetails channels model mobile = { label = text <| if g.wheel.viewContent then - "Replier Collier" + "Hide Collar" else - "Déplier Collier" + "Show Collar" , onPress = Just <| WheelMsgs [ ( wId, Wheel.ToggleContentView ) ] } @@ -1930,15 +1930,15 @@ viewEditDetails channels model mobile = ) [ 2, 3, 5, 7 ] , Input.button [] - { label = text "Taille Originale" + { label = text "Initial length" , onPress = Just <| ResizeToContent id } , Input.button [] - { label = text "Changer son" + { label = text "Change sound" , onPress = Just <| ChangedMode <| ChangeSound id } , Input.button [] - { label = text "Encapsuler" + { label = text "Encapsulate" , onPress = Just <| Capsuled [ id ] } , let @@ -1979,7 +1979,7 @@ viewEditDetails channels model mobile = simpleBtn = Input.button [] - { label = text "Collier" + { label = text "Collar" , onPress = Just <| Collared id Simple } in @@ -1995,24 +1995,24 @@ viewEditDetails channels model mobile = simpleBtn :: multBtns , Input.button [] - { label = text "Décollier" + { label = text "Uncollar" , onPress = Just <| UnCollar id } , if id == mobile.motor then Input.button [] { onPress = Just <| ChangedMode SelectMotor - , label = text "Changer Motrice" + , label = text "Change Motor" } else Input.button [] { onPress = Just <| DeleteWheel ( id, [] ) - , label = text "Supprimer" + , label = text "Delete" } ] ++ (List.map (Element.map PackMsg) <| Pack.viewPackButtons model.pack) ++ [ Input.button [] - { label = text "Copier Contenu" + { label = text "Copy content" , onPress = Maybe.map (\i -> PackMsg <| Pack.Packontent <| (Coll.get i mobile.gears).wheel) <| case model.edit of @@ -2026,7 +2026,7 @@ viewEditDetails channels model mobile = ++ (case model.pack.content of Just w -> [ Input.button [] - { label = text <| "Coller Contenu" + { label = text <| "Paste Content" , onPress = Just <| CopyContent w } ] @@ -2035,7 +2035,7 @@ viewEditDetails channels model mobile = [] ) ++ [ row [] - [ text "Couleur : " + [ text "Color : " , html <| Html.input [ Html.Attributes.type_ "color" @@ -2063,7 +2063,7 @@ viewEditDetails channels model mobile = ] ] , text <| - "Durée : " + "Length : " ++ Harmo.view id mobile.gears (\rId -> @@ -2096,7 +2096,7 @@ viewEditDetails channels model mobile = } ] , text <| - "Contenu : " + "Content : " ++ (Round.round 2 <| CommonData.getWheeledContentLength g) ] ++ (case Wheel.getContent g of @@ -2124,9 +2124,9 @@ viewEditDetails channels model mobile = Nothing } , Input.text [ Font.color <| rgb 0 0 0 ] - { label = Input.labelHidden "Nouveau nom" + { label = Input.labelHidden "New name" , text = model.newSampleName - , placeholder = Just <| Input.placeholder [] <| text "Nouveau nom" + , placeholder = Just <| Input.placeholder [] <| text "New name" , onChange = EnteredNewSampleName } ] @@ -2139,7 +2139,7 @@ viewEditDetails channels model mobile = viewDetailsColumn <| (List.map (\id -> text <| CommonData.getName ( id, [] ) mobile) <| List.reverse model.edit) ++ [ Input.button [] - { label = text "Encapsuler" + { label = text "Encapsulate" , onPress = Just <| Capsuled <| List.reverse model.edit } ] @@ -2184,7 +2184,7 @@ viewHarmonizeDetails model mobile = , onPress = Just <| AppliedFract link fract } , Input.button [] - { label = text "Simplifier" + { label = text "Simplify" , onPress = Just SimplifyFractView } ] @@ -2226,7 +2226,7 @@ viewHarmonizeDetails model mobile = Nothing -> [ Font.color <| rgb 1 0 0 ] ) - { label = text "Forcer" + { label = text "Force" , onPress = Maybe.map (ForcedFract link) mayFract } ] diff --git a/src/Harmony.elm b/src/Harmony.elm index 1448fd2..be5e9bb 100644 --- a/src/Harmony.elm +++ b/src/Harmony.elm @@ -70,10 +70,10 @@ view id coll getName = Self { unit } -> case unit of Duration d -> - " de " ++ Round.round 2 d + " of " ++ Round.round 2 d Rate r -> - " du contenu x" ++ Round.round 2 (1 / r) + " of content x" ++ Round.round 2 (1 / r) Other rId -> let @@ -84,10 +84,10 @@ view id coll getName = Self { unit } -> case unit of Duration d -> - " de " ++ Round.round 2 d ++ " ( " ++ name ++ " )" + " of " ++ Round.round 2 d ++ " ( " ++ name ++ " )" Rate r -> - " du contenu de " ++ name ++ " x" ++ Round.round 2 (1 / r) + " of " ++ name ++ "'s content x" ++ Round.round 2 (1 / r) Other _ -> Debug.log "IMPOSSIBLE Other refer to another Other" "BUG Harmo.view" diff --git a/src/Main.elm b/src/Main.elm index d151fe7..1b3b243 100644 --- a/src/Main.elm +++ b/src/Main.elm @@ -1066,7 +1066,7 @@ viewFileExplorer model = none ) :: Input.text [ width <| minimum 200 shrink, paddingXY 5 0 ] - { label = Input.labelLeft [] <| text "Filtrer\u{202F}:" + { label = Input.labelLeft [] <| text "Filter\u{202F}:" , text = model.fileFilter , placeholder = Nothing , onChange = ChgFilter @@ -1096,19 +1096,19 @@ viewExplorerOption tab = tabImage tab size <| case tab of Sounds -> - "Sons LOCALIZE" + "Sounds" LoadedSounds -> - "Chargés LOCALIZE" + "Loaded" Saves -> - "Saves LOCALIZE" + "Saves" viewOpenRefreshButtons : Msg -> Msg -> Bool -> List (Element Msg) viewOpenRefreshButtons openMsg refreshMsg connected = [ Input.button [] - { label = text "Ouvrir" + { label = text "Add Sound" , onPress = Just openMsg } , Input.button @@ -1120,7 +1120,7 @@ viewOpenRefreshButtons openMsg refreshMsg connected = rgb 1 0 0 ] { onPress = Just refreshMsg - , label = text "Actualiser" + , label = text "Refresh" } ] @@ -1130,7 +1130,7 @@ viewSinkSelect { deviceList } = case deviceList of Nothing -> Input.button [] - { label = text "Lister Sorties" + { label = text "List Devices" , onPress = Just RequestDeviceList } @@ -1191,7 +1191,7 @@ viewMicRec model = ] , Input.text [ Font.color (rgb 0 0 0), paddingXY 5 0 ] { text = name - , placeholder = Just <| Input.placeholder [] <| text "Nom du fichier" + , placeholder = Just <| Input.placeholder [] <| text "FileName" , label = Input.labelHidden "New File Name" , onChange = EnteredNewRecName } @@ -1203,7 +1203,7 @@ viewMicRec model = ] Nothing -> - [ Input.button [] { onPress = Just RequestOpenMic, label = text "Activer Micro" } ] + [ Input.button [] { onPress = Just RequestOpenMic, label = text "Open Mic" } ] viewLibColumn : List (Element Msg) -> Element Msg @@ -1344,7 +1344,7 @@ viewLoaded : Model -> List (Element Msg) viewLoaded model = [ column [ width fill, height <| fillPortion 3, spacing 10, padding 2, scrollbarY ] ([ Input.checkbox [] - { label = Input.labelLeft [] <| text "Voir dossiers" + { label = Input.labelLeft [] <| text "See Folders" , checked = model.showDirLoad , onChange = ToggleShowDirLoad , icon = Input.defaultCheckbox diff --git a/src/Pack.elm b/src/Pack.elm index b8b7d51..003e636 100644 --- a/src/Pack.elm +++ b/src/Pack.elm @@ -147,14 +147,14 @@ viewPackButtons pack = { label = text <| if pack.visible then - "Fermer le sac" + "Open bag" else - "Ouvrir le sac" + "Close bag" , onPress = Just TogglePack } , Input.button [] - { label = text "Vider son sac" + { label = text "Empty bag" , onPress = Just EmptyPack } ]