diff options
Diffstat (limited to 'Assistant/WebApp/Types.hs')
-rw-r--r-- | Assistant/WebApp/Types.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Assistant/WebApp/Types.hs b/Assistant/WebApp/Types.hs index c00150b65..4198cd428 100644 --- a/Assistant/WebApp/Types.hs +++ b/Assistant/WebApp/Types.hs @@ -65,7 +65,8 @@ instance RenderMessage WebApp FormMessage where type Form x = Html -> MForm WebApp WebApp (FormResult x, Widget) data WebAppState = WebAppState - { showIntro :: Bool + { showIntro :: Bool -- should the into message be displayed? + , otherRepos :: [(String, String)] -- name and path to other repos } instance PathPiece SshData where |