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) ]