On 22.12.2022 12:51, Rony G. Flatscher wrote:
On 22.12.2022 12:38, Rick McGuire wrote:
I would suggest adding Erich's name to the list first. Seems like a notable
oversight.
Oops, you are right!
Any other names we should add (and if so to which books)?
O.K. wrote a little script (enclosed, needs to be run off the tools directory) to learn about those
authors of late who have committed something in the various books, here the output:
ooconsole........ miesfeld
oodguide......... miesfeld, osims, wdashley
oodialog......... erich_st, miesfeld, wdashley
oorexx........... erich_st, orange-e, orexx
oorexxbuild...... orexx, perolovjonsson, wdashley
oosqlite......... miesfeld, wdashley
ootest........... bigrixx, wdashley
orxncurses....... erich_st, wdashley
readme........... erich_st
rexxapi.......... erich_st, orexx
rexxextensions... erich_st
rexxgtk.......... erich_st, wdashley
rexxpg........... erich_st, orexx
rexxref.......... erich_st, orexx
rxftp............ erich_st
rxmath........... erich_st
rxsock........... erich_st, perolovjonsson
tools............ orange-e, orexx, perolovjonsson
unixextensions... erich_st
winextensions.... erich_st, orange-e, orexx, wdashley
Will check that these authors are part of the author group of the respective
books.
---rony
parse arg dir
dir=dir~strip
pkgLocal=.context~package~local
pkgLocal~dirSep=.rexxInfo~directorySeparator
tgtDir=dir || .dirSep
if \sysFileExists(dir) then
do
.error~say("directory" pp(dir) "does not exist, aborting ...")
exit -1
end
call sysFileTree tgtDir"*", "dirs.", "DO"
do i=1 to dirs.0
bookPath=dirs.i
book=FileSpec('name',dirs.i) -- get directory assume it is a book
authors=getAuthors(bookPath,book)
say (book~left(17,'.')) authors
end
::requires "svnListRevisions.rex" -- get revision utility
::routine pp
return "["arg(1)"]"
::routine getAuthors
use arg bookPath, book
-- look into the files in "en-US", ignore ${book}.ent file
tgtDir=bookPath || .dirSep || "en-US"
if \sysFileExists(tgtDir) then tgtDir=bookPath -- e.g. the tools subdirectory has no "en-US" directory
ignoreFiles=book".ent" -- add additional file names, if sensible
setAuthors=.set~new
arr=getRevisionInfos(tgtDir)
do revItem over arr
if wordPos(revItem~name,ignoreFiles)>0 then iterate
setAuthors~put(revItem~author)
end
return setAuthors~allIndexes~sort~toString(,", ")
_______________________________________________
Oorexx-devel mailing list
Oorexx-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/oorexx-devel
