Stringscan

Check-in [76d16191be]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:More tweaks
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256:76d16191bee674f1ec934886504768542490fde481334cab98b4531846c473cd
User & Date: kevin 2020-05-08 13:51:55
Context
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
13:44
More refinements for 2.0 check-in: 5d9fdc49ca user: kevin tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to stringscan.rb.

99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
			})
				
        if $platform == 'aqua'
	  Tk.ip_eval("proc ::tk::mac::OpenDocument {args} {#{set_dir} $args}")
          Tk.ip_eval("proc ::tk::mac::Quit {} {proc {shutdown}}")
		end
		Tk.ip_eval("proc set_search_term {args} {#{set_search_term} $args}")
		Tk.ip_eval("proc set_search_dir {args} {#{set_dir} $args}")
        Tk.ip_eval("proc execute_search {}  {#{execute_search}}")
      
        drawgui  
    end
    
    #core method; here we search for a string in text files within a directory and  display a list of matching files in the listbox 
    def stringgrep







|







99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
			})
				
        if $platform == 'aqua'
	  Tk.ip_eval("proc ::tk::mac::OpenDocument {args} {#{set_dir} $args}")
          Tk.ip_eval("proc ::tk::mac::Quit {} {proc {shutdown}}")
		end
		Tk.ip_eval("proc set_search_term {args} {#{set_search_term} $args}")
		Tk.ip_eval("proc set_search_folder {args} {#{set_dir} $args}")
        Tk.ip_eval("proc execute_search {}  {#{execute_search}}")
      
        drawgui  
    end
    
    #core method; here we search for a string in text files within a directory and  display a list of matching files in the listbox 
    def stringgrep