From cbbf5ff93e177756b3869bd6faff77da53edaf7d Mon Sep 17 00:00:00 2001 From: Jano at Zelda Date: Fri, 2 Feb 2018 17:23:38 +0100 Subject: [PATCH] Repo_Image --- src/alire-releases.ads | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/src/alire-releases.ads b/src/alire-releases.ads index d98fa42f..6a7e6e59 100644 --- a/src/alire-releases.ads +++ b/src/alire-releases.ads @@ -20,6 +20,7 @@ is function Project (R : Release) return Project_Name; function Version (R : Release) return Semantic_Versioning.Version; function Depends (R : Release) return Dependencies; + function Repo_Image (R : Release) return String; function Image (R : Release) return String; -- Unique string built as name-version-id @@ -70,6 +71,9 @@ private (R.Project & "_" & Semantic_Versioning.Image (R.Version) & "_" & R.Id); function Milestone_Image (R : Release) return String is - (R.Project & "=" & Semantic_Versioning.Image (R.Version)); + (R.Project & "=" & Semantic_Versioning.Image (R.Version)); + + function Repo_Image (R : Release) return String is + (R.Repository.Element.Image); end Alire.Releases;