fenix/cpdf-source
1
0
Fork 0
mirror of https://github.com/johnwhitington/cpdf-source.git synced 2025-02-17 12:20:43 +01:00
Code Issues Packages Projects Releases Wiki Activity

more

Browse Source
This commit is contained in:
John Whitington 2019-08-08 16:57:25 +01:00
parent 0c806b21cd
commit c0dbf6c079
4 changed files with 16 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
cpdf.ml
View File

@ -2656,7 +2656,8 @@ let set_mediabox xywhlist pdf range =
in in
process_pages crop_page pdf range process_pages crop_page pdf range
(*let setBox box minx maxx miny maxy pdf range = (* Just used by cpdflib for historical reasons *)
let setBox box minx maxx miny maxy pdf range =
let set_box_page _ page = let set_box_page _ page =
{page with {page with
Pdfpage.rest = Pdfpage.rest =
@ -2664,7 +2665,7 @@ let set_mediabox xywhlist pdf range =
page.Pdfpage.rest box page.Pdfpage.rest box
(Pdf.Array [Pdf.Real minx; Pdf.Real miny; Pdf.Real maxx; Pdf.Real maxy])} (Pdf.Array [Pdf.Real minx; Pdf.Real miny; Pdf.Real maxx; Pdf.Real maxy])}
in in
process_pages set_box_page pdf range*) process_pages set_box_page pdf range
(* \section{Cropping} *) (* \section{Cropping} *)
let crop_pdf ?(box="/CropBox") xywhlist pdf range = let crop_pdf ?(box="/CropBox") xywhlist pdf range =

4
cpdf.mli
View File

@ -304,8 +304,8 @@ val hard_box : Pdf.t -> int list -> string -> bool -> bool -> Pdf.t
(** [set_mediabox xywhlist pdf range] sets the media box on the given pages. *) (** [set_mediabox xywhlist pdf range] sets the media box on the given pages. *)
val set_mediabox : (float * float * float * float) list -> Pdf.t -> int list -> Pdf.t val set_mediabox : (float * float * float * float) list -> Pdf.t -> int list -> Pdf.t
(*(** [setBox boxname x y w h pdf range] sets the given box on the given pages. *) (** [setBox boxname x y w h pdf range] sets the given box on the given pages. *)
val setBox : string -> float -> float -> float -> float -> Pdf.t -> int list -> Pdf.t*) val setBox : string -> float -> float -> float -> float -> Pdf.t -> int list -> Pdf.t
(** Remove any cropping from the given pages. *) (** Remove any cropping from the given pages. *)
val remove_cropping_pdf : Pdf.t -> int list -> Pdf.t val remove_cropping_pdf : Pdf.t -> int list -> Pdf.t

BIN
cpdfmanual.pdf
View File

Binary file not shown.

12
cpdfmanual.tex
View File

@ -1130,7 +1130,7 @@ Squeezing page data
Recompressing document Recompressing document
\end{verbatim} \end{verbatim}
The \texttt{-squeeze-log-to <filename>} option writes the log to the given file instead of to standard output. \noindent The \texttt{-squeeze-log-to <filename>} option writes the log to the given file instead of to standard output.
\chapter{Bookmarks} \chapter{Bookmarks}
\begin{framed} \begin{framed}
@ -1829,6 +1829,7 @@ given page range.
\end{framed} \end{framed}
\section{Listing Fonts} \section{Listing Fonts}
\index{font!listing} \index{font!listing}
\label{listingfonts}
The \texttt{-list-fonts} operation prints the fonts in the document, The \texttt{-list-fonts} operation prints the fonts in the document,
one-per-line to standard output. For example: one-per-line to standard output. For example:
\begin{framed}\small\begin{verbatim}1 /F245 /Type0 /Cleargothic-Bold /Identity-H \begin{framed}\small\begin{verbatim}1 /F245 /Type0 /Cleargothic-Bold /Identity-H
@ -2218,6 +2219,10 @@ To remove a particular image, find its name using \texttt{-image-resolution} wit
\chapter{Fonts}\pagestyle{fancy} \chapter{Fonts}\pagestyle{fancy}
{\small \begin{framed} {\small \begin{framed}
\small\noindent\verb!cpdf -list-fonts in.pdf!
\vspace{1.5mm}
\noindent\verb!cpdf -copy-font fromfile.pdf -copy-font-page <int>!\\ \noindent\verb!cpdf -copy-font fromfile.pdf -copy-font-page <int>!\\
\noindent\verb! -copy-font-name <name> in.pdf [<range>] -o out.pdf! \noindent\verb! -copy-font-name <name> in.pdf [<range>] -o out.pdf!
@ -2230,6 +2235,11 @@ To remove a particular image, find its name using \texttt{-image-resolution} wit
\vspace{1.5mm} \vspace{1.5mm}
\noindent\verb!cpdf -embed-missing-fonts -gs <path to gs> in.pdf -o out.pdf! \noindent\verb!cpdf -embed-missing-fonts -gs <path to gs> in.pdf -o out.pdf!
\end{framed}} \end{framed}}
\section{Listing Fonts}
Described in Section \ref{listingfonts}.
\section{Copying Fonts} \section{Copying Fonts}
\label{copyfont} \label{copyfont}