[cl-pdf-devel] Re: [cl-typesetting-devel] cl-pdf repository update

[Dmitri Ivanov]

Hello Marc,

For the with-document macro (see pdf.lisp), &allow-other-keys seems to be missing:

(defmacro with-document ((&rest args &key (max-number-of-pages
'*max-number-of-pages*)
                                     &allow-other-keys)
    &body body)

  `(let* ((*document* (make-instance 'document , at args))
   (*outlines-stack* (list (outline-root *document*)))
   (*root-page* (root-page *document*))
   (*page* nil)
   (*page-number* 0)
   (*max-number-of-pages* ,max-number-of-pages))
    (catch 'max-number-of-pages-reached
      , at body)))
--
Sincerely,
Dmitri Ivanov
lisp.ystok.ru