(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10)
(FILECREATED "14-Sep-94 18:28:50" ("compiled on " {DSK}<lispcore>lispusers>SEDIT-MENU-ALWAYS.;1) 
"28-Jul-94 17:28:46" bcompl'd in "Medley 25-Aug-94 ..." dated "25-Aug-94 10:02:49")
(FILECREATED "10-Jan-89 08:03:31" {ERINYES}<LISPUSERS>MEDLEY>SEDIT-MENU-ALWAYS.;1 1349 previous date%:
 " 8-Sep-88 14:42:58" {DSK}<LISPFILES>MATT>SEDIT-MENU-ALWAYS.;4)
(PRETTYCOMPRINT SEDIT-MENU-ALWAYSCOMS)
(RPAQQ SEDIT-MENU-ALWAYSCOMS ((PROP (MAKEFILE-ENVIRONMENT FILETYPE) SEDIT-MENU-ALWAYS) (ADVISE 
SEDIT::SETUP-WINDOW-AND-PROCESS)))
(PUTPROPS SEDIT-MENU-ALWAYS MAKEFILE-ENVIRONMENT (:PACKAGE "INTERLISP" :READTABLE "INTERLISP" :BASE 10
))
(PUTPROPS SEDIT-MENU-ALWAYS FILETYPE :COMPILE-FILE)
(XCL:REINSTALL-ADVICE (QUOTE SEDIT::SETUP-WINDOW-AND-PROCESS) :AFTER (QUOTE ((:LAST (CL:WHEN (
GETTOPVAL SEditMenuAlwaysFlg) (CL:UNLESS (WINDOWPROP (fetch (SEDIT::EDIT-CONTEXT SEDIT::DISPLAY-WINDOW
) of CONTEXT) (QUOTE SEDIT::MENU)) (SEDIT::ADD-MENU CONTEXT)))))))
(READVISE SEDIT::SETUP-WINDOW-AND-PROCESS)
(PUTPROPS SEDIT-MENU-ALWAYS COPYRIGHT ("Beckman Instruments, Inc" 1988 1989))
NIL