# /dis/sh script# wm defines "menu" and "delmenu" builtinsload stdprompt='% ' ''fn % {$*}autoload=stdhome=/usr/^"{cat /dev/user} if {! {~ wm ${loaded}}} {	echo wmsetup must run under wm >[1=2]	raise usage} fn wmrun {	args := $*	{		pctl newpgrp		fn wmrun		$args	} > /chan/wmstdout >[2] /chan/wmstderr &} fn cd {	builtin cd $*;	rescue 'bad redir' {} {		echo cwd `{pwd} > /chan/shctl	} >[2] /dev/null}autoload=std sexprsrun /lib/sh/schedbind -a /grid/scripts/Inferno /disif{! ftest -f /net/cs}{	ndb/cs}mount -a {mntgen} /n plumber >/chan/wmstdout >[2=1]menu Shell			{wmrun wm/sh}menu Acme			{wmrun acme}menu Charon			{wmrun charon}menu Manual			{wmrun wm/man}menu Files			{if {ftest -d $home} {wmrun wm/ftree $home} {wmrun wm/ftree /}}menu ''	''menu Grid			'Node monitor' {wmrun nodemonitor}menu Grid			'Job monitor' {wmrun jobmonitor}menu System			'Debugger'		{wmrun wm/deb}menu System			'Task manager'		{wmrun wm/task}menu System			'Memory monitor'	{wmrun wm/memory}menu System			'About'			{wmrun wm/about}menu Games			'Tetris'			{wmrun wm/tetris}menu Games			'Bounce'			{wmrun wm/bounce} # anything elseif {ftest -f $home/lib/wmsetup} {run $home/lib/wmsetup} {}