From c29fae045be4455e05ca8316807c6631b49b53c4 Mon Sep 17 00:00:00 2001
From: Alejandro R Mosteo <alejandro@mosteo.com>
Date: Fri, 11 May 2018 11:57:01 +0200
Subject: [PATCH] Show Provides in Release.Print

---
 src/alire-releases.adb | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/src/alire-releases.adb b/src/alire-releases.adb
index d33ed26f..08ae5449 100644
--- a/src/alire-releases.adb
+++ b/src/alire-releases.adb
@@ -303,6 +303,10 @@ package body Alire.Releases is
       --  MILESTONE
       Put_Line (R.Milestone.Image & ": " & Projects.Descriptions (R.Project));
 
+      if R.Provides /= R.Project then
+         Put_Line ("Provides: " & (+R.Provides));
+      end if;
+
       if R.Notes /= "" then
          Put_Line ("Notes: " & R.Notes);
       end if;