Account for takeExtension behavior
commitde2dbe0d17b0e917cc8955384ae9f167d8c2006d
authorEvan Czaplicki <evancz@users.noreply.github.com>
dateWed 28 Mar 2018, 15:58 (9 years ago)
parentadedf1b
builder/src/Generate/Output.hs+1−1
@@ -169,7 +169,7 @@ parseOutput string =
169169 if string == "/dev/null" || string == "NUL" || string == "$null" then
170170 Just None
171171
172− else if FP.takeExtension string == "js" then
172+ else if FP.takeExtension string == ".js" then
173173 toCustom string
174174
175175 else
ui/terminal/src/Terminal/Args/Helpers.hs+1−1
@@ -74,7 +74,7 @@ elmFile =
7474
7575parseElmFile :: String -> Maybe FilePath
7676parseElmFile string =
77− if FP.takeExtension string == "elm" then
77+ if FP.takeExtension string == ".elm" then
7878 Just string
7979 else
8080 Nothing