From 8e43a02f3badaa67ffbe0f8dbfc15f19e12f2c25 Mon Sep 17 00:00:00 2001
From: Gregor Hartmann <gh@openoffice.org>
Date: Wed, 20 Mar 2002 08:05:56 +0000
Subject: [PATCH] #96223# dont allow two save MessageBoxes at on time

---
 basic/source/app/appwin.cxx | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/basic/source/app/appwin.cxx b/basic/source/app/appwin.cxx
index f485c19e183f..a2a9b401f7cb 100644
--- a/basic/source/app/appwin.cxx
+++ b/basic/source/app/appwin.cxx
@@ -2,9 +2,9 @@
  *
  *  $RCSfile: appwin.cxx,v $
  *
- *  $Revision: 1.3 $
+ *  $Revision: 1.4 $
  *
- *  last change: $Author: gh $ $Date: 2001-06-08 13:44:14 $
+ *  last change: $Author: gh $ $Date: 2002-03-20 09:05:56 $
  *
  *  The Contents of this file are made available subject to the terms of
  *  either of the following licenses
@@ -567,6 +567,8 @@ USHORT AppWin::QuerySave( QueryBits nBits )
     else
         nResult = RET_NO;
 
+    BOOL bAlwaysEnableInput = pFrame->IsAlwaysEnableInput();
+    pFrame->AlwaysEnableInput( FALSE );
     if( ( ( IsModified() || bSaveNotDirty ) && bQueryDirty ) || ( DiskFileChanged( SINCE_LAST_LOAD ) && bQueryDiskChanged ) )
     {
         ToTop();
@@ -578,7 +580,7 @@ USHORT AppWin::QuerySave( QueryBits nBits )
         else
             nResult = QueryBox( this, ResId( IDS_ASK_DISKCHANGE_SAVE ) ).Execute();
     }
-
+    pFrame->AlwaysEnableInput( bAlwaysEnableInput );
 
     USHORT nReturn;
     switch( nResult )