fenix/cpdf-source
1
0
Fork 0
mirror of https://github.com/johnwhitington/cpdf-source.git synced 2025-04-17 11:37:33 +02:00
Code Issues Packages Projects Releases Wiki Activity

Fix double document

Browse Source
This commit is contained in:
John Whitington 2024-09-18 15:15:07 +01:00
parent cc01c8ddc1
commit e3f9631656
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
cpdfdraw.ml
View File

@ -425,8 +425,8 @@ let rec ops_of_drawop struct_tree dryrun pdf endpage filename bates batespad num
if not dryrun then structdata := StDataMCID (s, m, None)::!structdata;
[Pdfops.Op_BDC (s, Pdf.Dictionary ["/MCID", Pdf.Integer m])]
| EndTag -> [Pdfops.Op_EMC]
| STag s -> structdata =| StDataBeginTree s; []
| EndSTag -> structdata =| StDataEndTree; []
| STag s -> if not dryrun then structdata =| StDataBeginTree s; []
| EndSTag -> if not dryrun then structdata =| StDataEndTree; []
| BeginArtifact -> [Pdfops.Op_BMC "/BeginArtifact"]
| EndArtifact -> [Pdfops.Op_BMC "/EndArtifact"]