(FILECREATED "26-Feb-85 15:36:49" {PHYLUM}<NOTECARDS>RELEASE1.1>FLOPPIES>INIT.NOTECARDSUSER;2 2575   

      changes to:  (VARS INITCOMS)
		   (FNS NC.SetDirectories NC.UnsetDirectories)

      previous date: "15-Feb-85 17:26:44" {PHYLUM}<NOTECARDS>RELEASE1.1>FLOPPIES>INIT.NOTECARDSUSER;1
)


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

(PRETTYCOMPRINT INITCOMS)

(RPAQQ INITCOMS ((VARS (FIRSTNAME (QUOTE NoteCardsUser))
		       (DEFAULTINITIALS (QUOTE NoteCardsUser:))
		       (#RPARS)
		       (CHANGECHAR)
		       (SYSOUTGAG T)
		       (PROMPT#FLG T)
		       (CUTEFLG)
		       (CLEANUPOPTIONS (QUOTE (RC ST)))
		       (CLISPIFTRANFLG)
		       (CLISPIFYENGLSHFLG)
		       (CLREMPARSFLG)
		       (CLISPIFYPRETTYFLG)
		       (DWIMIFYCOMPFLG T)
		       (CHANGECHAR)
		       (CHANGESARRAY)
		       (TEditBluePendingDelete T)
		       (DEditLinger)
		       (LAFITEFLUSHMAILFLG T)
		       (CLOSEBREAKWINDOWFLG (QUOTE ALL))
		       (AUTOBACKTRACEFLG T)
		       (CLOSECHATWINDOWFLG T)
		       (LOGINHOST/DIR (QUOTE {DSK}))
		       (WINDOWTITLESHADE GRAYSHADE))
		 (P (INTERRUPTCHAR 3 NIL)
		    (DSPFONT (FONTCREATE (QUOTE HELVETICA)
					 14
					 (QUOTE BOLD))
			     WindowTitleDisplayStream)
		    (SETINITIALS))
		 (P (RAISE NIL)
		    (GCGAG 500)
		    (CHANGESLICE 100))
		 (FILES (FROM {ERIS}<LISP>HARMONY>LIBRARY>)
			FILEBROWSER BITMAPFNS BROWSER (FROM {ERIS}<LISPUSERS>)
			CROCK EXEC)))

(RPAQQ FIRSTNAME NoteCardsUser)

(RPAQQ DEFAULTINITIALS NoteCardsUser:)

(RPAQQ #RPARS NIL)

(RPAQQ CHANGECHAR NIL)

(RPAQQ SYSOUTGAG T)

(RPAQQ PROMPT#FLG T)

(RPAQQ CUTEFLG NIL)

(RPAQQ CLEANUPOPTIONS (RC ST))

(RPAQQ CLISPIFTRANFLG NIL)

(RPAQQ CLISPIFYENGLSHFLG NIL)

(RPAQQ CLREMPARSFLG NIL)

(RPAQQ CLISPIFYPRETTYFLG NIL)

(RPAQQ DWIMIFYCOMPFLG T)

(RPAQQ CHANGECHAR NIL)

(RPAQQ CHANGESARRAY NIL)

(RPAQQ TEditBluePendingDelete T)

(RPAQQ DEditLinger NIL)

(RPAQQ LAFITEFLUSHMAILFLG T)

(RPAQQ CLOSEBREAKWINDOWFLG ALL)

(RPAQQ AUTOBACKTRACEFLG T)

(RPAQQ CLOSECHATWINDOWFLG T)

(RPAQQ LOGINHOST/DIR {DSK})

(RPAQ WINDOWTITLESHADE GRAYSHADE)
(INTERRUPTCHAR 3 NIL)
(DSPFONT (FONTCREATE (QUOTE HELVETICA)
		     14
		     (QUOTE BOLD))
	 WindowTitleDisplayStream)
(SETINITIALS)
(RAISE NIL)
(GCGAG 500)
(CHANGESLICE 100)
(FILESLOAD (FROM {ERIS}<LISP>HARMONY>LIBRARY>)
	   FILEBROWSER BITMAPFNS BROWSER (FROM {ERIS}<LISPUSERS>)
	   CROCK EXEC)
(PUTPROPS INIT.NOTECARDSUSER COPYRIGHT ("Xerox Corporation" 1985))
(DECLARE: DONTCOPY
  (FILEMAP (NIL)))
STOP