updated
This commit is contained in:
commit
4076802e8f
1 changed files with 8 additions and 1 deletions
9
gpm.hs
9
gpm.hs
|
@ -4,7 +4,7 @@
|
|||
#! nix-shell -I nixpkgs="https://github.com/NixOS/nixpkgs/archive/16d475334409f7fa632929b2838421b4ffe34927.tar.gz"
|
||||
{-# LANGUAGE NoImplicitPrelude #-}
|
||||
{-# LANGUAGE OverloadedStrings #-}
|
||||
import Protolude hiding (stdout,(%))
|
||||
import Protolude hiding (stdout)
|
||||
import Turtle
|
||||
|
||||
main :: IO ()
|
||||
|
@ -23,6 +23,13 @@ mkNewEmptyBranch br = do
|
|||
echo "cleanup the branch"
|
||||
debug "git rm --cached -r ."
|
||||
|
||||
mkNewEmptyBranch :: Text -> IO ()
|
||||
mkNewEmptyBranch br = do
|
||||
echo "create a new branch "<> br <> " (be sure the branch " <> br <> " doesn't already exists)"
|
||||
debug $ "git checkout --orphan " <> br
|
||||
echo "cleanup the branch"
|
||||
debug "git rm --cached -r ."
|
||||
|
||||
debug :: Text -> IO ()
|
||||
debug cmd = do
|
||||
putText cmd
|
||||
|
|
Loading…
Reference in a new issue