mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-22 19:22:50 -06:00
Improvements in hte editor.
This commit is contained in:
@@ -14,7 +14,7 @@ import EventF
|
||||
|
||||
fudlogueEditF :: CEnv -> IO ()
|
||||
fudlogueEditF env =
|
||||
fudlogue $ gfSizeP $ shellF ("GF 1.1 Fudget Editor") (gfF env)
|
||||
fudlogue $ gfSizeP $ shellF ("GF 2.0- Fudget Editor") (gfF env)
|
||||
|
||||
gfF env = nameLayoutF gfLayout $ (gfOutputF env >==< gfCommandF env) >+< quitButF
|
||||
|
||||
|
||||
Reference in New Issue
Block a user