summaryrefslogtreecommitdiff
path: root/vbahelper/source/msforms/vbamultipage.cxx
diff options
context:
space:
mode:
Diffstat (limited to 'vbahelper/source/msforms/vbamultipage.cxx')
-rw-r--r--vbahelper/source/msforms/vbamultipage.cxx4
1 files changed, 4 insertions, 0 deletions
diff --git a/vbahelper/source/msforms/vbamultipage.cxx b/vbahelper/source/msforms/vbamultipage.cxx
index b6587c9b2367..1ba7c4f5fbac 100644
--- a/vbahelper/source/msforms/vbamultipage.cxx
+++ b/vbahelper/source/msforms/vbamultipage.cxx
@@ -88,8 +88,12 @@ void SAL_CALL
ScVbaMultiPage::setValue( const sal_Int32 _value ) throw (::com::sun::star::uno::RuntimeException)
{
// track change in dialog ( dialog value is 1 based, 0 is a special value )
+ sal_Int32 nVal = _value; // will be _value + 1 when cws container_controls is integrated
+ sal_Int32 nOldVal = getValue();
m_xProps->setPropertyValue( SVALUE, uno::makeAny( _value ) );
mxDialogProps->setPropertyValue( SSTEP, uno::makeAny( _value + 1) );
+ if ( nVal != nOldVal )
+ fireChangeEvent();
}