DeriveImageFiles.patch

--- 1/ImageFileDir.Mod.txt
+++ 2/ImageFileDir.Mod.txt
@@ -1,5 +1,5 @@
-MODULE FileDir;   (*NW 12.1.86 / 23.8.90 / 15.8.2013*)
-  IMPORT SYSTEM, Kernel;
+MODULE ImageFileDir;   (*NW 12.1.86 / 23.8.90 / 15.8.2013*)
+  IMPORT SYSTEM, Kernel := ImageKernel;
 
   (*File Directory is a B-tree with its root page at DirRootAdr.
     Each entry contains a file name and the disk address of the file's head sector*)
@@ -349,4 +349,4 @@
   BEGIN k := 0; TraverseDir(A, k, DirRootAdr); MarkSectors(A, k)
   END Init; 
   
-END FileDir.
+END ImageFileDir.
--- 1/ImageFiles.Mod.txt
+++ 2/ImageFiles.Mod.txt
@@ -1,5 +1,5 @@
-MODULE Files;  (*NW 11.1.86 / 22.9.93 / 25.5.95 / 25.12.95 / 15.8.2013*)
-  IMPORT SYSTEM, Kernel, FileDir;
+MODULE ImageFiles;  (*NW 11.1.86 / 22.9.93 / 25.5.95 / 25.12.95 / 15.8.2013*)
+  IMPORT SYSTEM, Kernel := ImageKernel, FileDir := ImageFileDir;
 
   (*A file consists of a sequence of pages. The first page
     contains the header. Part of the header is the page table, an array
@@ -503,4 +503,4 @@
     END
   END RestoreList;
 
-END Files.
\ No newline
+END ImageFiles.
\ No newline