shithub: mc

ref: fbafcadef80bcb3f2ecdd7c6162c2eea5b3ed8b4
dir: /lib/fileutil/homedir.myr/

View raw version 
use std

pkg fileutil =
	const homedir	: (-> byte[:])
;;

const homedir = {
	match std.getenv("HOME")
	| `std.Some h:	-> h
	| `std.None:	/* nothing */
	;;

	/* 9front uses $home */
	match std.getenv("home")
	| `std.Some h:	-> h
	| `std.None:	/* nothing */
	;;

	/* really, we should read from /etc/passwd or ldap/nss */
	-> ""
}