diff options
| -rw-r--r-- | search-plugin.tcl | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/search-plugin.tcl b/search-plugin.tcl index a97af0d..12f68e8 100644 --- a/search-plugin.tcl +++ b/search-plugin.tcl @@ -108,7 +108,6 @@ proc ::dialog_search::searchfile {searchtext file_contents widget filename based variable basedir_list set n 0 set searchtext [regsub -all { } $searchtext {.*}] - pdtk_post "Using $searchtext\n" if {[regexp -nocase -- "\[^a-zA-Z\]$searchtext" $filename]} { $widget insert end "$filename:" lappend basedir_list $basedir |