Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Tweak for scripting |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA3-256: |
8a6f14ff0c459258a885af10ea7dd4da |
| User & Date: | kevin 2020-05-08 20:03:11 |
Context
|
2020-05-09
| ||
| 12:36 | Refinement of scripting interface check-in: 8912fce095 user: kevin tags: trunk | |
|
2020-05-08
| ||
| 20:03 | Tweak for scripting check-in: 8a6f14ff0c user: kevin tags: trunk | |
| 13:51 | More tweaks check-in: 76d16191be user: kevin tags: trunk | |
Changes
Changes to stringscan.rb.
| ︙ | ︙ | |||
146 147 148 149 150 151 152 |
end
end
$grep_list = $lbox.get(0, 'end')
num = $grep_list.count.to_s
$bottomlabel.configure('text' => "Found #{num} matches for \"#{$searchterm}\" in #{$dirname}")
Tk.tk_call('notifywindow::notifywindow', "Found #{num} matches for \"#{$searchterm}\" in #{$dirname}", $notifyicon)
rescue
| | | 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 |
end
end
$grep_list = $lbox.get(0, 'end')
num = $grep_list.count.to_s
$bottomlabel.configure('text' => "Found #{num} matches for \"#{$searchterm}\" in #{$dirname}")
Tk.tk_call('notifywindow::notifywindow', "Found #{num} matches for \"#{$searchterm}\" in #{$dirname}", $notifyicon)
rescue
#{bgerror} "Unable to locate any file matching the search term."
end
def drawgui
begin
Tk.ip_eval("console hide")
rescue
nil
|
| ︙ | ︙ | |||
309 310 311 312 313 314 315 |
begin
if $lbox.curselection.empty?
bgerror "No selection in listbox."
else
highlighttext $lbox.get($lbox.curselection[0])
end
rescue
| | | 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 |
begin
if $lbox.curselection.empty?
bgerror "No selection in listbox."
else
highlighttext $lbox.get($lbox.curselection[0])
end
rescue
#{bgerror} "Cannot get selection in listbox."
end
}
$scrollframe = Tk::Frame.new($bottomleftframe).pack('side'=>'right','fill' => 'y', 'expand' => 'no')
$listscroll = Tk::Tile::Scrollbar.new($scrollframe).pack('side'=>'right','fill' => 'y', 'expand' => 'no')
$lbox.yscrollbar($listscroll)
$bottomrightframe =Tk::Tile::Frame.new($bottomframe)
$tbox = Tk::Text::new($bottomrightframe){
|
| ︙ | ︙ |