package Psh::Builtins::Exit;

=item * C<exit>

Exit out of the shell.

=cut

#
# TODO: What if a string is passed in?
#

sub bi_exit
{
	my $result = shift;
	$result = 0 unless defined($result) && $result;

	my $file= Psh::OS::catfile(Psh::OS::get_home_dir(),".${Psh::bin}_logout");
	if( -r $file) {
		process_file(abs_path($file));
	}

	Psh::OS::exit_psh($result);
}

1;