git.iko.soy/obelisk
on master help sign in
Silly style changes
5339581Elliot Cameron
lib/cliapp/src/Obelisk/CliApp/Spinner.hs−1
compare with master
unifiedsplit
@@ -3,7 +3,6 @@
3{-# LANGUAGE MultiParamTypeClasses #-}
3{-# LANGUAGE MultiParamTypeClasses #-}
4{-# LANGUAGE OverloadedStrings #-}
4{-# LANGUAGE OverloadedStrings #-}
5{-# LANGUAGE ScopedTypeVariables #-}
5{-# LANGUAGE ScopedTypeVariables #-}
6−{-# LANGUAGE TupleSections #-}
7-- | Provides a simple CLI spinner that interoperates cleanly with the rest of the logging output.
6-- | Provides a simple CLI spinner that interoperates cleanly with the rest of the logging output.
8module Obelisk.CliApp.Spinner
7module Obelisk.CliApp.Spinner
9 ( withSpinner
8 ( withSpinner
lib/command/src/Obelisk/Command/Thunk.hs+1−1
@@ -862,7 +862,7 @@ getThunkPtr checkClean dir mPrivate = do
862
862
863 -- Get information on all branches and their (optional) designated upstream
863 -- Get information on all branches and their (optional) designated upstream
864 -- correspondents
864 -- correspondents
865− (headDump :: [Text]) <- T.lines <$> readGitProcess thunkDir
865+ headDump :: [Text] <- T.lines <$> readGitProcess thunkDir
866 [ "for-each-ref"
866 [ "for-each-ref"
867 , "--format=%(refname:short) %(upstream:short) %(upstream:remotename)"
867 , "--format=%(refname:short) %(upstream:short) %(upstream:remotename)"
868 , "refs/heads/"
868 , "refs/heads/"