#95159# Changed XExactName handling to enable full qualified method names

basic/source/classes/sbunoobj.cxx

@@ -2,9 +2,9 @@
  *
  *  $RCSfile: sbunoobj.cxx,v $
  *
- *  $Revision: 1.21 $
+ *  $Revision: 1.22 $
  *
- *  last change: $Author: ab $ $Date: 2002-08-12 08:59:55 $
+ *  last change: $Author: ab $ $Date: 2002-08-29 10:49:59 $
  *
  *  The Contents of this file are made available subject to the terms of
  *  either of the following licenses
@@ -1735,10 +1735,12 @@ SbxVariable* SbUnoObject::Find( const XubString& rName, SbxClassType t )
     {
         OUString aUName( rName );
         if( mxExactName.is() )
-            aUName = mxExactName->getExactName( aUName );
-        if( mxUnoAccess.is() )
         {
-            if( aUName.getLength() )
+            OUString aUExactName = mxExactName->getExactName( aUName );
+            if( aUExactName.getLength() )
+                aUName = aUExactName;
+        }
+        if( mxUnoAccess.is() )
         {
             if( mxUnoAccess->hasProperty( aUName, PropertyConcept::ALL - PropertyConcept::DANGEROUS ) )
             {
@@ -1770,7 +1772,6 @@ SbxVariable* SbUnoObject::Find( const XubString& rName, SbxClassType t )
                 QuickInsert( (SbxVariable*)xMethRef );
                 pRes = xMethRef;
             }
-            }
 
             // Wenn immer noch nichts gefunden wurde, muss geprueft werden, ob NameAccess vorliegt
             if( !pRes )
@@ -1814,8 +1815,6 @@ SbxVariable* SbUnoObject::Find( const XubString& rName, SbxClassType t )
             }
         }
         else if( mxInvocation.is() )
-        {
-            if( aUName.getLength() )
         {
             if( mxInvocation->hasProperty( aUName ) )
             {
@@ -1833,7 +1832,6 @@ SbxVariable* SbUnoObject::Find( const XubString& rName, SbxClassType t )
             }
         }
     }
-    }
 
     // Ganz am Schluss noch pruefen, ob die Dbg_-Properties gemeint sind