   (let [data (subscribe [::subs/sorted-seatings id round])
         sort-key (subscribe [::subs/seatings-sort])]
     (fn seatings-render [id round]
-      [:table.seatings-table
-       [:thead
-        [:tr
-         [sortable-header {:class        :table
-                           :column       :table_number
-                           :sort-key     @sort-key
-                           :dispatch-key ::events/sort-seatings}
-          "Pöytä"]
-         [sortable-header {:class        :player
-                           :column       :name
-                           :sort-key     @sort-key
-                           :dispatch-key ::events/sort-seatings}
-          "Pelaaja"]]]
-       [:tbody
-        (for [seat @data]
-          ^{:key [(:name seat)]}
-          [seating-row seat])]])))
+      (when (seq @data)
+        [:table.seatings-table
+         [:thead
+          [:tr
+           [sortable-header {:class        :table
+                             :column       :table_number
+                             :sort-key     @sort-key
+                             :dispatch-key ::events/sort-seatings}
+            "Pöytä"]
+           [sortable-header {:class        :player
+                             :column       :name
+                             :sort-key     @sort-key
+                             :dispatch-key ::events/sort-seatings}
+            "Pelaaja"]]]
+         [:tbody
+          (for [seat @data]
+            ^{:key [(:name seat)]}
+            [seating-row seat])]]))))
 
 (defn bracket-match [match]
   [:div.bracket-match

  (let [data (subscribe [::subs/sorted-pods id round])
        sort-key (subscribe [::subs/pods-sort])]
    (fn pods-render [id round]
      [:table.pods-table
       [:thead
        [:tr
         [sortable-header {:class        :pod
                           :column       :pod
                           :sort-key     @sort-key
                           :dispatch-key ::events/sort-pods}
          "Pöytä"]
         [:th.seat "Paikka"]
         [sortable-header {:class        :player
                           :column       :team_name
                           :sort-key     @sort-key
                           :dispatch-key ::events/sort-pods}
          "Pelaaja"]]]
       [:tbody
        (for [seat @data]
          ^{:key [(:team_name seat)]}
          [pod-row seat])]])))

(defn seating-row [seat]
  [:tr

   [:td.pgw (percentage (:ogw standing))]])

(defn standing-table [data]
  (when (seq data)
    [:table.standings-table
     [:thead
      [:tr
       [:th.rank]
       [:th.players "Pelaaja"]
       [:th.points "Pist."]
       [:th.omw "OMW"]
       [:th.ogw "PGW"]
       [:th.pgw "OGW"]]]
     [:tbody
      (for [standing data]
        ^{:key (:team_name standing)}
        [standing-row standing])]]))

(defn standings [id round]
  (let [data (subscribe [::subs/standings id round])]
