Index: DOM/PM/impl/RVGLangtekstCreator.cls.xml
===================================================================
diff -u -r69592 -r70565
--- DOM/PM/impl/RVGLangtekstCreator.cls.xml	(.../RVGLangtekstCreator.cls.xml)	(revision 69592)
+++ DOM/PM/impl/RVGLangtekstCreator.cls.xml	(.../RVGLangtekstCreator.cls.xml)	(revision 70565)
@@ -151,14 +151,7 @@
 <Method name="GeefKleurPocketTekst">
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
-<Implementation><![CDATA[
-	#dim Kleur As %String = ..IngegevenKenmerken.DecornaamA
-	
-	If (..IngegevenKenmerken.MateriaalOpties = ##class(DOM.PM.enu.RVGMateriaalOpties).TweeKleuren()) {
-		Set Kleur = ..IngegevenKenmerken.DecornaamB
-	}
-	
-	Quit ..Vertaler.GeefVertaling("KleurPocket")_": " _ Kleur
+<Implementation><![CDATA[	Quit ..Vertaler.GeefVertaling("KleurPocket")_": " _ ..IngegevenKenmerken.DecornaamA
 ]]></Implementation>
 </Method>
 
@@ -180,7 +173,14 @@
 <Method name="GeefKleurDeurenTekst">
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ..Vertaler.GeefVertaling("KleurDeuren")_": " _ ..IngegevenKenmerken.DecornaamA
+<Implementation><![CDATA[
+	#dim Kleur As %String = ..IngegevenKenmerken.DecornaamA
+	
+	If (..IngegevenKenmerken.MateriaalOpties = ##class(DOM.PM.enu.RVGMateriaalOpties).TweeKleuren()) {
+		Set Kleur = ..IngegevenKenmerken.DecornaamB
+	}
+	
+	Quit ..Vertaler.GeefVertaling("KleurDeuren")_": " _ Kleur
 ]]></Implementation>
 </Method>