You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@openoffice.apache.org by ha...@apache.org on 2015/01/12 15:39:39 UTC

svn commit: r1651106 - /openoffice/trunk/main/basctl/source/basicide/baside2b.cxx

Author: hanya
Date: Mon Jan 12 14:39:39 2015
New Revision: 1651106

URL: http://svn.apache.org/r1651106
Log:
#i120772# do not ignore last three properties when special properties not found in watching window

Modified:
    openoffice/trunk/main/basctl/source/basicide/baside2b.cxx

Modified: openoffice/trunk/main/basctl/source/basicide/baside2b.cxx
URL: http://svn.apache.org/viewvc/openoffice/trunk/main/basctl/source/basicide/baside2b.cxx?rev=1651106&r1=1651105&r2=1651106&view=diff
==============================================================================
--- openoffice/trunk/main/basctl/source/basicide/baside2b.cxx (original)
+++ openoffice/trunk/main/basctl/source/basicide/baside2b.cxx Mon Jan 12 14:39:39 2015
@@ -1829,9 +1829,16 @@ void WatchTreeListBox::RequestingChilds(
 		createAllObjectProperties( pObj );
  	    SbxArray* pProps = pObj->GetProperties();
 	    sal_uInt16 nPropCount = pProps->Count();
+	    if ( nPropCount >= 3 && 
+		     pProps->Get( nPropCount -1 )->GetName().EqualsIgnoreCaseAscii( "Dbg_Methods" ) &&
+		     pProps->Get( nPropCount -2 )->GetName().EqualsIgnoreCaseAscii( "Dbg_Properties" ) &&
+		     pProps->Get( nPropCount -3 )->GetName().EqualsIgnoreCaseAscii( "Dbg_SupportedInterfaces" ) )
+		 {
+			nPropCount -= 3;
+		 }
 		pItem->maMemberList.allocList( nPropCount );
 
-	    for( sal_uInt16 i = 0 ; i < nPropCount - 3 ; i++ )
+	    for( sal_uInt16 i = 0 ; i < nPropCount ; ++i )
 	    {
 		    SbxVariable* pVar = pProps->Get( i );