(DEFINE-FILE-INFO PACKAGE "IL" READTABLE "INTERLISP" BASE 10) (FILECREATED "31-Jan-89 17:33:17" {QV}<NOTECARDS>1.3LNEXT>PATCHLOADER.;105 1914 changes to%: (VARS PATCHLOADERCOMS) previous date%: "25-Jan-89 10:46:11" {QV}<NOTECARDS>1.3LNEXT>PATCHLOADER.;104) (* " Copyright (c) 1987, 1988, 1989 by Xerox Corporation. All rights reserved. ") (PRETTYCOMPRINT PATCHLOADERCOMS) (RPAQQ PATCHLOADERCOMS ( (* ;;; "This file contains patch files to load on top of <notecards>1.3lnext>notecards.lcom in order to bring oneself up to date with the latest changes.") (FILES (FROM {QV}<NOTECARDS>1.3LNEXT>) (* ;; "jrc 12/30/88: Enforces browser link dashing/link type consistency for all browsers in a notefile. Lets users edit the assignment of link type to link dashing. Lets users copy these assignments from notefile to notefile.") JRCPATCH065 (* ;; "rar 1/25/89 NC.CheckFiling checks for the default filebox instead of just putting unfiled cards into the TBF FileBox") RARPATCH061 (* ;; "rar 1/31/89 Adds a WhenDeletedFn to Point image obj fns. Calls the DeletePointerFn Prop (if any) on the cardtype of the host card ") RARPATCH064) (PROP (FILETYPE MAKEFILE-ENVIRONMENT) PATCHLOADER))) (* ;;; "This file contains patch files to load on top of <notecards>1.3lnext>notecards.lcom in order to bring oneself up to date with the latest changes." ) (FILESLOAD (FROM {QV}<NOTECARDS>1.3LNEXT>) JRCPATCH065 RARPATCH061 RARPATCH064) (PUTPROPS PATCHLOADER FILETYPE :TCOMPL) (PUTPROPS PATCHLOADER MAKEFILE-ENVIRONMENT (:PACKAGE "IL" :READTABLE "INTERLISP" :BASE 10)) (PUTPROPS PATCHLOADER COPYRIGHT ("Xerox Corporation" 1987 1988 1989)) (DECLARE%: DONTCOPY (FILEMAP (NIL))) STOP