From 8e8c789742874ac823e68f6154050c64b6fc5b85 Mon Sep 17 00:00:00 2001 From: Tamas Bunth Date: Thu, 7 Sep 2017 22:00:01 +0200 Subject: oovbaapi: create XOval and XLine shape types MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit This is needed in order to make "TypeOf myLine Is Line" or similar expressions return the expected "true" value. The implementation of the basic interpreter of TypeOf uses XTypeProvider to determine the type of an object by getting the last part of the type name. E.g. "ooo:vba::msforms::XLine" is determined as a "Line". That's why I created the XLine and XOval blank classes. TypeOf doc: https://docs.microsoft.com/en-us/dotnet/visual-basic/language-reference/operators/typeof-operator Change-Id: Ia49cc92d672e30d0126f02d61a55a956ac1425f0 Reviewed-on: https://gerrit.libreoffice.org/42083 Tested-by: Jenkins Reviewed-by: Tamás Bunth --- sc/Library_vbaobj.mk | 2 ++ 1 file changed, 2 insertions(+) (limited to 'sc/Library_vbaobj.mk') diff --git a/sc/Library_vbaobj.mk b/sc/Library_vbaobj.mk index 2d04d28d5bb5..082b254c88df 100644 --- a/sc/Library_vbaobj.mk +++ b/sc/Library_vbaobj.mk @@ -84,6 +84,7 @@ $(eval $(call gb_Library_add_exception_objects,vbaobj,\ sc/source/ui/vba/vbahyperlink \ sc/source/ui/vba/vbahyperlinks \ sc/source/ui/vba/vbainterior \ + sc/source/ui/vba/vbalineshape \ sc/source/ui/vba/vbamenubar \ sc/source/ui/vba/vbamenubars \ sc/source/ui/vba/vbamenu \ @@ -95,6 +96,7 @@ $(eval $(call gb_Library_add_exception_objects,vbaobj,\ sc/source/ui/vba/vbaoleobject \ sc/source/ui/vba/vbaoleobjects \ sc/source/ui/vba/vbaoutline \ + sc/source/ui/vba/vbaovalshape \ sc/source/ui/vba/vbapagebreak \ sc/source/ui/vba/vbapagebreaks \ sc/source/ui/vba/vbapagesetup \ -- cgit