-- This file: (find-angg "LUA/luarocks-extra.lua")
--    http://angg.twu.net/LUA/luarocks-extra.lua.html
--    http://angg.twu.net/LUA/luarocks-extra.lua
--
-- Add extra functions to luarocks.
-- This was mentioned in:
--    http://lua-users.org/lists/lua-l/2020-01/msg00154.html
--
-- Usage: in
--
--   (find-fline      "/usr/bin/luarocks")
--   (find-asrootfile "/usr/bin/luarocks")
--   (find-asrootfile "/usr/bin/" "luarocks")
--
-- add these lines
--
--   local myfile = os.getenv "LUAROCKS_DO"
--   if myfile and myfile ~= "" then dofile(myfile) end 
--
-- before the "command_line.run_command(...)".
--
-- By Eduardo Ochs, 2020jan19. Public domain.


print "HELLO"


--[[
-- (find-eepitch-intro "3. Test blocks")

* (eepitch-lua51)
* (eepitch-kill)
* (eepitch-lua51)
dofile "luarocks-extra.lua"

* (eepitch-shell)
* (eepitch-kill)
* (eepitch-shell)
export LUAROCKS_DO=$HOME/LUA/luarocks-extra.lua
luarocks list

--]]