shithub: mc

ref: a9a7d5b32a9423f871311384af6260a3848291d1
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 */
	-> ""
}