From 75202b4be8b9f86c5c86b2abe05962302937b6d7 Mon Sep 17 00:00:00 2001
From: Nikolay Yakimov <root@livid.pp.ru>
Date: Sun, 6 Dec 2015 02:41:02 +0300
Subject: [PATCH] Optparse removed unused function

---
 src/GHCMod/Options.hs | 8 --------
 1 file changed, 8 deletions(-)

diff --git a/src/GHCMod/Options.hs b/src/GHCMod/Options.hs
index d6ad6d9..046eb43 100644
--- a/src/GHCMod/Options.hs
+++ b/src/GHCMod/Options.hs
@@ -1,6 +1,5 @@
 module GHCMod.Options (
   parseArgs,
-  parseCommandsFromList,
   GhcModCommands(..)
 ) where
 
@@ -19,13 +18,6 @@ parseArgs =
       ( fullDesc
      <> header "ghc-mod: Happy Haskell Programming" )
 
-parseCommandsFromList :: [String] -> Either String GhcModCommands
-parseCommandsFromList args =
-  case execParserPure (prefs idm) (info commandsSpec idm) args of
-    Success a -> Right a
-    Failure h -> Left $ show h
-    CompletionInvoked _ -> error "WTF"
-
 helpVersion :: Parser (a -> a)
 helpVersion =
   helper <*>