fenix
/
cpdf-source
mirror of https://github.com/johnwhitington/cpdf-source.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

First empty file valid under all verfiers

This commit is contained in:
John Whitington 2024-09-04 17:14:57 +01:00
parent f8233c6a62
commit f37b47ea77
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
cpdfmetadata.ml
View File

@ -50,7 +50,11 @@ let xmp_template =
<rdf:Description about='' <rdf:Description about=''
xmlns='http://purl.org/dc/elements/1.1/' xmlns='http://purl.org/dc/elements/1.1/'
xmlns:dc='http://purl.org/dc/elements/1.1/'> xmlns:dc='http://purl.org/dc/elements/1.1/'>
<dc:title>TITLE</dc:title> <dc:title>
<rdf:Alt>
<rdf:li xml:lang='x-default'>TITLE</rdf:li>
</rdf:Alt>
</dc:title>
</rdf:Description> </rdf:Description>
</rdf:RDF> </rdf:RDF>
@ -327,7 +331,7 @@ let xmltree_of_bytes b =
let bytes_of_xmltree t = let bytes_of_xmltree t =
let buf = Buffer.create 1024 in let buf = Buffer.create 1024 in
let o = Cpdfxmlm.make_output ~indent:(Some 2) (`Buffer buf) in let o = Cpdfxmlm.make_output ~indent:None (`Buffer buf) in
let frag = function let frag = function
E (tag, childs) -> `El (tag, childs) E (tag, childs) -> `El (tag, childs)
| D d -> `Data d | D d -> `Data d