X-Git-Url: https://git.tokkee.org/?a=blobdiff_plain;f=git-gui%2Flib%2Fsearch.tcl;h=7fdbf87bcdcf3e6d5a928dd4ac8a323509ea7953;hb=1f9a980636d39c08c1cf1c13a6e6584d9d039e0e;hp=b371e9a30a00fda0ced979c03a1a5d7856654baa;hpb=652f0c8f1df362755253fe9c5a975be7e5a5cbdc;p=git.git diff --git a/git-gui/lib/search.tcl b/git-gui/lib/search.tcl index b371e9a30..7fdbf87bc 100644 --- a/git-gui/lib/search.tcl +++ b/git-gui/lib/search.tcl @@ -14,15 +14,16 @@ field smarktop field smarkbot constructor new {i_w i_text args} { + global use_ttk NS set w $i_w set ctext $i_text - frame $w - label $w.l -text [mc Find:] + ${NS}::frame $w + ${NS}::label $w.l -text [mc Find:] entry $w.ent -textvariable ${__this}::searchstring -background lightgreen - button $w.bn -text [mc Next] -command [cb find_next] - button $w.bp -text [mc Prev] -command [cb find_prev] - checkbutton $w.cs -text [mc Case-Sensitive] \ + ${NS}::button $w.bn -text [mc Next] -command [cb find_next] + ${NS}::button $w.bp -text [mc Prev] -command [cb find_prev] + ${NS}::checkbutton $w.cs -text [mc Case-Sensitive] \ -variable ${__this}::casesensitive -command [cb _incrsearch] pack $w.l -side left pack $w.cs -side right