(FILECREATED "19-Mar-85 16:44:56" {ERIS}<LISP>INTERMEZZO>DOC>INIT.;1
 3792   

      changes to:  (VARS INITCOMS)

      previous date: "12-Mar-85 10:06:17" {ERIS}<RHOADES>LISP>INIT.;17)


(* Copyright (c) 1985 by Xerox Corporation. All rights reserved.)

(PRETTYCOMPRINT INITCOMS)

(RPAQQ INITCOMS
 [(VARS (**COMMENT**FLG " (* --) ")
		       (CLISPIFTRANFLG T)
		       (DEFAULTCOPYRIGHTOWNER (QUOTE XEROX))
		       (FIRSTNAME (QUOTE Gary))
		       (DIRECTORIES (QUOTE (NIL {ERIS}<LISP>INTERMEZZO>SOURCES> 
						{ERIS}<LISP>INTERMEZZO>BASICS> 
						{ERIS}<LISP>INTERMEZZO>LIBRARY> 
						{ERIS}<LISP>INTERMEZZO>LISPUSERS> {ERIS}<LISPUSERS> 
						{ERIS}<LISPMANUAL>)))
		       (LISPUSERSDIRECTORIES (QUOTE ({ERIS}<LISP>INTERMEZZO>LIBRARY> 
								{ERIS}<LISP>INTERMEZZO>LISPUSERS> 
										{ERIS}<LISPUSERS>)))
		       (LOGINHOST/DIR (QUOTE {ERIS}<RHOADES>LISP>))
		       (PROMPT#FLG T)
		       [EDITCHARACTERS (QUOTE (J (H G)
						 Z Y N (O NIL]
		       (COPYRIGHTFLG (QUOTE YES))
		       (FIRSTCOL 35)
		       (CLISPIFYPRETTYFLG)
		       (DWIMIFYCOMPFLG))
		 (VARS LAFITEBROWSERREGION (LAFITEDEFAULTHOST&DIR (QUOTE {ERIS}<RHOADES>MAIL>))
		       LAFITEEDITORREGION LAFITEFLUSHMAILFLG LAFITESTATUSWINDOWPOSITION 
		       LAFITEDISPLAYDELETEDMESSAGEFLG LAFITENEWPAGEFLG LAFITEDISPLAYREGION
		       (DEFAULTMAILFOLDERNAME (QUOTE ACTIVE.MAIL)))
		 (ADDVARS (INITIALSLST (RHOADES . grr))
			  (GREETDATES ("20-JUN" . "Happy birthday, again")))
		 (PROP FILEDEF CHECKSET MAKEINIT DORENAME)
		 (FILES SPACEWINDOW.DCOM LAFITEFIND CROCK.DCOM AREDIT.DCOM LAFITE.DCOM 
			MAILCLIENT.DCOM NSMAIL.DCOM MANAGER.DCOM MANAGERPATCH.DCOM)
		 (P (CHANGESLICE 100)
		    (CROCK (CREATEREGION 0 725 85 85))
		    (SPACEWINDOW)
		    (LAFITE (QUOTE ON)))
		 (USERMACROS GETDL FV LOCAL)
		 (ADVISE DEFAULTMAKENEWCOM)
		 (DECLARE: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA)
										       (NLAML)
										       (LAMA])

(RPAQ **COMMENT**FLG
 " (* --) ")

(RPAQQ CLISPIFTRANFLG
 T)

(RPAQQ DEFAULTCOPYRIGHTOWNER
 XEROX)

(RPAQQ FIRSTNAME
 Gary)

(RPAQQ DIRECTORIES
 (NIL {ERIS}<LISP>INTERMEZZO>SOURCES> {ERIS}<LISP>INTERMEZZO>BASICS> 
			{ERIS}<LISP>INTERMEZZO>LIBRARY> {ERIS}<LISP>INTERMEZZO>LISPUSERS> 
			{ERIS}<LISPUSERS> {ERIS}<LISPMANUAL>))

(RPAQQ LISPUSERSDIRECTORIES
 ({ERIS}<LISP>INTERMEZZO>LIBRARY> {ERIS}<LISP>INTERMEZZO>LISPUSERS> 
							     {ERIS}<LISPUSERS>))

(RPAQQ LOGINHOST/DIR
 {ERIS}<RHOADES>LISP>)

(RPAQQ PROMPT#FLG
 T)

(RPAQQ EDITCHARACTERS
 (J (H G)
			 Z Y N (O NIL)))

(RPAQQ COPYRIGHTFLG
 YES)

(RPAQQ FIRSTCOL
 35)

(RPAQQ CLISPIFYPRETTYFLG
 NIL)

(RPAQQ DWIMIFYCOMPFLG
 NIL)

(RPAQQ LAFITEBROWSERREGION
 (31 10 575 210))

(RPAQQ LAFITEDEFAULTHOST&DIR
 {ERIS}<RHOADES>MAIL>)

(RPAQQ LAFITEEDITORREGION
 (540 10 470 470))

(RPAQQ LAFITEFLUSHMAILFLG
 T)

(RPAQQ LAFITESTATUSWINDOWPOSITION
 (795 . 749))

(RPAQQ LAFITEDISPLAYDELETEDMESSAGEFLG
 T)

(RPAQQ LAFITENEWPAGEFLG
 NIL)

(RPAQQ LAFITEDISPLAYREGION
 (60 230 600 335))

(RPAQQ DEFAULTMAILFOLDERNAME
 ACTIVE.MAIL)

(ADDTOVAR INITIALSLST
 (RHOADES . grr))

(ADDTOVAR GREETDATES
 ("20-JUN" . "Happy birthday, again"))

(PUTPROPS CHECKSET FILEDEF
 CSET)

(PUTPROPS MAKEINIT FILEDEF
 MAKEINIT)

(PUTPROPS DORENAME FILEDEF
 RENAMEFNS)
(FILESLOAD SPACEWINDOW.DCOM LAFITEFIND CROCK.DCOM AREDIT.DCOM LAFITE.DCOM MAILCLIENT.DCOM NSMAIL.DCOM 
	   MANAGER.DCOM MANAGERPATCH.DCOM)
(CHANGESLICE 100)
(CROCK (CREATEREGION 0 725 85 85))
(SPACEWINDOW)
(LAFITE (QUOTE ON))
(READVISE DEFAULTMAKENEWCOM)
(DECLARE: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS 

(ADDTOVAR NLAMA
 )

(ADDTOVAR NLAML
 )

(ADDTOVAR LAMA
 )
)
(PUTPROPS INIT COPYRIGHT ("Xerox Corporation" 1985))
(DECLARE: DONTCOPY
  (FILEMAP (NIL)))
STOP