From: Paul Mackerras Date: Wed, 4 Jul 2007 12:41:19 +0000 (+1000) Subject: gitk: Remove the unused stopfindproc function X-Git-Url: https://privyetmir.co.uk/gitweb.cgi?a=commitdiff_plain;h=d36d385efd89d79c9d1f95ab79849ff1478dc425;p=gitk gitk: Remove the unused stopfindproc function This was a hangover from before the "Files" and "Pickaxe" parts of the Find function were moved to the highlight facility in commit 60f7a7dc4904ba4baab44b70e2675a01e6172f54. It serves no useful purpose any more, so this removes it. Signed-off-by: Paul Mackerras --- diff --git a/gitk b/gitk index 767b0ed..45e16e4 100755 --- a/gitk +++ b/gitk @@ -1786,7 +1786,6 @@ proc showview {n} { } unselectline normalline - stopfindproc if {$curview >= 0} { set vparentlist($curview) $parentlist set vdisporder($curview) $displayorder @@ -3939,7 +3938,6 @@ proc findmatches {f} { proc dofind {{rev 0}} { global findstring findstartline findcurline selectedline numcommits - stopfindproc unmarkmatches cancel_next_highlight focus . @@ -4093,23 +4091,6 @@ proc findselectline {l} { } } -proc stopfindproc {{done 0}} { - global findprocpid findprocfile findids - global ctext findoldcursor phase maincursor textcursor - global findinprogress - - catch {unset findids} - if {[info exists findprocpid]} { - if {!$done} { - catch {exec kill $findprocpid} - } - catch {close $findprocfile} - unset findprocpid - } - catch {unset findinprogress} - notbusy find -} - # mark the bits of a headline or author that match a find string proc markmatches {canv l str tag matches font} { set bbox [$canv bbox $tag]