Add file checking in figure_content
ci/woodpecker/push/build Pipeline was successful
Details
ci/woodpecker/push/build Pipeline was successful
Details
This commit is contained in:
parent
7f7780f8fd
commit
5a7cbf2da5
|
@ -376,7 +376,9 @@ fun fig_content_antiquotation name scan =
|
||||||
|
|
||||||
|
|
||||||
fun figure_content ctxt (cfg_trans,file:Input.source) =
|
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]
|
val args = ["keepaspectratio","width=" ^ wdth_val_s, ht_s]
|
||||||
|> commas
|
|> commas
|
||||||
|> enclose "[" "]"
|
|> enclose "[" "]"
|
||||||
|
|
Loading…
Reference in New Issue