From d3bce6570a800eff790206654f63869cf05a5137 Mon Sep 17 00:00:00 2001
From: Luke Lau <luke_lau@icloud.com>
Date: Sat, 21 Dec 2019 23:27:09 +0000
Subject: [PATCH] Remove unused Liquid haskell commands

---
 src/Haskell/Ide/Engine/Plugin/Liquid.hs | 23 +----------------------
 1 file changed, 1 insertion(+), 22 deletions(-)

diff --git a/src/Haskell/Ide/Engine/Plugin/Liquid.hs b/src/Haskell/Ide/Engine/Plugin/Liquid.hs
index 266931bd6..1888a3001 100644
--- a/src/Haskell/Ide/Engine/Plugin/Liquid.hs
+++ b/src/Haskell/Ide/Engine/Plugin/Liquid.hs
@@ -35,10 +35,7 @@ liquidDescriptor plId = PluginDescriptor
   { pluginId = plId
   , pluginName = "Liquid Haskell"
   , pluginDesc = "Integration with Liquid Haskell"
-  , pluginCommands =
-      [ PluginCommand "sayHello"   "say hello"                        sayHelloCmd
-      , PluginCommand "sayHelloTo" "say hello to the passed in param" sayHelloToCmd
-      ]
+  , pluginCommands = []
   , pluginCodeActionProvider = Nothing
   , pluginDiagnosticProvider = Just (DiagnosticProvider
                                     (S.singleton DiagnosticOnSave)
@@ -50,24 +47,6 @@ liquidDescriptor plId = PluginDescriptor
 
 -- ---------------------------------------------------------------------
 
-sayHelloCmd :: CommandFunc () T.Text
-sayHelloCmd = CmdSync $ \_ -> return (IdeResultOk sayHello)
-
-sayHelloToCmd :: CommandFunc T.Text T.Text
-sayHelloToCmd = CmdSync $ \n -> do
-  r <- liftIO $ sayHelloTo n
-  return $ IdeResultOk r
-
--- ---------------------------------------------------------------------
-
-sayHello :: T.Text
-sayHello = "hello from ExamplePlugin2"
-
-sayHelloTo :: T.Text -> IO T.Text
-sayHelloTo n = return $ "hello " <> n <> " from ExamplePlugin2"
-
--- ---------------------------------------------------------------------
-
 data LiquidJson
   = LJ
     { status :: T.Text