From 663ea4ca16e01315b760bcc3a016020c2e93be25 Mon Sep 17 00:00:00 2001
From: Abinaya Sudhir <abinaya@atomicits.com>
Date: Fri, 2 Mar 2018 15:45:30 +0530
Subject: [PATCH] Cleared Error

---
 src/Navigation.purs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/Navigation.purs b/src/Navigation.purs
index 9ad29d4f..e6b603b3 100644
--- a/src/Navigation.purs
+++ b/src/Navigation.purs
@@ -99,6 +99,7 @@ pagesComponent s =
     selectSpec :: Routes -> Spec (ajax :: AJAX, console :: CONSOLE, dom :: DOM | eff) AppState props Action
     selectSpec Home = focus _landingState _landingAction L.loginSpec
     selectSpec Login   = wrap $ focus _loginState _loginAction LN.renderSpec
+    selectSpec AddCorpus   = wrap $ focus _addCorpusState _addCorpusAction AC.addcorpusviewSpec
 
 routingSpec :: forall props eff. Spec (dom :: DOM |eff) AppState props Action
 routingSpec = simpleSpec performAction defaultRender
-- 
2.21.0