From 9ff7fa815f4b59d710f702d616d522b996b097a3 Mon Sep 17 00:00:00 2001
From: svk <svk@nuk-svk.ru>
Date: Wed, 21 Jan 2026 15:33:12 +0300
Subject: [PATCH] =?UTF-8?q?=D0=A3=D0=BC=D0=B5=D0=BD=D1=8C=D1=88=D0=B8?=
 =?UTF-8?q?=D0=BB=20=D0=B2=D1=81=D0=BF=D0=BB=D1=8B=D0=B2=D0=B0=D1=8E=D1=89?=
 =?UTF-8?q?=D0=B5=D0=B5=20=D0=BC=D0=B5=D0=BD=D1=8E:=20=D0=B2=D1=8B=D0=BD?=
 =?UTF-8?q?=D0=B5=D1=81=20=D0=BC=D0=B5=D0=BD=D1=8E=D1=88=D0=BA=D0=B8=20?=
 =?UTF-8?q?=D0=A4=D0=B0=D0=B9=D0=BB=20=D0=B8=20=D0=92=D0=B8=D0=B4=20=D0=B2?=
 =?UTF-8?q?=20=D0=BF=D0=BE=D0=B4=D0=BC=D0=B5=D0=BD=D1=8E.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 lib/gui.tcl | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/lib/gui.tcl b/lib/gui.tcl
index e24f8b3..3f26659 100644
--- a/lib/gui.tcl
+++ b/lib/gui.tcl
@@ -143,9 +143,14 @@ pack .frmMenu.mnuHelp -side right
 
 # PopUP menu
 menu .popup
-GetFileMenu .popup
 GetEditMenu .popup
-GetViewMenu .popup
+.popup add separator
+menu .popup.file
+.popup add cascade -label [::msgcat::mc "File"] -menu .popup.file
+GetFileMenu .popup.file
+menu .popup.view
+.popup add cascade -label [::msgcat::mc "View"] -menu .popup.view 
+GetViewMenu .popup.view
 
 set frmTool [ttk::frame .frmBody.frmTool]
 ttk::panedwindow .frmBody.panel -orient horizontal -style TPanedwindow