[Libreoffice-commits] core.git: basctl/source

[Caolán McNamara]

 basctl/source/basicide/baside2.cxx |    7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

New commits:
commit 5b3f84cec471ddbde98a46220096cdb952bb1935
Author: Caolán McNamara <caolanm at redhat.com>
Date:   Wed Mar 9 15:30:51 2016 +0000

    Resolves: tdf#95428 backspace in readonly macro editor hangs
    
    Change-Id: I16568b00e92d18f32818188ba3ab8df92bbd13aa

diff --git a/basctl/source/basicide/baside2.cxx b/basctl/source/basicide/baside2.cxx
index 38b8043..b27605b 100644
--- a/basctl/source/basicide/baside2.cxx
+++ b/basctl/source/basicide/baside2.cxx
@@ -867,11 +867,10 @@ void ModulWindow::ExecuteCommand (SfxRequest& rReq)
     {
         case SID_DELETE:
         {
-            KeyEvent aFakeDelete( 0, KEY_DELETE );
-            bool bDone = GetEditView()->KeyInput( aFakeDelete );
-            if (!bDone)
+            if (!IsReadOnly())
             {
-                BaseWindow::KeyInput(aFakeDelete);
+                KeyEvent aFakeDelete(0, KEY_DELETE);
+                (void)GetEditView()->KeyInput(aFakeDelete);
             }
             break;
         }