     (str (string/join "." numbers) ". ")))
 
 (defn heading
-  ([level title path]
-   (heading level title path []))
-  ([level title path numbers]
+  ([level path]
+   (heading level path []))
+  ([level path numbers]
    [:fo:block (style level
                      {:id (hash path)})
     (section-numbers numbers)
-    (layout/translations title)]))
+    (layout/translations (last path))]))
 
 (def ^:private running-header-class-name "running-header")
 

  (when (map? items)
    [:fo:block {:line-height "150%"
                :role "TOC"}
     (when heading? (heading :h1 :inhalt []))
     (map-indexed #(toc-entry (get items %2) (conj path %2) (if numbered? [(inc %1)] []) depth) (order (keys items)))]))

(defn- to-url

  ([items fmt genre level]
   (genre-sexp items fmt genre level []))
  ([items fmt genre level numbers]
   [(heading (level-to-h level) [fmt genre] numbers)
    (set-marker (layout/translations genre))
    (cond
      ;; handle the special case where the editorial or the recommendations are passed in the tree
