diff options
Diffstat (limited to 'src/GF/UseGrammar/Session.hs')
| -rw-r--r-- | src/GF/UseGrammar/Session.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/GF/UseGrammar/Session.hs b/src/GF/UseGrammar/Session.hs index 7d43ea33c..8bc91e145 100644 --- a/src/GF/UseGrammar/Session.hs +++ b/src/GF/UseGrammar/Session.hs @@ -17,7 +17,7 @@ type SState = [(State,([Exp],[Clip]),SInfo)] -- exps: candidate refinements,clip type SInfo = ([String],(Int,Options)) -- string is message, int is the view initSState :: SState -initSState = [(initState, ([],[]), (["Select category to start"],(0,noOptions)))] +initSState = [(initState, ([],[]), (["Select 'New' category to start"],(0,noOptions)))] -- instead of empty type Clip = Tree ---- (Exp,Type) |