Hilbish/nature/commands/cd.lua

local bait = require 'bait'
local commander = require 'commander'
local fs = require 'fs'
local dirs = require 'nature.dirs'

dirs.old = hilbish.cwd()
commander.register('cd', function (args, sinks)
	if #args > 1 then
		sinks.out:writeln("cd: too many arguments")
		return 1
	end

	local path = args[1] and args[1] or hilbish.home
	if path == '-' then
		path = dirs.old
		sinks.out:writeln(path)
	end

	dirs.setOld(hilbish.cwd())
	dirs.push(path)

	local ok, err = pcall(function() fs.cd(fs.abs(path)) end)
	if not ok then
		sinks.out:writeln(err)
		return 1
	end
	bait.throw('cd', path)
end)