never executed always true always false

    1 {-# LANGUAGE DataKinds #-}
    2 {-# LANGUAGE PolyKinds #-}
    3 {-# LANGUAGE TypeFamilies #-}
    4 
    5 module Conjure.LSP.Handlers.Initialize where
    6 
    7 import Conjure.Prelude
    8 import Language.LSP.Protocol.Message
    9 import Language.LSP.Protocol.Types
   10 import Language.LSP.Server
   11 
   12 handleInitialized :: Handlers (LspM ())
   13 handleInitialized = notificationHandler SMethod_Initialized $ \_ -> do
   14   sendNotification SMethod_WindowShowMessage (ShowMessageParams MessageType_Info "Conjure LSP started\n")