Skip to content

Commit 905aa64

Browse files
author
Jonas Coch
committed
Support additional columns when reading lines
1 parent 25414d8 commit 905aa64

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

src/CSV/Import.elm

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -87,7 +87,7 @@ allModuleNames lines =
8787
moduleNameForLine : List String -> Maybe String
8888
moduleNameForLine columns =
8989
case columns of
90-
[ modulename, _, _, _, _ ] ->
90+
modulename :: _ :: _ :: _ :: _ :: xs ->
9191
Just modulename
9292

9393
_ ->
@@ -102,7 +102,7 @@ linesForModule moduleName lines =
102102
fromLine : List String -> Maybe Localized.Element
103103
fromLine columns =
104104
case columns of
105-
[ modulename, key, comment, placeholders, value ] ->
105+
modulename :: key :: comment :: placeholders :: value :: xs ->
106106
Just (code modulename key comment placeholders value)
107107

108108
_ ->

0 commit comments

Comments
 (0)