Makes button not crazy when you select a bunch of clients.

src/cljs/auto_ap/views/pages/ledger/profit_and_loss.cljs

@@ -264,9 +264,12 @@ NOTE: Please review the transactions we may have question for you here: https://
            [:div.level-left
             [:div.level-item
              [buttons/dropdown {:on-click (fn [] (reset! active :clients))}
-              [:span (str "Companies"
-                          (when-let [clients (:clients data)] 
-                            (str " (" (str/join ", " (map (comp :name :client) clients)) ")")))]]
+              [:span {:style {"max-width" "30em"
+                              "overflow" "hidden"
+                              "text-overflow" "ellipsis"}}
+               (str "Companies"
+                    (when-let [clients (:clients data)]
+                      (str " (" (str/join ", " (map (comp :name :client) clients)) ")")))]]
              [report-control-detail {:active active :box !box :which :clients}
               [:div {:style {:width "20em"}}
                [:h4.subtitle "Companies"]