diff options
-rw-r--r-- | basic/source/runtime/methods.cxx | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/basic/source/runtime/methods.cxx b/basic/source/runtime/methods.cxx index 2e44228db99e..11ce5c35a34d 100644 --- a/basic/source/runtime/methods.cxx +++ b/basic/source/runtime/methods.cxx @@ -2,9 +2,9 @@ * * $RCSfile: methods.cxx,v $ * - * $Revision: 1.40 $ + * $Revision: 1.41 $ * - * last change: $Author: ab $ $Date: 2002-06-06 14:59:05 $ + * last change: $Author: ab $ $Date: 2002-08-07 13:11:07 $ * * The Contents of this file are made available subject to the terms of * either of the following licenses @@ -1961,6 +1961,9 @@ RTLFUNC(IsObject) SbxVariable* pVar = rPar.Get(1); SbxBase* pObj = (SbxBase*)pVar->GetObject(); + // #100385: GetObject can result in an error, so reset it + SbxBase::ResetError(); + SbUnoClass* pUnoClass; BOOL bObject; if( pObj && NULL != ( pUnoClass=PTR_CAST(SbUnoClass,pObj) ) ) |