From 34eb081c7d63ecc0cc54d3f7ef833ed241a545a9 Mon Sep 17 00:00:00 2001
From: mzn <mzn@opencascade.com>
Date: Mon, 20 Mar 2006 12:32:34 +0000
Subject: [PATCH] Fix for bug IPAL10122.

---
 src/SalomeApp/SalomeApp_Application.cxx | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/src/SalomeApp/SalomeApp_Application.cxx b/src/SalomeApp/SalomeApp_Application.cxx
index 9d17c32e6..fde0af782 100644
--- a/src/SalomeApp/SalomeApp_Application.cxx
+++ b/src/SalomeApp/SalomeApp_Application.cxx
@@ -339,6 +339,14 @@ void SalomeApp_Application::onPaste()
   _PTR(Study) stdDS = study->studyDS();
   if(!stdDS) return;
 
+  if ( stdDS->GetProperties()->IsLocked() ) {
+    SUIT_MessageBox::warn1 ( desktop(),
+			     QObject::tr("WRN_WARNING"),
+			     QObject::tr("WRN_STUDY_LOCKED"),
+			     QObject::tr("BUT_OK") );
+    return;
+  }
+
   SALOME_ListIteratorOfListIO it( list );
   if(it.More())
     {
-- 
2.39.2