Skip to content
Snippets Groups Projects
Commit 35720c3a authored by Taddeüs Kroes's avatar Taddeüs Kroes
Browse files

Minifier now checks oif input files exist

parent 52cdbb3c
No related branches found
No related tags found
No related merge requests found
......@@ -104,6 +104,8 @@ let parse_files = function
let rec loop = function
| [] -> []
| filename :: tl ->
if not (Sys.file_exists filename) then
raise (Failure ("file " ^ filename ^ " does not exist"));
let input = Util.input_all (open_in filename) in
let stylesheet = Parse.parse_input filename input in
(input, stylesheet) :: loop tl
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment