From 9b1c537fdbdf5bcad2f73bbad8eb06983889ff78 Mon Sep 17 00:00:00 2001 From: Mark Levedahl Date: Tue, 20 May 2025 13:53:52 -0400 Subject: git-gui: remove non-ttk code git-gui has code paths to support older non-ttk widgets, but this code is no longer reachable as ttk is always used. Remove that code. Signed-off-by: Mark Levedahl --- lib/sshkey.tcl | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) (limited to 'lib/sshkey.tcl') diff --git a/lib/sshkey.tcl b/lib/sshkey.tcl index 6caf1fd458..7a6526d3db 100644 --- a/lib/sshkey.tcl +++ b/lib/sshkey.tcl @@ -18,7 +18,7 @@ proc find_ssh_key {} { } proc do_ssh_key {} { - global sshkey_title sshkey_fd use_ttk + global sshkey_title sshkey_fd set w .sshkey_dialog if {[winfo exists $w]} { @@ -48,8 +48,7 @@ proc do_ssh_key {} { text $w.contents -width 60 -height 10 -wrap char -relief sunken pack $w.contents -fill both -expand 1 - set clr darkblue - if {$use_ttk} { set clr [ttk::style lookup . -selectbackground] } + set clr [ttk::style lookup . -selectbackground] $w.contents configure -inactiveselectbackground $clr ttk::frame $w.buttons -- cgit v1.3