#	Suspend - MPW Shell Suspend File
#
#	Copyright Apple Computer, Inc. 1986-1989
#	All Rights Reserved.

			Begin
			
#	Save all variables, exports, aliases, and menus.

			  Set
			  Export
			  Alias
			  AddMenu
			
#	Save the current directory.

			  Quote Directory `Directory`

#	Save the windows.

			  Windows -o
			
#	Save projector state.

			  Echo Set Exit 0
			  mountProject
			  (checkoutdir -r -m || set status 0) ≥ dev:null
			  Echo "Project " "`Project -q`"		  
			  Echo Set Exit 1
			
#	Write it all to a temporary file.

			End > "{ShellDirectory}MPW.SuspendState"

#	User tasks.

			Save "{Worksheet}"
