Index: WSimpl/Unishop/BeschikbareLandenBepaler.cls.xml
===================================================================
diff -u -r36745 -r36749
--- WSimpl/Unishop/BeschikbareLandenBepaler.cls.xml	(.../BeschikbareLandenBepaler.cls.xml)	(revision 36745)
+++ WSimpl/Unishop/BeschikbareLandenBepaler.cls.xml	(.../BeschikbareLandenBepaler.cls.xml)	(revision 36749)
@@ -37,7 +37,7 @@
 <Implementation><![CDATA[
 	Set ..NietBeneluxLanden = $$$Inject(NietBeneluxLanden,##class(APPS.TRANSP.Common.NietBeneluxLanden).%New())
 	Set ..VertaalAPI = $$$Inject(VertaalAPI,##class(DOM.DomeinContext).Instance().GeefVertaalAPI())
-	Set ..Sorter = $$$Inject(Sorter,##class(TECH.Algo.Sort.InsertionSort).%New())
+	Set ..Sorter = $$$Inject(Sorter,##class(WSimpl.Unishop.BeschikbareLandenSort).%New())
 	Set ..Comparator = $$$Inject(Comparator,##class(WSimpl.Unishop.BeschikbareLandenComparator).%New())
 	Quit $$$OK
 ]]></Implementation>
@@ -55,19 +55,19 @@
 <ReturnType>WS.EC.ExterneVerkoop.dto.Landen</ReturnType>
 <Implementation><![CDATA[
 	Do ..ZetVertaler(Taal)
-	#dim EuropeseLanden As WS.EC.ExterneVerkoop.dto.Landen = ##class(WS.EC.ExterneVerkoop.dto.Landen).%New()
+	#dim Landen As WS.EC.ExterneVerkoop.dto.Landen = ##class(WS.EC.ExterneVerkoop.dto.Landen).%New()
 	#dim BeschikbareLandCodes As TECH.Iterator = ..NietBeneluxLanden.GeefBeschikbareLandCodes()
 	
 	While BeschikbareLandCodes.HasNext()
 	{	
 		#dim LandCode As %String = BeschikbareLandCodes.Next()
 		#dim LandNaam As %String = ..Vertaler.GeefVertaling(LandCode)
 		if LandNaam '= "" {
-			Do EuropeseLanden.Insert(##class(WS.EC.ExterneVerkoop.dto.Land).%New(LandCode, LandNaam))
+			Do Landen.Insert(##class(WS.EC.ExterneVerkoop.dto.Land).%New(LandCode, LandNaam))
 		}
 	}
-	Do ..Sorter.Sort(.EuropeseLanden, ..Comparator)
-	Quit EuropeseLanden
+	Do ..Sorter.Sort(.Landen, ..Comparator)
+	Quit Landen
 ]]></Implementation>
 </Method>
 </Class>