Escape backslashes before all else
This commit is contained in:
parent
e8cbf937f6
commit
1635580c73
2
cpdf.ml
2
cpdf.ml
|
@ -1225,7 +1225,7 @@ let list_bookmarks encoding range pdf output =
|
||||||
and nl = int_of_char '\n'
|
and nl = int_of_char '\n'
|
||||||
and n = int_of_char 'n'
|
and n = int_of_char 'n'
|
||||||
and q = int_of_char '\"' in
|
and q = int_of_char '\"' in
|
||||||
replace bs bs bs (replace nl bs n (replace q bs q codepoints))
|
replace q bs q (replace nl bs n (replace bs bs bs codepoints))
|
||||||
in
|
in
|
||||||
match encoding with
|
match encoding with
|
||||||
| UTF8 -> Pdftext.utf8_of_codepoints escaped
|
| UTF8 -> Pdftext.utf8_of_codepoints escaped
|
||||||
|
|
Loading…
Reference in New Issue