Skip to content

Commit

Permalink
Quick english translation
Browse files Browse the repository at this point in the history
  • Loading branch information
@cbossut
cbossut committed Mar 9, 2024
1 parent 32c38c7 commit 886cdd4
Show file tree
Hide file tree
Showing 6 changed files with 51 additions and 51 deletions.
4 changes: 2 additions & 2 deletions src/Data.elm
View file
Original file line number Diff line number Diff line change
Expand Up @@ -22,7 +22,7 @@ init data url =
{ undoList = Undo.fresh data
, grouping = Nothing
, saved = False
, name = "non-titre"
, name = "untitled"
, serverUrl = url
}

Expand All @@ -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"
}


Expand Down
6 changes: 3 additions & 3 deletions src/Doc.elm
View file
Original file line number Diff line number Diff line change
Expand Up @@ -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
}
]
Expand Down Expand Up @@ -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
Expand Down
58 changes: 29 additions & 29 deletions src/Editor/Mobile.elm
View file
Original file line number Diff line number Diff line change
Expand Up @@ -1140,7 +1140,7 @@ viewTools model =
, viewToolOption size (Edit False)
]
, selected = Just model.tool
, label = Input.labelHidden "Outils"
, label = Input.labelHidden "Tools"
}


Expand Down Expand Up @@ -1791,7 +1791,7 @@ viewChannelSel wId cur max =
]
, text = String.fromInt cur
, placeholder = Nothing
, label = Input.labelLeft [] <| text "Canal :"
, label = Input.labelLeft [] <| text "Channel :"
}
]

Expand All @@ -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
}
]
Expand Down Expand Up @@ -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 ) ]
Expand All @@ -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
}

Expand All @@ -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 ) ]
}

Expand Down Expand Up @@ -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
Expand Down Expand Up @@ -1979,7 +1979,7 @@ viewEditDetails channels model mobile =

simpleBtn =
Input.button []
{ label = text "Collier"
{ label = text "Collar"
, onPress = Just <| Collared id Simple
}
in
Expand All @@ -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
Expand All @@ -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
}
]
Expand All @@ -2035,7 +2035,7 @@ viewEditDetails channels model mobile =
[]
)
++ [ row []
[ text "Couleur : "
[ text "Color : "
, html <|
Html.input
[ Html.Attributes.type_ "color"
Expand Down Expand Up @@ -2063,7 +2063,7 @@ viewEditDetails channels model mobile =
]
]
, text <|
"Durée : "
"Length : "
++ Harmo.view id
mobile.gears
(\rId ->
Expand Down Expand Up @@ -2096,7 +2096,7 @@ viewEditDetails channels model mobile =
}
]
, text <|
"Contenu : "
"Content : "
++ (Round.round 2 <| CommonData.getWheeledContentLength g)
]
++ (case Wheel.getContent g of
Expand Down Expand Up @@ -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
}
]
Expand All @@ -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
}
]
Expand Down Expand Up @@ -2184,7 +2184,7 @@ viewHarmonizeDetails model mobile =
, onPress = Just <| AppliedFract link fract
}
, Input.button []
{ label = text "Simplifier"
{ label = text "Simplify"
, onPress = Just SimplifyFractView
}
]
Expand Down Expand Up @@ -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
}
]
Expand Down
8 changes: 4 additions & 4 deletions src/Harmony.elm
View file
Original file line number Diff line number Diff line change
Expand Up @@ -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
Expand All @@ -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"
Expand Down
20 changes: 10 additions & 10 deletions src/Main.elm
View file
Original file line number Diff line number Diff line change
Expand Up @@ -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
Expand Down Expand Up @@ -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
Expand All @@ -1120,7 +1120,7 @@ viewOpenRefreshButtons openMsg refreshMsg connected =
rgb 1 0 0
]
{ onPress = Just refreshMsg
, label = text "Actualiser"
, label = text "Refresh"
}
]

Expand All @@ -1130,7 +1130,7 @@ viewSinkSelect { deviceList } =
case deviceList of
Nothing ->
Input.button []
{ label = text "Lister Sorties"
{ label = text "List Devices"
, onPress = Just RequestDeviceList
}

Expand Down Expand Up @@ -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
}
Expand All @@ -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
Expand Down Expand Up @@ -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
Expand Down
6 changes: 3 additions & 3 deletions src/Pack.elm
View file
Original file line number Diff line number Diff line change
Expand Up @@ -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
}
]
Expand Down

0 comments on commit 886cdd4

Please sign in to comment.