unidoc: close the file when done with it

Signed-off-by: Jafar Al-Gharaibeh <[email protected]>

Author: Jafaral

Makefile

@@ -61,7 +61,6 @@ help:
 	@echo "        sh configure --build=x86_64-w64-mingw32"
 	@echo "        make"
 	@echo
-	@echo " The --help option of configure gives details of build options"
 
 ##################################################################
 #

uni/unidoc/UniFile.icn

@@ -304,12 +304,6 @@ class UniFile : Object (iKeySet, uKeySet, oldTokens, buffer, line, fName,
         return buffer := s
     end
 
-    # <p>
-    # Close this file.
-    # </p>
-    method close()
-        write("This method is no longer used")
-    end
 
     # <p>
     # Is a word a keyword?
@@ -341,18 +335,18 @@ class UniFile : Object (iKeySet, uKeySet, oldTokens, buffer, line, fName,
             }
     end 
 
-    method getFromFile(f)
+    method readFile(f)
         cBuf := CodeBuf()
         while line := read(f) do cBuf.add(line)
-        close(f)
     end
 
     # <b>Fails if cannot open <tt>fName</tt> for reading.</b>
     initially (fileName, path)
         /path := ""
         fName := delSuffix(fileName,".icn")||".icn"
         f := open(path||fName) | fail
-        getFromFile(f)
+        readFile(f)
+        close(f)
         clearBuffer()
         line := ""
         # the only keywords we care about, everything else is noise...