Add file checking in figure_content
ci/woodpecker/push/build Pipeline was successful Details

This commit is contained in:
Nicolas Méric 2023-06-20 11:05:11 +02:00
parent 7f7780f8fd
commit 5a7cbf2da5
1 changed files with 3 additions and 1 deletions

View File

@ -376,7 +376,9 @@ fun fig_content_antiquotation name scan =
fun figure_content ctxt (cfg_trans,file:Input.source) =
let val (wdth_val_s, ht_s, caption) = process_args cfg_trans
let val _ = Resources.check_file ctxt (SOME (get_document_dir ctxt)) file
(* ToDo: must be declared source of type png or jpeg or pdf, ... *)
val (wdth_val_s, ht_s, caption) = process_args cfg_trans
val args = ["keepaspectratio","width=" ^ wdth_val_s, ht_s]
|> commas
|> enclose "[" "]"