diff options
| author | hallgren <hallgren@chalmers.se> | 2015-08-12 11:01:45 +0000 |
|---|---|---|
| committer | hallgren <hallgren@chalmers.se> | 2015-08-12 11:01:45 +0000 |
| commit | 063912c3861d73c0b3cc036394476a4af8eec782 (patch) | |
| tree | 39fd69d74abf508dbe3cbbf33899a4f57c15f547 /src/compiler/GF/Command | |
| parent | e50f92c41d2fdfda6d07a1aab0d3e375ab264617 (diff) | |
Move welcome message from GF.Interactive & GF.Interactive2 to GF.Command.Messages
...to avoid the duplication.
Diffstat (limited to 'src/compiler/GF/Command')
| -rw-r--r-- | src/compiler/GF/Command/Messages.hs | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/src/compiler/GF/Command/Messages.hs b/src/compiler/GF/Command/Messages.hs index abde8b1f7..7d7eff7fa 100644 --- a/src/compiler/GF/Command/Messages.hs +++ b/src/compiler/GF/Command/Messages.hs @@ -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,", |