summaryrefslogtreecommitdiff
path: root/WebSetup.hs
diff options
context:
space:
mode:
authorThomas Hallgren <th-github@altocumulus.org>2018-11-30 00:47:10 +0100
committerThomas Hallgren <th-github@altocumulus.org>2018-11-30 00:47:10 +0100
commit5ef390f18859662fc4ff76e2ec0933151e505bc9 (patch)
tree1bdd2dc4160bc94caa2f7cb932764f6d2ef12f74 /WebSetup.hs
parentfa5c6a2949046785c848f98f82f57e44ab617c75 (diff)
parentd0bc36835893d048b48366e48884bec78c305509 (diff)
Merge branch 'master' of https://github.com/GrammaticalFramework/gf-core
Diffstat (limited to 'WebSetup.hs')
-rw-r--r--WebSetup.hs5
1 files changed, 3 insertions, 2 deletions
diff --git a/WebSetup.hs b/WebSetup.hs
index f6f76107d..fd55439b4 100644
--- a/WebSetup.hs
+++ b/WebSetup.hs
@@ -104,9 +104,10 @@ setupWeb dest (pkg,lbi) = do
copy_pgf (pgf,subdir,_) =
do let src = gfo_dir </> pgf
let dst = grammars_dir </> pgf
- putStrLn $ "Installing "++dst
ex <- doesFileExist src
- if ex then copyFile src dst else return ()
+ if ex then do putStrLn $ "Installing "++dst
+ copyFile src dst
+ else putStrLn $ "Not installing "++dst
gf_logo = "gf0.png"