From f20b3a198cd51d9742e6575beac7dd74b8b6b715 Mon Sep 17 00:00:00 2001 From: Jed Barber Date: Sat, 18 Feb 2017 20:32:32 +1100 Subject: Removed Add procedure from Bundles, cleaned up code slightly --- src/bundles.adb | 10 ---------- 1 file changed, 10 deletions(-) (limited to 'src/bundles.adb') diff --git a/src/bundles.adb b/src/bundles.adb index d0234a1..af11f37 100644 --- a/src/bundles.adb +++ b/src/bundles.adb @@ -11,16 +11,6 @@ package body Bundles is - procedure Add - (To : in out Bundle; - Item : in Given_Prefs.Preference_Array) is - begin - To.Papers.Append (Item); - end Add; - - - - procedure Transfer (This : in out Bundle; From, To : in Candidates.CandidateID; -- cgit