[cl-typesetting-devel] Need help with layout

Marc Battyani marc.battyani at fractalconcept.com
Sun Jan 22 01:58:47 UTC 2012


On 1/21/2012 10:03 AM, jcm at SDF.ORG wrote:
> Ah, I see, thanks.  Now, if I want to draw a horizontal line above the
> footer text, how do I need to adjust the margins and/or footer-bottom to
> make sure it is visible?

You can reserve some space at the top of the footer with #'vspace and
draw whatever you want there.
You can also put directly horizontal lines in the footer with hrule.

(footer
 (lambda (pdf:*page*)
   (compile-text (:font *font* :font-size 10)
     (hrule :dy 2)
     (vspace 4)
     (hrule :dy 1/2)
     (paragraph (:h-align :left :color '(1 0 0))
       "Company name")
     (paragraph (:h-align :center :color '(0 0 0))
       (verbatim (format nil "~D" pdf:*page-number*))))))

Marc

>
>>                 :header-top 6   ; <= *** with a margin of 36 and a
>> default space of 30 above/below the header/footer this leaves only 6 for
>> them which is way too small
>>                 :footer-bottom 6
>
>
>




More information about the cl-typesetting-devel mailing list