supermario/bin/MPW-3.2.3/Suspend
2019-06-29 22:17:03 +08:00

38 lines
626 B
Plaintext

# 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}"