diff options
| author | Andreas Bregas <ab@openoffice.org> | 2002-08-07 12:11:07 +0000 |
|---|---|---|
| committer | Andreas Bregas <ab@openoffice.org> | 2002-08-07 12:11:07 +0000 |
| commit | 5ec9c50f01c340b3dd4e8e5182f7aea249ad5a74 (patch) | |
| tree | bd45820c17a66732d0d54574d93405d787cb22a8 /basic | |
| parent | b1c2a57bef6c6b83bb10ce4a8076d1f4a8c27800 (diff) | |
#100385# IsObject(): Reset error after call to GetObject()
Diffstat (limited to 'basic')
| -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) ) ) |