From a421d638f37d3f8321152b4929a165912f5c858b Mon Sep 17 00:00:00 2001 From: Rolf Sievers Date: Sun, 7 Dec 2014 15:18:19 +0100 Subject: [PATCH] Fix issue #884. --- yesod-bin/Scaffolding/Scaffolder.hs | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/yesod-bin/Scaffolding/Scaffolder.hs b/yesod-bin/Scaffolding/Scaffolder.hs index 6bdfedb8..0f38fcc4 100644 --- a/yesod-bin/Scaffolding/Scaffolder.hs +++ b/yesod-bin/Scaffolding/Scaffolder.hs @@ -96,4 +96,8 @@ scaffold isBare = do responseBody res $$+- 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")