        (mapcat #(format-sexp (get subitems %) % 1 path-to-numbers false) (keys subitems))])]])
 
 (defn- logo []
-  [:fo:block {:space-before "100mm" :text-align "right" :end-indent "20mm"}
+  [:fo:block {:space-before "100mm" :text-align "right"}
    [:fo:external-graphic
     {:src (io/resource "images/sbs_logo.jpg")
      :height "35mm"


(defn- cover-page [titles date]
  [:fo:block-container
   (map #(block (style :h1 {:break-before "auto" :space-after "5pt"}) %) titles)
   (block (style :h2 {:break-before "auto" :space-after "5pt"})
          (format "Gesamtkatalog, Stand 1.1.%s" (layout/year date)))


(defn- impressum []
  (let [creator "SBS Schweizerische Bibliothek für Blinde, Seh- und Lesebehinderte"]
    [:fo:block-container {:break-before "page"}
     (block {:space-after "175mm"} )
     (block "Herausgeber:")
     (block creator)
     (block "Grubenstrasse 12")
