fixed most elm-analyse issues

eimfach · Dec 6, 2019 · e539cf2 · e539cf2
1 parent 0750702
commit e539cf2
Show file tree

Hide file tree

Showing 7 changed files with 90 additions and 122 deletions.
diff --git a/src/elm/Input.elm b/src/elm/Input.elm
@@ -1,9 +1,9 @@
 module Input exposing (viewAutocomplete, viewDefault, viewRadio, viewRadioGroup, viewWithButton)
 
 import Button
-import Html exposing (Attribute, Html, button, datalist, div, input, label, option, span, text)
-import Html.Attributes exposing (class, classList, id, list, name, type_, value)
-import Html.Events exposing (onClick, onInput)
+import Html exposing (Attribute, Html, datalist, div, input, label, option, text)
+import Html.Attributes exposing (class, id, list, name, type_, value)
+import Html.Events exposing (onClick)
 import Set exposing (Set)
 
 
@@ -24,11 +24,7 @@ viewDefault val inputAttr =
         ]
 
 
-viewWithButton :
-    List (Attribute msg)
-    -> Button.ActionType
-    -> msg
-    -> Html msg
+viewWithButton : List (Attribute msg) -> Button.ActionType -> msg -> Html msg
 viewWithButton inputAttr btnActionType msg =
     view
         [ div [ class "input-with-button" ]

diff --git a/src/elm/Locale.elm b/src/elm/Locale.elm
@@ -1,4 +1,4 @@
-module Locale exposing (Locale, encodeLocale, getDefaultLocale, getEnglishLocale, getGermanLocale, isEnglishLocale, isGermanLocale, localeDecoder, translateApplyTags, translateBatchTagging, translateCancel, translateDefaultTags, translateDeleteYourLocalData, translateEnterATag, translateErrorHeading, translateErrorParsingYourFile, translateHowBatchTaggingWorks, translateHowManualTaggingWorks, translateInfoOnHowDataIsStored, translateLocale, translateManageYourTags, translateNoMatchingRecordsFound, translateNoRecordsToChooseFromSelectAfile, translateProceed, translateRecordsThatWillBeTagged, translateSave, translateSelectAKeywordOrRegex, translateSelectATagToTag, translateSelectAcsvFile, translateSingleTagging, translateTableFileName, translateTag, translateTaggedRecords, translateTitleDeleteLocalData, translateWarningDeleteLocalData)
+module Locale exposing (Locale, encodeLocale, getDefaultLocale, getEnglishLocale, getGermanLocale, isEnglishLocale, isGermanLocale, localeDecoder, translateApplyTags, translateBatchTagging, translateCancel, translateDefaultTags, translateDeleteYourLocalData, translateEnterATag, translateErrorHeading, translateErrorParsingYourFile, translateHowBatchTaggingWorks, translateHowManualTaggingWorks, translateInfoOnHowDataIsStored, translateLocale, translateManageYourTags, translateNoMatchingRecordsFound, translateNoRecordsToChooseFromSelectAfile, translateProceed, translateRecordsThatWillBeTagged, translateSave, translateSelectAKeywordOrRegex, translateSelectATagToTag, translateSelectAcsvFile, translateSingleTagging, translateTableFileName, translateTag, translateTagAlreadyExists, translateTaggedRecords, translateTitleDeleteLocalData, translateWarningDeleteLocalData)
 
 import Json.Decode as Decode
 import Json.Encode as Encode