Those who use ooRexx5 from Sourceforge on a Mac and who have followed the 
instructions will have
ooRexx in "/Applications/ooRexx5".

The enclosed Rexx script will create the link and remove commands that will 
make ooRexx5 available
systemwide. Run it and copy & paste the output to create the links or remove 
them.

If you have ooRexx5 installed somewhere else, adjust the script accordingly.

---rony


#!/usr/bin/env rexx
-- rgf, 2021-07-15: link/remove '/Applications/ooRexx5' to/from /usr/local/{bin|lib}
ooRexxDir="/Applications/ooRexx5/"
targetDir   ="/usr/local/"

say "# remove quarantine attribute from directory and its content, if necessary:"
say "sudo xattr -r -d com.apple.quarantine /Applications/ooRexx5"
say

do dir over "bin", "lib"
   srcDir=ooRexxDir || dir
   tgtDir=targetDir || dir
   say "# linking files from:" srcDir "to:" tgtDir
   call sysFileTree srcDir"/*", "files.", "FO"
   w=0 -- determine longest string
   do i=1 to files.0
       w=max(w,length(files.i))
   end
   do i=1 to files.0
      fn=filespec("name",files.i)
      if fn~startsWith("callrexx") | fn~startsWith("libwpipe") then iterate
      say "sudo ln -sfv" (files.i)~left(w) tgtDir"/"fn
   end
   say
end

say
say "# remove files"
do dir over "bin", "lib"
   srcDir=ooRexxDir || dir
   tgtDir=targetDir || dir
   say "# remove files from:" tgtDir
   call sysFileTree srcDir"/*", "files.", "FO"
   w=0 -- determine longest string
   do i=1 to files.0
       w=max(w,length(files.i))
   end
   do i=1 to files.0
      fn=filespec("name",files.i)
      if fn~startsWith("callrexx") | fn~startsWith("libwpipe") then iterate
      say "sudo rm -f" tgtDir"/"fn
   end
   say
end






_______________________________________________
Oorexx-devel mailing list
Oorexx-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/oorexx-devel

Reply via email to