Skip to content

Commit

Permalink
atom: set updated to newest advisory modification date, not oldest
Browse files Browse the repository at this point in the history
Silly mistake.
  • Loading branch information
frasertweedale authored and blackheaven committed Apr 3, 2024
1 parent 88fc2a0 commit c5db867
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions code/hsec-tools/src/Security/Advisories/Generate/HTML.hs
Original file line number Diff line number Diff line change
Expand Up @@ -25,7 +25,7 @@ import System.IO (hPrint, stderr)

import Distribution.Pretty (prettyShow)
import Lucid
import Safe (minimumMay)
import Safe (maximumMay)
import qualified Text.Atom.Feed as Feed
import qualified Text.Atom.Feed.Export as FeedExport
import Validation (Validation (..))
Expand Down Expand Up @@ -233,7 +233,7 @@ feed advisories =
( Feed.nullFeed
atomFeedUrl
(Feed.TextString "Haskell Security Advisory DB") -- Title
(maybe "" (T.pack . iso8601Show) . minimumMay . fmap (zonedTimeToUTC . Advisories.advisoryModified) $ advisories)
(maybe "" (T.pack . iso8601Show) . maximumMay . fmap (zonedTimeToUTC . Advisories.advisoryModified) $ advisories)
)
{ Feed.feedEntries = fmap toEntry advisories
, Feed.feedLinks = [(Feed.nullLink atomFeedUrl) { Feed.linkRel = Just (Left "self") }]
Expand Down

0 comments on commit c5db867

Please sign in to comment.