Index: APPS/Halux/PPS/ALUFrees/Svg/Kaderdeur/KaderToevoeger.cls.xml
===================================================================
diff -u -r61607 -r61643
--- APPS/Halux/PPS/ALUFrees/Svg/Kaderdeur/KaderToevoeger.cls.xml	(.../KaderToevoeger.cls.xml)	(revision 61607)
+++ APPS/Halux/PPS/ALUFrees/Svg/Kaderdeur/KaderToevoeger.cls.xml	(.../KaderToevoeger.cls.xml)	(revision 61643)
@@ -42,7 +42,7 @@
 		Do KDOuter.SetFill(##class(TECH.Svg.enu.Kleur).Grijs())
 		Do KDOuter.SetStroke(##class(TECH.Svg.enu.Kleur).Zwart())
 		Do KDMiddle.SetStroke(##class(TECH.Svg.enu.Kleur).Zwart())
-		Do KDMiddle.SetFill(##class(TECH.Svg.enu.Kleur).Geen())
+		Do KDMiddle.SetFill($S(BorderS="LD":##class(TECH.Svg.enu.Kleur).Geen(),BorderS="D":##class(TECH.Svg.enu.Kleur).Geen(),1:##class(TECH.Svg.enu.Kleur).DonkerGroen()))
 		Do KDMiddle.SetStrokeDashArray($S(BorderS="LD":"4",BorderS="D":"2",1:"none"))
 		Do KDInner.SetFill($S($$$HasLength(KaderdeurObject.Vulling.Vulling):##class(TECH.Svg.enu.Kleur).LichtGroen(),1:##class(TECH.Svg.enu.Kleur).Wit()))
 		Do KDInner.SetStroke(##class(TECH.Svg.enu.Kleur).Zwart())