CC: GPS Excavate launcher

-- This is a temporary program just to
-- simply being able to run the
-- gpsexcavate program made by Ikkalyzte
-- without a wireless modem

local programname = "gpsexcavate"

local old = {}

function replacement()
    --body
end

local key = next(rednet)
while key do
    local index = key
    key = next(rednet,key)
    old[index] = _G.rednet[index]
    _G.rednet[index] = replacement
end

pcall(shell.run,programname,...)

for index,func in pairs(old) do
    _G.rednet[index] = func
end