From 4fae740db79d4e7cc97440e2bab8d1ef612d9b51 Mon Sep 17 00:00:00 2001
From: Noel Power <nopower@novell.com>
Date: Fri, 12 Aug 2011 00:36:51 -0400
Subject: Disable fake VBA events for the old-style form controls.

---
 oox/source/ole/axcontrol.cxx    | 7 +++++++
 oox/source/token/properties.txt | 1 +
 2 files changed, 8 insertions(+)

(limited to 'oox')

diff --git a/oox/source/ole/axcontrol.cxx b/oox/source/ole/axcontrol.cxx
index 0eef022eaef7..c69cc1fa1101 100644
--- a/oox/source/ole/axcontrol.cxx
+++ b/oox/source/ole/axcontrol.cxx
@@ -1892,6 +1892,13 @@ bool EmbeddedControl::convertProperties( const Reference< XControlModel >& rxCtr
     {
         PropertyMap aPropMap;
         aPropMap.setProperty( PROP_Name, maName );
+        try
+        {
+            aPropMap.setProperty( PROP_GenerateVbaEvents, true);
+        }
+        catch( Exception& )
+        {
+        }
         mxModel->convertProperties( aPropMap, rConv );
         PropertySet aPropSet( rxCtrlModel );
         aPropSet.setProperties( aPropMap );
diff --git a/oox/source/token/properties.txt b/oox/source/token/properties.txt
index a4b270ab4124..fa5b1ee51c50 100644
--- a/oox/source/token/properties.txt
+++ b/oox/source/token/properties.txt
@@ -179,6 +179,7 @@ FormulaConvention
 Function
 GapwidthSequence
 Geometry3D
+GenerateVbaEvents
 GradientName
 Graphic
 GraphicColorMode
-- 
cgit