From 56074a5b5e0e313c343261fa90cc1fc523875a1c Mon Sep 17 00:00:00 2001
From: Maxime Mangel <mangel.maxime@protonmail.com>
Date: Sat, 16 Dec 2023 10:36:06 +0100
Subject: [PATCH] Include release description in the output

---
 src/Ionide.KeepAChangelog.Tasks/Library.fs | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/src/Ionide.KeepAChangelog.Tasks/Library.fs b/src/Ionide.KeepAChangelog.Tasks/Library.fs
index 48425b3..ae20a32 100644
--- a/src/Ionide.KeepAChangelog.Tasks/Library.fs
+++ b/src/Ionide.KeepAChangelog.Tasks/Library.fs
@@ -92,8 +92,12 @@ type ParseChangelogs() =
                 sortedReleases
                 |> Seq.tryHead
                 |> Option.iter (fun release ->
-                    release.Data
-                    |> Option.iter (fun data -> this.LatestReleaseNotes <- data.ToMarkdown()))
+                    match release.Description, release.Data with
+                    | Some desc, None -> this.LatestReleaseNotes <- desc
+                    | None, Some data -> this.LatestReleaseNotes <- data.ToMarkdown()
+                    | Some desc, Some data ->
+                        this.LatestReleaseNotes <- $"{desc}{System.Environment.NewLine}{data.ToMarkdown()}"
+                    | None, None -> ())
 
                 true
             | Error(formatted, msg) ->