No longer set producer field

This commit is contained in:
John Whitington 2024-08-22 09:43:33 +01:00
parent be63d2b73b
commit a17bd08e4f
2 changed files with 6 additions and 4 deletions

View File

@ -1,3 +1,9 @@
2.7.2 (future)
Fixes:
o Removed setting of Producer field in AGPL version
2.7.1 (July 2024) 2.7.1 (July 2024)
New features: New features:

View File

@ -3087,10 +3087,6 @@ let set_creator s pdf =
let really_write_pdf ?(encryption = None) ?(is_decompress=false) mk_id pdf outname = let really_write_pdf ?(encryption = None) ?(is_decompress=false) mk_id pdf outname =
if args.producer <> None then set_producer (unopt args.producer) pdf; if args.producer <> None then set_producer (unopt args.producer) pdf;
if agpl &&
(match args.op with Some (SetProducer _) -> false | _ -> match args.producer with None -> true | _ -> false)
then
set_producer "cpdf AGPL" pdf;
if args.creator <> None then set_creator (unopt args.creator) pdf; if args.creator <> None then set_creator (unopt args.creator) pdf;
if args.debugcrypt then Printf.printf "really_write_pdf\n"; if args.debugcrypt then Printf.printf "really_write_pdf\n";
let will_linearize = let will_linearize =