From 44d0565ad99364d421e5ea2a8f7a44b8682852e2 Mon Sep 17 00:00:00 2001 From: Junji Hashimoto Date: Wed, 30 May 2018 10:27:32 +0900 Subject: [PATCH] Add stackBuildE --- yi-core/src/Yi/Command.hs | 3 +++ yi-core/src/Yi/Config/Default.hs | 2 ++ 2 files changed, 5 insertions(+) diff --git a/yi-core/src/Yi/Command.hs b/yi-core/src/Yi/Command.hs index 593adcc0e..7a93f9933 100644 --- a/yi-core/src/Yi/Command.hs +++ b/yi-core/src/Yi/Command.hs @@ -135,6 +135,9 @@ makeRun onExit (CommandArguments args) = buildRun "make" args onExit cabalBuildE :: CommandArguments -> YiM () cabalBuildE = cabalRun "build" (const $ return ()) +stackBuildE :: CommandArguments -> YiM () +stackBuildE = stackRun "build" (const $ return ()) + makeBuildE :: CommandArguments -> YiM () makeBuildE = makeRun (const $ return ()) diff --git a/yi-core/src/Yi/Config/Default.hs b/yi-core/src/Yi/Config/Default.hs index f56d759cc..462b0c928 100644 --- a/yi-core/src/Yi/Config/Default.hs +++ b/yi-core/src/Yi/Config/Default.hs @@ -13,6 +13,7 @@ import System.FilePath import Yi.Buffer import Yi.Command (cabalBuildE, cabalConfigureE, grepFind, makeBuild, reloadProjectE, searchSources, + stackBuildE, shell) import Yi.Config import Yi.Core (errorEditor, quitEditor) @@ -69,6 +70,7 @@ defaultPublishedActions = HM.fromList , ("searchSources" , box searchSources) , ("setAnyMode" , box setAnyMode) , ("sortLines" , box sortLines) + , ("stackBuildE" , box stackBuildE) , ("unLineCommentSelectionB", box unLineCommentSelectionB) , ("writeB" , box writeB) ]