Make every file within Dirs readable by group and others and ever sub-directory is made readable and executable
by Who (see Opts). All atomic entries in DirsAndOpts are taken to be directories to make (recursively) visible.
If no Dirs are found Dirs = ['.'].
Opts
who(Who=go)
else set to g for only enhancing group privilages
Only works on *nix. Dir can be a singleton list (this plays better with pack(upsh)
).
?- working_directory( pack(os_lib), _ ).
?- mkvis( '.' ).
?- mkvis( [] ).
% private test:
?- working_directory( '/home/nicos/web/sware/packs/bio_db_repo/', Old ).
?- mkvis( ['data-19.02.11',who(g)] ).
- author
- - nicos angelopoulos
- version
- - 0.1 2019/2/11
- - 0.1 2019/3/04, added Opt
who(Who)
- To be done
- - os/2 that incorporates os_file and os_dir.