Cosmetics
This commit is contained in:
parent
6bca2f179a
commit
3dbbc2e098
1 changed files with 1 additions and 2 deletions
|
@ -482,9 +482,8 @@ let rowyh (c, coverA, coverB) b n =
|
||||||
let page_of_y y =
|
let page_of_y y =
|
||||||
let ((c, coverA, coverB) as cl), b =
|
let ((c, coverA, coverB) as cl), b =
|
||||||
match conf.columns with
|
match conf.columns with
|
||||||
| Csingle b -> (1, 0, 0), b
|
| Csplit (_, b) | Csingle b -> (1, 0, 0), b
|
||||||
| Cmulti (c, b) -> c, b
|
| Cmulti (c, b) -> c, b
|
||||||
| Csplit (_, b) -> (1, 0, 0), b
|
|
||||||
in
|
in
|
||||||
if Array.length b = 0
|
if Array.length b = 0
|
||||||
then -1
|
then -1
|
||||||
|
|
Loading…
Reference in a new issue