haskell/yesod
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Merge pull request #885 from roSievers/patch-1

Browse Source 
Fix issue #884 (Scaffolding with --bare)
This commit is contained in:
Michael Snoyman 2014-12-08 07:29:36 +02:00
commit bfcb2876f0
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
yesod-bin/Scaffolding/Scaffolder.hs
View File

@ -96,4 +96,8 @@ scaffold isBare = do
responseBody res $$+- sink responseBody res $$+- sink
Right backend -> runResourceT $ yield (backendBS backend) $$ sink Right backend -> runResourceT $ yield (backendBS backend) $$ sink
TLIO.putStr $ LT.replace "PROJECTNAME" (LT.pack project) $ renderTextUrl undefined $(textFile "input/done.cg") let projectnameReplacer = if isBare
then LT.replace "cd PROJECTNAME && " ""
else LT.replace "PROJECTNAME" (LT.pack project)
TLIO.putStr $ projectnameReplacer $ renderTextUrl undefined $(textFile "input/done.cg")