(FILECREATED "15-Mar-85 21:59:32" {ERIS}<LISP>INTERMEZZO>PATCHES>DFSPATCH.;1
 877    

      changes to:  (VARS DFSPATCHCOMS))


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

(PRETTYCOMPRINT DFSPATCHCOMS)

(RPAQQ DFSPATCHCOMS
 [(P (MOVD? (QUOTE CREATEDSKDIRECTORY)
			       (QUOTE DFSCREATEDIRECTORY))
			(MOVD? (QUOTE PURGEDSKDIRECTORY)
			       (QUOTE DFSPURGEDIRECTORY))
			(MOVD? (QUOTE DSKDISPLAY)
			       (QUOTE VOLUMEDISPLAY))
			(MOVD? (QUOTE SCAVENGEDSKDIRECTORY)
			       (QUOTE SCAVENGEVOLUME])
(MOVD? (QUOTE CREATEDSKDIRECTORY)
       (QUOTE DFSCREATEDIRECTORY))
(MOVD? (QUOTE PURGEDSKDIRECTORY)
       (QUOTE DFSPURGEDIRECTORY))
(MOVD? (QUOTE DSKDISPLAY)
       (QUOTE VOLUMEDISPLAY))
(MOVD? (QUOTE SCAVENGEDSKDIRECTORY)
       (QUOTE SCAVENGEVOLUME))
(PUTPROPS DFSPATCH COPYRIGHT ("Xerox Corporation" 1985))
(DECLARE: DONTCOPY
  (FILEMAP (NIL)))
STOP