Skip to content
Merged
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
2 changes: 1 addition & 1 deletion ChangeLog.hs
Original file line number Diff line number Diff line change
Expand Up @@ -10,7 +10,7 @@

changeLog :: ChangeLog
changeLog =
[ Version "0.5.2.1" "2025-11-13"
[ Version "0.5.2.1" "2026-01-08"
"Maintenance and dependency version bumps"
[ "Publish the website via GitHub pages (#201)"
, "Properly use cascading deletes with foreign keys (#191)"
Expand Down Expand Up @@ -258,15 +258,15 @@

-- | Get the current version.
currentVersion :: [Version] -> String
currentVersion = vVersion . head

Check warning on line 261 in ChangeLog.hs

View workflow job for this annotation

GitHub Actions / build (9.12.1)

In the use of ‘head’

-- | Get the release date of the current version.
currentDate :: [Version] -> String
currentDate = vDate . head

Check warning on line 265 in ChangeLog.hs

View workflow job for this annotation

GitHub Actions / build (9.12.1)

In the use of ‘head’

-- | Get the release summary of the current version.
currentSummary :: [Version] -> String
currentSummary = vDate . head

Check warning on line 269 in ChangeLog.hs

View workflow job for this annotation

GitHub Actions / build (9.12.1)

In the use of ‘head’

-- | Get the git tag message for the current version, as a list of @-m <msg>@
-- flags.
Expand Down Expand Up @@ -300,7 +300,7 @@

-- | Get the latest entry in the changelog.
latestEntry :: ChangeLog -> Version
latestEntry = head

Check warning on line 303 in ChangeLog.hs

View workflow job for this annotation

GitHub Actions / build (9.12.1)

In the use of ‘head’

-- | Get the release date from the latest entry in the changelog.
latestReleaseDate :: ChangeLog -> String
Expand Down Expand Up @@ -366,7 +366,7 @@
putStrLn "Changelog has no list of changes."
exitFailure

when (head version /= '0') $ do

Check warning on line 369 in ChangeLog.hs

View workflow job for this annotation

GitHub Actions / build (9.12.1)

In the use of ‘head’
putStrLn "Major version is not 0; make upload will complain."
exitFailure

Expand Down
Loading