[PATCH] git-gui: Indicate cursor position in commit buffer

[PATCH] git-gui: Indicate cursor position in commit buffer

[mitchr]

From: Mitchell Riley <mitchr@mitchr.dev>

Add a visual indicator for both the line and column position of the 
cursor to the bottom right of the commit buffer.

Signed-off-by: Mitchell Riley <mitchr@mitchr.dev>

---
 git-gui.sh | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

diff --git a/git-gui.sh b/git-gui.sh
index 201524c..a0cdf5c 100755
--- a/git-gui.sh
+++ b/git-gui.sh
@@ -3411,8 +3411,10 @@ if {![is_enabled nocommit]} {
 #
 ${NS}::frame .vpane.lower.commarea.buffer
 ${NS}::frame .vpane.lower.commarea.buffer.header
+${NS}::frame .vpane.lower.commarea.buffer.footer
 set ui_comm .vpane.lower.commarea.buffer.frame.t
 set ui_coml .vpane.lower.commarea.buffer.header.l
+set ui_comm_pos .vpane.lower.commarea.buffer.footer
 
 if {![is_enabled nocommit]} {
 	${NS}::checkbutton .vpane.lower.commarea.buffer.header.amend \
@@ -3465,10 +3467,23 @@ ${NS}::scrollbar .vpane.lower.commarea.buffer.frame.sby \
 	-orient vertical \
 	-command [list $ui_comm yview]
 
+set line 0
+set col 0
+${NS}::label $ui_comm_pos.ll -text "Ln "
+${NS}::label $ui_comm_pos.lb -textvariable line
+${NS}::label $ui_comm_pos.cl -text ", Col "
+${NS}::label $ui_comm_pos.cb -textvariable col
+bind $ui_comm <KeyRelease> {lassign [split [$ui_comm index insert] "."] line col}
+pack $ui_comm_pos.cb -side right
+pack $ui_comm_pos.cl -side right
+pack $ui_comm_pos.lb -side right
+pack $ui_comm_pos.ll -side right
+
 pack .vpane.lower.commarea.buffer.frame.sbx -side bottom -fill x
 pack .vpane.lower.commarea.buffer.frame.sby -side right -fill y
 pack $ui_comm -side left -fill y
 pack .vpane.lower.commarea.buffer.header -side top -fill x
+pack .vpane.lower.commarea.buffer.footer -side bottom -fill x
 pack .vpane.lower.commarea.buffer.frame -side left -fill y
 pack .vpane.lower.commarea.buffer -side left -fill y
 
-- 
2.32.0