 
 (defn- period-heading
   [budget index]
-  [:th (budget-period-start-date budget index)])
+  [:th.text-right (budget-period-start-date budget index)])
 
 (defn- budget-header-row
   [budget]

   (html
     [:th "Account"]
     (map #(period-heading budget %) (range 0 (:period-count budget)))
     [:th "Total"])])

(defn- budget-data-row
  [budget item]
  [:tr
   [:td (:account-id item)]])

(defn show
  "Renders the budet details"

      [:table.table.table-striped
       (html
       (budget-header-row budget)
       (map #(budget-item-row budget %) (:items budget)))]
      [:a.btn.btn-primary {:href (format "/budgets/%s/items/new" (:id budget))} "Add"]
      "&nbsp;"
      [:a.btn.btn-default {:href (format "/entities/%s/budgets" (:entity-id budget))} "Back"]]])))
