Merge pull request #2265 from david-christiansen/executable-fix
Stop generating bogus executable names
commit1b7359c682a28de5e9866d10efa742a584da3bce
authorDavid Christiansen <david@davidchristiansen.dk>
dateThu 14 May 2015, 08:34 (11 years ago)
parent4459fb545d9624
src/Pkg/PParser.hs+1−1
@@ -64,7 +64,7 @@ pPkg = do reserved "package"; p <- fst <$> identifier
6464
6565pClause :: PParser ()
6666pClause = do reserved "executable"; lchar '=';
67− exec <- iName []
67+ exec <- fst <$> iName []
6868 st <- get
6969 put (st { execout = Just (if isWindows
7070 then ((show exec) ++ ".exe")