Stringscan

Check-in [8f0d68e715]
Login

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

Overview
Comment:Minor tweaks
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256:8f0d68e71570b40eeff2fcc57bfff3d7487afd8fd5e7fb5b43d2c70ae828a244
User & Date: kevin 2020-07-23 01:54:08
Context
2020-07-23
13:13
Tweaks to search Leaf check-in: 88823a83f2 user: kevin tags: trunk
01:54
Minor tweaks check-in: 8f0d68e715 user: kevin tags: trunk
2020-05-19
19:31
Tweaks for Mac build check-in: ef03b64190 user: kevin tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to buildapp.

127
128
129
130
131
132
133
134
135
136
137


138
139
140
141
142
143
144
145
146
147
148
149
#copy the supporting libraries
for lib in maclibs/*
do
  echo "Copying $lib library..."
  cp -R -f $lib Stringscan.app/Contents/lib
done


#make website build and appstore build
echo "Making website build..."
ditto --rsrc  --arch x86_64 Stringscan.app build/Stringscan.app



find build/Stringscan.app -type f -name "*.bundle"  -exec codesign --verbose --signature-size 9400 -f -s "Developer ID Application: Kevin Walzer" {} \;
find build/Stringscan.app -type f -name "*.dylib"  -exec codesign --verbose --signature-size 9400 -f -s "Developer ID Application: Kevin Walzer" {} \; 

codesign  --verbose --signature-size 9400 -f -s "Developer ID Application: Kevin Walzer" build/Stringscan.app/Contents/Frameworks/Tk.framework/Versions/8.6/Resources/Wish.app/Contents/MacOS/Wish
codesign  --verbose --signature-size 9400 -f -s "Developer ID Application: Kevin Walzer" build/Stringscan.app/Contents/Frameworks/Tk.framework/Versions/Current
codesign --verbose --signature-size 9400 -f -s "Developer ID Application: Kevin Walzer" build/Stringscan.app/Contents/Frameworks/Tcl.framework/Versions/Current


#create tarball for update from website
echo "Compressing application..."








<



>
>




|







127
128
129
130
131
132
133

134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
#copy the supporting libraries
for lib in maclibs/*
do
  echo "Copying $lib library..."
  cp -R -f $lib Stringscan.app/Contents/lib
done


#make website build and appstore build
echo "Making website build..."
ditto --rsrc  --arch x86_64 Stringscan.app build/Stringscan.app

python3 -mmacholib standalone build/Stringscan.app

find build/Stringscan.app -type f -name "*.bundle"  -exec codesign --verbose --signature-size 9400 -f -s "Developer ID Application: Kevin Walzer" {} \;
find build/Stringscan.app -type f -name "*.dylib"  -exec codesign --verbose --signature-size 9400 -f -s "Developer ID Application: Kevin Walzer" {} \; 

codesign  --verbose --signature-size 9400 -f -s "Developer ID Application: Kevin Walzer" build/Stringscan.app/Contents/Frameworks/Tk.framework/Versions/8.6/Resources/Wish.app/Contents/MacOS/Wish  --entitlements entitlements.plist --options runtime 
codesign  --verbose --signature-size 9400 -f -s "Developer ID Application: Kevin Walzer" build/Stringscan.app/Contents/Frameworks/Tk.framework/Versions/Current
codesign --verbose --signature-size 9400 -f -s "Developer ID Application: Kevin Walzer" build/Stringscan.app/Contents/Frameworks/Tcl.framework/Versions/Current


#create tarball for update from website
echo "Compressing application..."

Changes to stringscan.rb.

1
2
3
4
5
6
7
8
9
...
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
...
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
...
410
411
412
413
414
415
416

417
418
419
# coding: utf-8
#Stringscan: grep-like tool, written in Ruby-Tk. (c) 2019 Kevin Walzer/WordTech Communications LLC. License: MIT license.
#encoding: UTF-8

require 'fileutils'
require 'tk'
#find additional Tcl libraries
Tk::AUTO_PATH.list <<= File.dirname(__FILE__)
require_relative 'tkballoonhelp'  
................................................................................
    Tk::TkDND::DND
    $root = TkRoot.new {
        title "Stringscan"
    }
    if $platform != 'aqua' 
        $root.iconphoto_default($winicon)
    end
        $root.withdraw
    #menu
    $menubar = TkMenu.new($root)
    TkOption.add '*tearOff', 0
    if $platform == 'aqua'
        $appmenu = TkSysMenu_Apple.new($menubar)
        $menubar.add :cascade, :menu => $appmenu
        $appmenu.add :command, :label => 'About Stringscan', :command=> proc{aboutWindow}
................................................................................
    $root.bind("#{$accelkey}-Q", proc{shutdown})
    $root.bind("#{$accelkey}-q", proc{shutdown})
    $root.bind("#{$accelkey}-O", proc{choosedir})
    $root.bind("#{$accelkey}-o", proc{choosedir})
    $root.bind("#{$accelkey}-R", proc{stringgrep})
    $root.bind("#{$accelkey}-r", proc{stringgrep})
    $root.update
    $root.deiconify
end

#select search directory
def choosedir
    $tbox.configure('state'=>'normal')
    $tbox.delete('1.0', 'end')
    $tbox.configure('state'=>'disabled')
................................................................................
#exit
def shutdown
  Tk.tk_call('regproc::makePitch')
end
#end of app class
end


#run app
app = StringscanApp.new
Tk.mainloop

|







 







<







 







<







 







>



1
2
3
4
5
6
7
8
9
...
194
195
196
197
198
199
200

201
202
203
204
205
206
207
...
340
341
342
343
344
345
346

347
348
349
350
351
352
353
...
408
409
410
411
412
413
414
415
416
417
418
# coding: utf-8
#Stringscan: grep-like tool, written in Ruby-Tk. (c) 2020 Kevin Walzer/WordTech Communications LLC. License: MIT license.
#encoding: UTF-8

require 'fileutils'
require 'tk'
#find additional Tcl libraries
Tk::AUTO_PATH.list <<= File.dirname(__FILE__)
require_relative 'tkballoonhelp'  
................................................................................
    Tk::TkDND::DND
    $root = TkRoot.new {
        title "Stringscan"
    }
    if $platform != 'aqua' 
        $root.iconphoto_default($winicon)
    end

    #menu
    $menubar = TkMenu.new($root)
    TkOption.add '*tearOff', 0
    if $platform == 'aqua'
        $appmenu = TkSysMenu_Apple.new($menubar)
        $menubar.add :cascade, :menu => $appmenu
        $appmenu.add :command, :label => 'About Stringscan', :command=> proc{aboutWindow}
................................................................................
    $root.bind("#{$accelkey}-Q", proc{shutdown})
    $root.bind("#{$accelkey}-q", proc{shutdown})
    $root.bind("#{$accelkey}-O", proc{choosedir})
    $root.bind("#{$accelkey}-o", proc{choosedir})
    $root.bind("#{$accelkey}-R", proc{stringgrep})
    $root.bind("#{$accelkey}-r", proc{stringgrep})
    $root.update

end

#select search directory
def choosedir
    $tbox.configure('state'=>'normal')
    $tbox.delete('1.0', 'end')
    $tbox.configure('state'=>'disabled')
................................................................................
#exit
def shutdown
  Tk.tk_call('regproc::makePitch')
end
#end of app class
end

puts "stargin up"
#run app
app = StringscanApp.new
Tk.mainloop