Index: TECH/Svg/BasisElementFactory.cls.xml =================================================================== diff -u -r3680 -r3728 --- TECH/Svg/BasisElementFactory.cls.xml (.../BasisElementFactory.cls.xml) (revision 3680) +++ TECH/Svg/BasisElementFactory.cls.xml (.../BasisElementFactory.cls.xml) (revision 3728) @@ -12,6 +12,7 @@ Set Rect.Y = Y Set Rect.Width = Width Set Rect.Height = Height + Quit Rect ]]> @@ -24,6 +25,7 @@ Set Circle.MiddelpuntX = MiddelpuntX Set Circle.MiddelpuntY = MiddelpuntY Set Circle.Straal = Straal + Quit Circle ]]> @@ -37,6 +39,7 @@ Set Line.Y1 = Y1 Set Line.X2 = X2 Set Line.Y2 = Y2 + Quit Line ]]> @@ -52,6 +55,7 @@ Else { Do Path.VoegToeInhoudAfgeslotenD(CoordinatesList) } + Quit Path ]]> @@ -64,6 +68,7 @@ Set Text.X = X Set Text.Y = Y Set Text.Content = Content + Quit Text ]]> @@ -77,6 +82,7 @@ Set SvgBox.Y = Y Set SvgBox.Height = Height Set SvgBox.Width = Width + Quit SvgBox ]]> @@ -85,6 +91,7 @@ TECH.Svg.Basis.Group @@ -96,6 +103,7 @@ Set Coordinaat = ##class(TECH.Svg.Basis.Path.Coordinates).%New() Set Coordinaat.X = X Set Coordinaat.Y = Y + Quit Coordinaat ]]>