Migration page: remove useless code.

src/App/Page/Migration.purs

@@ -19,12 +19,12 @@
 -- | ```
 module App.Page.Migration where
 
-import Prelude (Unit, between, bind, discard, map, pure, ($), (<>))
+import Prelude (Unit, between, bind, discard, map, ($), (<>))
 
 import Data.Array as A
 import Data.ArrayBuffer.Types (ArrayBuffer)
 import Data.Either (Either(..))
-import Data.Maybe (Maybe(..))
+-- import Data.Maybe (Maybe(..))
 import Data.String as S
 import Effect.Aff.Class (class MonadAff)
 import Halogen as H
@@ -102,14 +102,14 @@ component =
     , render
     , eval: H.mkEval $ H.defaultEval
         { handleAction = handleAction
-        , handleQuery  = handleQuery
+        --, handleQuery  = handleQuery
         }
     }
 
-handleQuery :: forall a m. MonadAff m => Query a -> H.HalogenM State Action () Output m (Maybe a)
-handleQuery = case _ of
-  -- TODO
-  WaitingForToken a -> pure (Just a)
+-- TODO: this will be useful in case there is a tab mechanism on this page.
+--handleQuery :: forall a m. MonadAff m => Query a -> H.HalogenM State Action () Output m (Maybe a)
+--handleQuery = case _ of
+--  WaitingForToken a -> pure (Just a)
 
 render :: forall m. State -> H.ComponentHTML Action () m
 render state