github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-12-24 23:42:31 +03:00
Code Issues Projects Releases Wiki Activity

Allow the arguments to override src.

Browse Source
This commit is contained in:
Rob Rix 2018-03-19 09:40:19 -04:00
parent 3f47dfbdc0
commit f67a2a1dc3
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
test/Doctests.hs
View File

@ -8,7 +8,7 @@ import Test.DocTest
main :: IO ()
main = do
args <- getArgs
doctest (map ("-X" ++) extensions ++ args ++ ["-isrc", "src"])
doctest (map ("-X" ++) extensions ++ args ++ "-isrc" : if null args then ["src"] else args)
extensions :: [String]
extensions =