file/linex now only acceps a file, not a path name

src/boot/boot.janet

@@ -1749,18 +1749,13 @@
   (printf (dyn *pretty-format* "%q") x)
   (flush))
 
+
 (defn file/lines
-  "Return an iterator over the lines of a file"
-  [file-or-path &opt mode]
-  (default mode :r)
-  (if (bytes? file-or-path)
-    (coro
-      (with [f (file/open file-or-path mode)]
-        (while (def line (file/read f :line))
-          (yield line))))
-    (coro
-      (while (def line (file/read file-or-path :line))
-        (yield line)))))
+  "Return an iterator over the lines of a file."
+  [file]
+  (coro
+    (while (def line (file/read file :line))
+      (yield line))))
 
 ###
 ###

test/suite0009.janet

@@ -110,8 +110,9 @@
    (defer (:close outstream)
      (:write outstream buf1))
    (var buf2 "")
-   (each line (file/lines "unique.txt")
-      (set buf2 (string buf2 line)))
+   (with [f (file/open "unique.txt" :r)]
+     (each line (file/lines f)
+        (set buf2 (string buf2 line))))
    (assert (= buf1 buf2) "file/lines iterator")
    (os/rm "unique.txt"))