1
0
forked from GitHub/gf-core

Move welcome message from GF.Interactive & GF.Interactive2 to GF.Command.Messages

...to avoid the duplication.
This commit is contained in:
hallgren
2015-08-12 11:01:45 +00:00
parent e50f92c41d
commit 063912c386
3 changed files with 28 additions and 46 deletions

View File

@@ -1,5 +1,30 @@
module GF.Command.Messages where
import GF.Infra.BuildInfo(buildInfo)
import Data.Version(showVersion)
import Paths_gf(version)
welcome = unlines [
" ",
" * * * ",
" * * ",
" * * ",
" * ",
" * ",
" * * * * * * * ",
" * * * ",
" * * * * * * ",
" * * * ",
" * * * ",
" ",
"This is GF version "++showVersion version++". ",
buildInfo,
"License: see help -license. "--,
-- Google Code is shutting down August 2015
--"Bug reports: http://code.google.com/p/grammatical-framework/issues/list"
]
licenseMsg = unlines [
"Copyright (c)",
"Krasimir Angelov, Bj\246rn Bringert, H\229kan Burden, Hans-Joachim Daniels,",