Index: vhUnitTest/APPS/Halux/PPS/ALUFrees/Svg/KaderdeurElement/Beslag/Boringen/VoegToeBeslagBoringen/Test.cls.xml =================================================================== diff -u -r60385 -r61641 --- vhUnitTest/APPS/Halux/PPS/ALUFrees/Svg/KaderdeurElement/Beslag/Boringen/VoegToeBeslagBoringen/Test.cls.xml (.../Test.cls.xml) (revision 60385) +++ vhUnitTest/APPS/Halux/PPS/ALUFrees/Svg/KaderdeurElement/Beslag/Boringen/VoegToeBeslagBoringen/Test.cls.xml (.../Test.cls.xml) (revision 61641) @@ -120,7 +120,7 @@ #dim DoorBoring As APPS.Halux.PPS.ALUFrees.Svg.KaderdeurElement.Boring.DoorBoring = BoringElementFactory.MaakDoorBoring(158,473, 10, ##class(TECH.Svg.enu.Kleur).Zwart()) Set BoringElementFactoryMock = ##class(vhTest.Mock.APPS.Halux.PPS.ALUFrees.Svg.KaderdeurElement.Boring.BoringElementFactory).%New() Do BoringElementFactoryMock.VerwachtMethodCall("MaakDoorBoring",2,29,2.5, ##class(TECH.Svg.enu.Kleur).Blauw()).DanReturn(DoorBoring) - Do BoringElementFactoryMock.VerwachtMethodCall("MaakRugBoring",2,29,10,10, ##class(TECH.Svg.enu.Kleur).Blauw()).DanReturn(RugBoring) + Do BoringElementFactoryMock.VerwachtMethodCall("MaakPuntBoring",2,29,10,10, ##class(TECH.Svg.enu.Kleur).Blauw()).DanReturn(RugBoring) Set Boringen = ##class(APPS.Halux.PPS.ALUFrees.Svg.KaderdeurElement.Beslag.Boringen).%New(BoringElementFactoryMock) Do Boringen.VoegToeBeslagBoringen(Beslag,"PL",0,0,0)