districts = {"Bo Sierra Leone", "Bombali", "Bonthe District", "Kailahun District", "Kambia District", "Kenema District", "Koinadugu District", "Kono District", "Moyamba District", "Port Loko District", "Pujehun District", "Tonkolili District", "Western Rural District", "Western Urban Sierra Leone"};

slDistricts = SemanticInterpretation /@ districts
GeoListPlot[slDistricts, ImageSize -> Large, GeoLabels -> True]

GeoGraphics[{EdgeForm[Black], FaceForm[Red],  Polygon[Entity["Country", "SierraLeone"]]}]
GeoGraphics[{EdgeForm[Black], FaceForm[Red],  Polygon[Entity["AdministrativeDivision", {"Kambia", "Northern", "SierraLeone"}]]}]
GeoGraphics[{EdgeForm[Black], FaceForm[Red],  Polygon[Entity["AdministrativeDivision", {"WesternRural", "Western", "SierraLeone"}]]}]
GeoGraphics[{EdgeForm[Black], FaceForm[Red],  Polygon[Entity["AdministrativeDivision", {"Moyamba", "Southern",      "SierraLeone"}]]}]
GeoGraphics[{EdgeForm[Black], FaceForm[Red],  Polygon[Entity["AdministrativeDivision", {"Bonthe", "Southern", "SierraLeone"}]]}]
GeoGraphics[{EdgeForm[Black], FaceForm[Red],  Polygon[Entity["AdministrativeDivision", {"Pujehun", "Southern",  "SierraLeone"}]]}]
GeoGraphics[{EdgeForm[Black], FaceForm[Red],  Polygon[Entity["AdministrativeDivision", {"Bo", "Southern", "SierraLeone"}]]}]

divisions = CountryData["SierraLeone", "AdministrativeDivisions"];
subdivisions = AdministrativeDivisionData[#, "Subdivisions"] & /@ divisions;
GeoGraphics[{EdgeForm[Black], FaceForm[Red], Polygon[#]}] & /@ subdivisions;