;shake: update commit messages to pass commitlint
This commit is contained in:
parent
daa95aeb7b
commit
44c5eb5136
10
Shake.hs
10
Shake.hs
@ -271,7 +271,7 @@ main = do
|
|||||||
when ("was generated with a newer version of hpack" `isInfixOf` err) $
|
when ("was generated with a newer version of hpack" `isInfixOf` err) $
|
||||||
liftIO $ putStr err >> exitFailure
|
liftIO $ putStr err >> exitFailure
|
||||||
when commit $ do
|
when commit $ do
|
||||||
let msg = ";update cabal files"
|
let msg = ";dev: cabal: update cabal files"
|
||||||
cmd Shell gitcommit ("-m '"++msg++"' --") cabalfiles
|
cmd Shell gitcommit ("-m '"++msg++"' --") cabalfiles
|
||||||
|
|
||||||
-- Update version strings in most "source" files to match what's in PKG/.version.
|
-- Update version strings in most "source" files to match what's in PKG/.version.
|
||||||
@ -302,7 +302,7 @@ main = do
|
|||||||
-- and maybe commit them
|
-- and maybe commit them
|
||||||
when commit $ do
|
when commit $ do
|
||||||
let msg = unwords [
|
let msg = unwords [
|
||||||
";bump"
|
";pkg: bump"
|
||||||
,case dirargs of
|
,case dirargs of
|
||||||
[] -> "version"
|
[] -> "version"
|
||||||
ds -> intercalate ", " ds ++ " version"
|
ds -> intercalate ", " ds ++ " version"
|
||||||
@ -402,7 +402,7 @@ main = do
|
|||||||
,webmanuals
|
,webmanuals
|
||||||
]
|
]
|
||||||
when commit $ do
|
when commit $ do
|
||||||
let msg = ";update manuals"
|
let msg = ";dev: doc: update manuals"
|
||||||
cmd Shell gitcommit ("-m '"++msg++"' --") packagemandatem4s nroffmanuals infomanuals infodirentries infodir txtmanuals
|
cmd Shell gitcommit ("-m '"++msg++"' --") packagemandatem4s nroffmanuals infomanuals infodirentries infodir txtmanuals
|
||||||
|
|
||||||
-- Update the dates to show in man pages, to the current month and year.
|
-- Update the dates to show in man pages, to the current month and year.
|
||||||
@ -579,7 +579,7 @@ main = do
|
|||||||
phony "cmdhelp" $ do
|
phony "cmdhelp" $ do
|
||||||
need commandtxts
|
need commandtxts
|
||||||
when commit $ do
|
when commit $ do
|
||||||
let msg = ";update CLI usage texts"
|
let msg = ";dev: doc: update CLI usage texts"
|
||||||
cmd Shell gitcommit ("-m '"++msg++"' --") commandtxts
|
cmd Shell gitcommit ("-m '"++msg++"' --") commandtxts
|
||||||
|
|
||||||
commandtxts |%> \out -> do
|
commandtxts |%> \out -> do
|
||||||
@ -625,7 +625,7 @@ main = do
|
|||||||
phony "changelogs" $ do
|
phony "changelogs" $ do
|
||||||
need changelogs
|
need changelogs
|
||||||
when commit $ do
|
when commit $ do
|
||||||
let msg = ";update changelogs"
|
let msg = ";dev: doc: update changelogs"
|
||||||
cmd Shell gitcommit ("-m '"++msg++"' --") changelogs
|
cmd Shell gitcommit ("-m '"++msg++"' --") changelogs
|
||||||
|
|
||||||
-- [PKG/]CHANGES.md
|
-- [PKG/]CHANGES.md
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user