                        identity)
         raw-value ($x:text? xpath node)
         value (if raw-value
-                (transform-fn raw-value)
+                 (transform-fn raw-value)
                 default)]
     (if (nil? value)
       result


(defn- node->budget-item-period
  [node]
  (with-namespace-context namespace-map
    (node->model node budget-item-period-attributes)))

(defn- node->budget-item
  [node]


(defn- node->commodity
  [node]
  (let [commodity (node->model node commodity-attributes)]
    (when (not= :template (:exchange commodity))
      (-> commodity
          refine-commodity
          (with-meta {:record-type :commodity})))))

(defmethod process-node :gnc:commodity
  [node]
