svn commit: r1504166 - /openoffice/trunk/main/basctl/source/basicide/baside2b.cxx

[hdu]

Author: hdu
Date: Wed Jul 17 15:09:17 2013
New Revision: 1504166

URL: http://svn.apache.org/r1504166
Log:
#i21548# add context menu to code editor part of Basic IDE

for now only with cut, copy and paste but can be extended

Patch by: Tsutomu Uchino <hanya.r...@gmail.com>

Modified:
    openoffice/trunk/main/basctl/source/basicide/baside2b.cxx

Modified: openoffice/trunk/main/basctl/source/basicide/baside2b.cxx
URL: 
http://svn.apache.org/viewvc/openoffice/trunk/main/basctl/source/basicide/baside2b.cxx?rev=1504166&r1=1504165&r2=1504166&view=diff
==============================================================================
--- openoffice/trunk/main/basctl/source/basicide/baside2b.cxx (original)
+++ openoffice/trunk/main/basctl/source/basicide/baside2b.cxx Wed Jul 17 
15:09:17 2013
@@ -383,7 +383,15 @@ void __EXPORT EditorWindow::Command( con
                         ( rCEvt.GetCommand() == COMMAND_AUTOSCROLL ) )
                {
                        HandleScrollCommand( rCEvt, 
pModulWindow->GetHScrollBar(), &pModulWindow->GetEditVScrollBar() );
-               }
+               } else if ( rCEvt.GetCommand() == COMMAND_CONTEXTMENU ) {
+            BasicIDEShell* pIDEShell = IDE_DLL()->GetShell();
+            SfxViewFrame* pViewFrame = pIDEShell ? pIDEShell->GetViewFrame() : 
NULL;
+            SfxDispatcher* pDispatcher = pViewFrame ? 
pViewFrame->GetDispatcher() : NULL;
+            if ( pDispatcher )
+            {
+                pDispatcher->ExecutePopup();
+            }
+        }
        }
 }