Index: APPS/Blum/impl/UserCartValidator.cls.xml
===================================================================
diff -u -r40960 -r40967
--- APPS/Blum/impl/UserCartValidator.cls.xml	(.../UserCartValidator.cls.xml)	(revision 40960)
+++ APPS/Blum/impl/UserCartValidator.cls.xml	(.../UserCartValidator.cls.xml)	(revision 40967)
@@ -25,7 +25,7 @@
 <FormalSpec>Email:%String=""</FormalSpec>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	#dim GebruikerLijst = ..ToegangRepository.ZoekGebruikerIDViaEmail(Email)
+	#dim GebruikerLijst As %ListOfDataTypes = ..ToegangRepository.ZoekGebruikerIDViaEmail(Email)
 	If GebruikerLijst.Count() = 0 {
 		Set Exceptie = ##class(APPS.Blum.OnlineProductConfigurator.impl.EmailOngekendExceptie).%New(Email)
 		Do ##class(TECH.ExceptionHandler).Throw(Exceptie)