          [:section {:style {:padding-left "10px"}}
           [:h1 "Users"]
 
-           [:p "There are currently " [:b num-active-users] " active users out of " [:b num-licensed-users] " licensed users."]
+          (current-seat-usage-p num-active-users num-licensed-users)
 
           [:p "Suspended users are prevented from logging in and do not count towards the number your license allows."]
 

(ns frontend.components.admin
  (:require [ankha.core :as ankha]
            [cljs.core.async :as async :refer [>! <! alts! chan sliding-buffer close!]]
            [clojure.string :as str]
            [frontend.async :refer [raise!]]

                    :type "hidden"}]
           [:button.btn.btn-primary {:value "Switch user", :type "submit"}
            "Switch user"]]]]]))))

(defn current-seat-usage-p
  [active-users total-seats]
  [:p "There " (if (= 1 active-users) "is" "are" ) " currently "
   [:b (pluralize active-users "active user")]
   " out of "
   [:b (pluralize total-seats "licensed user")]
   "."])

(defn overview [app owner]
  (reify
