Новые иконки

2022-10-21 12:57:38 +03:00
parent 8cacfc30d4
commit 517a724780
5 changed files with 86 additions and 7 deletions
--- a/lib/gui.tcl
+++ b/lib/gui.tcl
@@ -81,6 +81,8 @@ pack .frmStatus -side top -padx 1 -fill x
 #pack [label .frmMenu.lbl -text "ddd"]
 pack [ttk::label .frmStatus.lblGitLogo -justify left] -side left
 pack [ttk::label .frmStatus.lblGit] -side left
+bind .frmStatus.lblGit <Button-1><ButtonRelease-1> {catch [Git::BranchDialog %X %Y]}
+
 pack [ttk::label .frmStatus.lblPosition -justify right] -side right

 ttk::menubutton .frmMenu.mnuFile -text [::msgcat::mc "File"] -menu .frmMenu.mnuFile.m