mirror of
				https://github.com/johnwhitington/cpdf-source.git
				synced 2025-06-05 22:09:39 +02:00 
			
		
		
		
	Fixes -shift to do annotations properly
This commit is contained in:
		
							
								
								
									
										2
									
								
								cpdf.ml
									
									
									
									
									
								
							
							
						
						
									
										2
									
								
								cpdf.ml
									
									
									
									
									
								
							@@ -2318,7 +2318,7 @@ let shift_page ?(fast=false) dxdylist pdf pnum page =
 | 
			
		||||
      let page =
 | 
			
		||||
        change_pattern_matrices_page pdf (Pdftransform.mktranslate ~-.dx ~-.dy) page
 | 
			
		||||
      in
 | 
			
		||||
        transform_annotations pdf (Pdftransform.mktranslate ~-.dx ~-.dy) page.Pdfpage.rest;
 | 
			
		||||
        transform_annotations pdf (Pdftransform.mktranslate dx dy) page.Pdfpage.rest;
 | 
			
		||||
        Pdfpage.prepend_operators pdf [transform_op] ~fast page
 | 
			
		||||
 | 
			
		||||
let shift_pdf ?(fast=false) dxdylist pdf range =
 | 
			
		||||
 
 | 
			
		||||
		Reference in New Issue
	
	Block a user