From 063912c3861d73c0b3cc036394476a4af8eec782 Mon Sep 17 00:00:00 2001 From: hallgren Date: Wed, 12 Aug 2015 11:01:45 +0000 Subject: Move welcome message from GF.Interactive & GF.Interactive2 to GF.Command.Messages ...to avoid the duplication. --- src/compiler/GF/Command/Messages.hs | 25 +++++++++++++++++++++++++ 1 file changed, 25 insertions(+) (limited to 'src/compiler/GF/Command') 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,", -- cgit v1.2.3