use more range-for on uno::Sequence

Change-Id: Ifad32425d79be5a22d33d721bdc5fb993f699759
Reviewed-on: https://gerrit.libreoffice.org/39763
Reviewed-by: Noel Grandin <noel.grandin@collabora.co.uk>
Tested-by: Noel Grandin <noel.grandin@collabora.co.uk>

1 files changed, 2 insertions, 3 deletions

diff --git a/scripting/source/vbaevents/eventhelper.cxx b/scripting/source/vbaevents/eventhelper.cxx
index 7b29b4c98759..e60161a9ea87 100644
--- a/scripting/source/vbaevents/eventhelper.cxx
+++ b/scripting/source/vbaevents/eventhelper.cxx
@@ -407,19 +407,18 @@ Sequence< ScriptEventDescriptor >
 ScriptEventHelper::createEvents( const OUString& sCodeName )
 {
     Sequence< OUString > aControlListeners = getEventListeners();
-    OUString* pSrc = aControlListeners.getArray();
     sal_Int32 nLength = aControlListeners.getLength();
 
     Sequence< ScriptEventDescriptor > aDest( nLength );
     sal_Int32 nEvts = 0;
-    for ( sal_Int32 i = 0; i< nLength; ++i, ++pSrc )
+    for ( OUString const & i : aControlListeners)
     {
         // from getListeners eventName is of form
         // "com.sun.star.awt.XActionListener::actionPerformed"
         // we need to strip "com.sun.star.awt." from that for form
         // controls
         ScriptEventDescriptor evtDesc;
-        if ( eventMethodToDescriptor( *pSrc, evtDesc, sCodeName ) )
+        if ( eventMethodToDescriptor( i, evtDesc, sCodeName ) )
         {
             sal_Int32 dIndex = nEvts;
             ++nEvts;