[cl-typesetting-devel] Multi-page example

Jonathon McKitrick jcm at FreeBSD-uk.eu.org
Tue Jan 16 16:27:55 UTC 2007


I'm working with the multi-page example, and I have some questions.

First, why does this code produce no output?

(defun test-multi-page ()
  (with-document ()
    (let* ((header (compile-text ()
		     (paragraph (:h-align :center :font *font* :font-size *font-size*)
		       "This is our header")
		     (hrule :dy 0.5)))
	   (footer (lambda (pdf:*page*)
		     (compile-text (:font *font* :font-size *font-size*)
		       (hrule :dy 0.5)
		       (hbox (:align :center :adjustable-p t)
			 :hfill
			 (verbatim
			  (format nil "Page ~D" pdf:*page-number*))))))
	   (content
	    (compile-text (:font *font* :font-size *font-size*)
	      (dotimes (i 40)
		(paragraph (:font *font* :font-size *font-size*)
		  "Here is some content"))
	      :eop)))
      (draw-pages content :margins '(72 72 72 72) :header header :footer footer)
      (pdf:write-document "web/data/test-report.pdf"))))

Also, some definitions:
Why exactly is an hbox?
What is the function of :eop and :break :after?
What is the difference between put-string and verbatim?
When does finalize-page need to be called?

Thanks in advance for your help.


Jonathon McKitrick
--
My other computer is your Windows box.



More information about the cl-typesetting-devel mailing list