(FILECREATED "29-Sep-84 17:58:02" {ERIS}<LISP>HARMONY>BASICS>INIT.NONET;3 2380   

      changes to:  (VARS INITCOMS)

      previous date: "14-May-84 17:06:17" {ERIS}<LISP>HARMONY>BASICS>INIT.NONET;1)


(PRETTYCOMPRINT INITCOMS)

(RPAQQ INITCOMS [(* This greeting file is appropriate for machines with no network connections)
		 (VARS [USERGREETFILES (QUOTE (({DSK}INIT. USER)
					       ({DSK}INIT. COM)
					       ({DSK}INIT]
		       (DIRECTORIES (QUOTE ({DSK} {DSK1} {DSK2})))
		       (LISPUSERSDIRECTORIES (QUOTE ({DSK} {DSK1} {DSK2})))
		       (DEFAULTPRINTINGHOST NIL)
		       (DEFAULTPRINTERTYPE (QUOTE PRESS)))
		 (* font vars)
		 [VARS (DISPLAYFONTDIRECTORIES (QUOTE ({DSK} {DSK1} {DSK2})))
		       (DISPLAYFONTEXTENSIONS (QUOTE (DISPLAYFONT STRIKE AC)))
		       (INTERPRESSFONTDIRECTORIES (QUOTE ({DSK} {DSK1} {DSK2})))
		       (PRESSFONTWIDTHSFILES (QUOTE ({DSK}FONTS.WIDTHS {DSK1}FONTS.WIDTHS 
								       {DSK2}FONTS.WIDTHS]
		 (* Outdated font vars)
		 (VARS (FONTDIRECTORIES (QUOTE ({DSK} {DSK1} {DSK2})))
		       (NSFONTDIRECTORIES (QUOTE ({DSK} {DSK1} {DSK2})))
		       (NSFONTWIDTHSDIRECTORIES (QUOTE ({DSK} {DSK1} {DSK2})))
		       (STARFONTDIRECTORIES (QUOTE ({DSK} {DSK1} {DSK2})))
		       (FONTWIDTHSFILES (QUOTE ({DSK}FONTS.WIDTHS {DSK1}FONTS.WIDTHS 
								  {DSK2}FONTS.WIDTHS])



(* This greeting file is appropriate for machines with no network connections)


(RPAQQ USERGREETFILES (({DSK}INIT. USER)
		       ({DSK}INIT. COM)
		       ({DSK}INIT)))

(RPAQQ DIRECTORIES ({DSK} {DSK1} {DSK2}))

(RPAQQ LISPUSERSDIRECTORIES ({DSK} {DSK1} {DSK2}))

(RPAQQ DEFAULTPRINTINGHOST NIL)

(RPAQQ DEFAULTPRINTERTYPE PRESS)



(* font vars)


(RPAQQ DISPLAYFONTDIRECTORIES ({DSK} {DSK1} {DSK2}))

(RPAQQ DISPLAYFONTEXTENSIONS (DISPLAYFONT STRIKE AC))

(RPAQQ INTERPRESSFONTDIRECTORIES ({DSK} {DSK1} {DSK2}))

(RPAQQ PRESSFONTWIDTHSFILES ({DSK}FONTS.WIDTHS {DSK1}FONTS.WIDTHS {DSK2}FONTS.WIDTHS))



(* Outdated font vars)


(RPAQQ FONTDIRECTORIES ({DSK} {DSK1} {DSK2}))

(RPAQQ NSFONTDIRECTORIES ({DSK} {DSK1} {DSK2}))

(RPAQQ NSFONTWIDTHSDIRECTORIES ({DSK} {DSK1} {DSK2}))

(RPAQQ STARFONTDIRECTORIES ({DSK} {DSK1} {DSK2}))

(RPAQQ FONTWIDTHSFILES ({DSK}FONTS.WIDTHS {DSK1}FONTS.WIDTHS {DSK2}FONTS.WIDTHS))
(PUTPROPS INIT.NONET COPYRIGHT (NONE))
(DECLARE: DONTCOPY
  (FILEMAP (NIL)))
STOP