diff --git a/src/GEOMGUI/GEOM_msg_en.ts b/src/GEOMGUI/GEOM_msg_en.ts
index 9f9111384..c6ffb7c1f 100644
--- a/src/GEOMGUI/GEOM_msg_en.ts
+++ b/src/GEOMGUI/GEOM_msg_en.ts
@@ -3775,6 +3775,14 @@ Please, select face, shell or solid and try again</translation>
             <source>GEOM_IMPORT_ERRORS</source>
             <translation>Import operation has finished with errors:</translation>
         </message>
+        <message>
+            <source>GEOM_PUBLISH_NAMED_SHAPES</source>
+            <translation>Create groups for named shapes (if there are any)?</translation>
+        </message>
+        <message>
+            <source>GEOM_SCALE_DIMENSIONS</source>
+            <translation>Length unit in the file is not a 'meter'. Do you want to scale a model?</translation>
+        </message>
     </context>
     <context>
         <name>BasicGUI_EllipseDlg</name>
diff --git a/src/GEOMToolsGUI/GEOMToolsGUI.cxx b/src/GEOMToolsGUI/GEOMToolsGUI.cxx
index c3556b638..9e7e0a068 100644
--- a/src/GEOMToolsGUI/GEOMToolsGUI.cxx
+++ b/src/GEOMToolsGUI/GEOMToolsGUI.cxx
@@ -713,7 +713,7 @@ bool GEOMToolsGUI::Import()
 	  if( aUnitName != "M" ) {
 	    if( SUIT_MessageBox::question( app->desktop(),
 					   "Question",//tr("WRN_WARNING"),
-					   "Length unit in given file is not a 'meter'. Is it needed to scale a model?",
+					   QObject::tr("GEOM_SCALE_DIMENSIONS"),
 					   SUIT_MessageBox::Yes | SUIT_MessageBox::No,
 					   SUIT_MessageBox::No) == SUIT_MessageBox::Yes ) {
 	      fileT = "IGES_SCALE";
@@ -739,7 +739,7 @@ bool GEOMToolsGUI::Import()
 	if( aCurrentType == "ACIS" ) {
 	  if( SUIT_MessageBox::question( app->desktop(),
 					 "Question",//tr("WRN_WARNING"),
-					 "Given file contents some names. Is it needed to create groups for named shapes?",
+					 tr("GEOM_PUBLISH_NAMED_SHAPES"),
 					 SUIT_MessageBox::Yes | SUIT_MessageBox::No,
 					 SUIT_MessageBox::No) == SUIT_MessageBox::Yes ) {
 	    GeometryGUI::GetGeomGen()->PublishNamedShapesInStudy(aDSStudy, anObj);