Stringscan

Check-in [8a6f14ff0c]
Login

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:8a6f14ff0c459258a885af10ea7dd4da3ecccab024a0321747b7c0aa35eec38f
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
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to stringscan.rb.

146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
...
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
            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
................................................................................
        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){







|







 







|







146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
...
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
            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
................................................................................
        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){