20 lines
591 B
Plaintext
20 lines
591 B
Plaintext
# Quit - MPW Shell Quit File
|
|
#
|
|
# Copyright Apple Computer Inc. 1986-1988
|
|
# All Rights Reserved.
|
|
|
|
|
|
# Default tasks.
|
|
|
|
Save "{Worksheet}"
|
|
|
|
# Since Quit is distributed with MPW, you may want to have other
|
|
# "Quit" scripts that will not be overwritten with a new release.
|
|
# Other personalized quit scripts may be named Quit•≈ - such as
|
|
# "Quit•John" or "Quit•Tom" (• is option-8).
|
|
# These files should be located in the directory containing the MPW Shell.
|
|
|
|
For __Quit__i in `(Files "{ShellDirectory}"Quit•≈ || Set Status 0) ≥ dev:null`
|
|
Execute "{__Quit__i}"
|
|
End
|