Index: vhUnitTest/DOM/PM/impl/INKLangtekstCreator/Test.cls.xml =================================================================== diff -u -r68602 -r69538 --- vhUnitTest/DOM/PM/impl/INKLangtekstCreator/Test.cls.xml (.../Test.cls.xml) (revision 68602) +++ vhUnitTest/DOM/PM/impl/INKLangtekstCreator/Test.cls.xml (.../Test.cls.xml) (revision 69538) @@ -28,7 +28,10 @@ #dim Langtekst As DOM.PM.ProductLangtekst = ..GeefLangtekst() #dim ControleLangtekst As TECH.String = ##class(TECH.StringUtils).Concatenate( "Verzagen van" _ $$$CRLF, "ZR7.1080U RELING 20ELN2" _ $$$CRLF, - "op lengte 380 en 240 en 160mm") + "op lengte 380 en 240 en 160mm" _ $$$CRLF, + "Te verzagen product:" _ $$$CRLF, + "Reling voor LEGRABOX binnenlade, inkortbaar" _ $$$CRLF, + "Kleur: inox look geanodiseerd") Do $$$AssertEquals(Langtekst.GeefString(), ControleLangtekst) ]]> @@ -41,7 +44,10 @@ #dim Langtekst As DOM.PM.ProductLangtekst = ..GeefLangtekst() #dim ControleLangtekst As TECH.String = ##class(TECH.StringUtils).Concatenate( "Verzagen van" _ $$$CRLF, "ZR7.1080U RELING 20ELN2" _ $$$CRLF, - "op lengte 3x 240mm") + "op lengte 3x 240mm"_ $$$CRLF, + "Te verzagen product:" _ $$$CRLF, + "Reling voor LEGRABOX binnenlade, inkortbaar" _ $$$CRLF, + "Kleur: inox look geanodiseerd") Do $$$AssertEquals(Langtekst.GeefString(), ControleLangtekst) ]]>