mirror of
https://github.com/kowainik/hit-on.git
synced 2024-11-03 23:06:10 +03:00
parent
271ff33ce0
commit
fdc18f025b
@ -1,13 +1,19 @@
|
||||
-- | Everything related to the `hit log` command
|
||||
{- | Pretty @hit log@ command which outputs short, pretty and
|
||||
informative commit log.
|
||||
-}
|
||||
|
||||
module Hit.Git.Log
|
||||
( runLog
|
||||
) where
|
||||
|
||||
import Shellmet()
|
||||
import Shellmet ()
|
||||
|
||||
|
||||
-- | @hit log@ command.
|
||||
runLog :: Maybe Text -> IO ()
|
||||
runLog (fromMaybe "HEAD" -> commit)
|
||||
= "git" ["log", "--oneline", "--decorate", commit]
|
||||
runLog (fromMaybe "HEAD" -> commit) = "git"
|
||||
[ "log"
|
||||
, "--format=format: ❃ %C(bold blue)%h%C(reset): %C(green)%s%C(reset)%n %C(bold)Author%C(reset): %an <%ae>%n %C(bold)Date%C(reset): %cd%n"
|
||||
, "--date=rfc"
|
||||
, commit
|
||||
]
|
||||
|
Loading…
Reference in New Issue
Block a user