From 9d8ba896f01a974479a6815bff56a58d3bf3555e Mon Sep 17 00:00:00 2001
From: svkalinin <svkalinin@samsonpost.ru>
Date: Wed, 19 Oct 2022 09:39:55 +0300
Subject: [PATCH] git reflog

---
 lib/git.tcl | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/lib/git.tcl b/lib/git.tcl
index 4a304ec..33c717d 100644
--- a/lib/git.tcl
+++ b/lib/git.tcl
@@ -137,6 +137,15 @@ namespace eval Git {
     proc Merge {} {
         global cfgVariables activeProject
     }
+
+    proc Reflog {} {
+        global cfgVariables activeProject
+        set cmd exec
+        lappend cmd "$cfgVariables(gitCommand)"
+        lappend cmd "reflog"
+        lappend cmd "--"
+        lappend cmd "$activeProject"
+    }
     
     proc ListBoxPress {w} {
         set fileName [$w.body.lBox get [$w.body.lBox curselection]]