(FILECREATED "10-Sep-85 17:20:03" {QV}<NOTECARDS>RELEASE1.2I>INTERMEZZOSYSTEMPATCHES.;3
 842    

      changes to:  (VARS INTERMEZZOSYSTEMPATCHESCOMS)
		   (ADVICE CLEARW)

      previous date: " 5-Aug-85 17:24:03" {QV}<NOTECARDS>RELEASE1.2I>INTERMEZZOSYSTEMPATCHES.;2)


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

(PRETTYCOMPRINT INTERMEZZOSYSTEMPATCHESCOMS)

(RPAQQ INTERMEZZOSYSTEMPATCHESCOMS
 ((ADVISE (CLOSEF IN HARDCOPY.SOMEHOW))
				    (ADVISE CLEARW)))

(PUTPROPS CLOSEF-IN-HARDCOPY.SOMEHOW READVICE
 ((HARDCOPY.SOMEHOW . CLOSEF)
					       (BEFORE NIL (RETURN (CLOSEF? FILE)))))
(READVISE CLOSEF-IN-HARDCOPY.SOMEHOW)

(PUTPROPS CLEARW READVICE
 (NIL (BEFORE NIL (TOTOPW WINDOW))))
(READVISE CLEARW)
(PUTPROPS INTERMEZZOSYSTEMPATCHES COPYRIGHT ("Xerox Corporation" 1985))
(DECLARE: DONTCOPY
  (FILEMAP (NIL)))
STOP