    {:p (:dato opts) :c saerskatt :h (get opts saerskatt) :fill saerskatt-fill}])
 
 (defn make-txt [{dato :dato year :year summ :sum}]
-  [:g {:transform (core/translate (xfn dato) (yfn summ))}
+  [:g {:transform (translate (xfn dato) (yfn summ))}
    [:circle {:r 2}]
    [:line {:stroke "black" :stroke-width 1 :fill "black" :y2 -8}]
    (opentype/text {:dy "-.71em" :text-anchor "middle" :text (str "(" year ")")})

               ]))

(def info-right
  [:g {:transform (core/translate (- svg-width marg) (:height (meta header)))}
   (opentype/text
     {:text        "Særskatt på utvinning av petroleum"
      :text-anchor "end"

            [clj-simple-chart.rect :as rect]
            [clj-simple-chart.point :as point]
            [clj-simple-chart.opentype :as opentype]
            [clj-simple-chart.translate :refer [translate]]
            [clojure.test :as test]
            [clojure.string :as string]))

