Tag: cws_src680_odbmacros2 User: fs Date: 2008-02-06 08:32:02+0000 Modified: dba/dbaccess/source/core/dataaccess/ModelImpl.cxx
Log: #i49133# added possibility to lock the modification flag File Changes: Directory: /dba/dbaccess/source/core/dataaccess/ ================================================ File [changed]: ModelImpl.cxx Url: http://dba.openoffice.org/source/browse/dba/dbaccess/source/core/dataaccess/ModelImpl.cxx?r1=1.21.2.10&r2=1.21.2.11 Delta lines: +8 -5 ------------------- --- ModelImpl.cxx 2008-02-04 13:06:56+0000 1.21.2.10 +++ ModelImpl.cxx 2008-02-06 08:31:59+0000 1.21.2.11 @@ -4,9 +4,9 @@ * * $RCSfile: ModelImpl.cxx,v $ * - * $Revision: 1.21.2.10 $ + * $Revision: 1.21.2.11 $ * - * last change: $Author: fs $ $Date: 2008/02/04 13:06:56 $ + * last change: $Author: fs $ $Date: 2008/02/06 08:31:59 $ * * The Contents of this file are made available subject to * the terms of GNU Lesser General Public License Version 2.1. @@ -327,6 +327,7 @@ ,m_aStorages() ,m_aMacroMode( *this ) ,m_bHasAnyObjectWithMacros( false ) + ,m_bModificationLock( false ) ,m_aContext( _rxFactory ) ,m_nLoginTimeout(0) ,m_bReadOnly(sal_False) @@ -362,6 +363,7 @@ ,m_aStorages() ,m_aMacroMode( *this ) ,m_bHasAnyObjectWithMacros( false ) + ,m_bModificationLock( false ) ,m_aContext( _rxFactory ) ,m_sName(_rRegistrationName) ,m_nLoginTimeout(0) @@ -524,8 +526,6 @@ SharedStorage xObjectStor( _rxContainerStorage->openStorageElement( _rPersistentName, ElementModes::READ ) ); - // TODO: opening the storage is too expensive, find some hasByHierarchicalName or so - bHasMacros = ::sfx2::DocumentMacroMode::storageHasMacros( xObjectStor ); } catch( const Exception& ) @@ -912,6 +912,9 @@ // ----------------------------------------------------------------------------- void ODatabaseModelImpl::setModified( sal_Bool _bModified ) { + if ( isModifyLocked() ) + return; + try { Reference<XModifiable> xModi(m_xModel.get(),UNO_QUERY); --------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
