Notes were lost on replacing

This commit is contained in:
Alejandro R. Mosteo
2018-03-26 01:14:01 +02:00
parent 0b11e2814e
commit a29ca18243
2 changed files with 2 additions and 2 deletions
+1 -1
View File
@@ -64,7 +64,7 @@ package body Alire.Releases is
else Project);
New_Notes : constant Description_String := (if Notes = ""
then Base.Notes
else "");
else Notes);
begin
return Replacement : constant Release (New_Project'Length, New_Notes'Length) :=