(FILECREATED " 6-OCT-83 00:22:20" <ALISP>INIT.SAMPLE;2
 1344   

      changes to:  (VARS INITCOMS)

      previous date: " 7-OCT-82 09:48:53" <ALISP>INIT.SAMPLE;1)


(PRETTYCOMPRINT INITCOMS)

(RPAQQ INITCOMS
 [(* This is a sample greeting file for a network site)
		 (P (* LOGIN for subsequent access to user's personal GREET file)
		    (LOGIN NIL (QUOTE QUIET)))
		 (VARS (DEFAULTPRINTINGHOST (QUOTE name-of-printer))
		       (LISPUSERSDIRECTORIES (QUOTE ({fileserver}<LISPUSERS>)))
		       (FONTDIRECTORIES (QUOTE ({fileserver}<FONTS>)))
		       [USERGREETFILES (QUOTE (({fileserver}< USER >LISP>INIT. COM]
		       (FONTWIDTHSFILES (QUOTE ({DSK}FONTS.WIDTHS {fileserver}<FONTS>FONTS.WIDTHS)))
		       (DIRECTORIES (QUOTE ({DSK} {fileserver}<LISPUSERS>])



(* This is a sample greeting file for a network site)


(* LOGIN for subsequent access to user's personal GREET file)
(LOGIN NIL (QUOTE QUIET))

(RPAQQ DEFAULTPRINTINGHOST
 name-of-printer)

(RPAQQ LISPUSERSDIRECTORIES
 ({fileserver}<LISPUSERS>))

(RPAQQ FONTDIRECTORIES
 ({fileserver}<FONTS>))

(RPAQQ USERGREETFILES
 (({fileserver}< USER >LISP>INIT. COM)))

(RPAQQ FONTWIDTHSFILES
 ({DSK}FONTS.WIDTHS {fileserver}<FONTS>FONTS.WIDTHS))

(RPAQQ DIRECTORIES
 ({DSK} {fileserver}<LISPUSERS>))
(DECLARE: DONTCOPY
  (FILEMAP (NIL)))
STOP