Hello Andrey,

| Here is my patch:
|...snip...|

|  for line-count from 0 while (if max-height (> max-height (* -1 dy
line-count)) t)

I cannot vote as I use rather different versions of these functions in
practice. But I would

1) default max-height, e.g.
  &optional ...  (max-height max-positive-fixnum)

2) replace the above line by something like the below
   for height upfrom 0 below max-height by dy

(Not tested.)
--
Sincerely,
Dmitriy Ivanov
lisp.ystok.ru


_______________________________________________
cl-pdf-devel site list
cl-pdf-devel@common-lisp.net
http://common-lisp.net/mailman/listinfo/cl-pdf-devel

Reply via email to