                                                   (do
                                                     (init-data state)))
                                :error-handler   (fn [{:keys [status status-text]}]
-                                                  (.log js/console (str status " " status-text))
-                                                  )})} (t :social/Unfollow) ])
+                                                  (.log js/console (str status " " status-text)
+                                                   (t :social/Unfollow)))})}])
 
+(defn toggle-panel [key atom]
+  (if (= key @atom)
+    (reset! atom nil)
+    (reset! atom key)))
 
 (defn accepted-user-connections [state users visible-area-atom]
-  (let [panel-identity :accepted]
-    [:div.panel
+  (let [panel-identity :accepted
+        icon-class (if (= @visible-area-atom panel-identity) "fa-chevron-circle-down" "fa-chevron-circle-right")]
+    [:div.panel.expandable-block
      [:div.panel-heading
-      [:a {:href "#" :on-click #(do (.preventDefault %) (reset! visible-area-atom panel-identity))}
+      [:a {:href "#" :on-click #(do (.preventDefault %) (toggle-panel panel-identity visible-area-atom))}
        [:h3
-        (str (t :social/Followedusers) " (" (count users) ")")]]]
+        (str (t :social/Followedusers) " (" (count users) ")")]
+       [:i.fa.fa-lg.panel-status-icon {:class icon-class}]]]
      (when (= panel-identity @visible-area-atom)
        [:div.panel-body
         [:table {:class "table" :summary (t :social/Followedusers)}

                                        (do
                                          (init-data state)))
                     :error-handler   (fn [{:keys [status status-text]}]
                                        (.log js/console (str status " " status-text))
                                        )})} (t :social/Accept)])

(defn decline [owner-id state]
  [:a {:class  "btn btn-warning btn-xs"

                                              (mo/open-modal [:profile :view] {:user-id user_id})
                                              ;(b/open-modal id false init-data state)
                                              (.preventDefault %)) } (str first_name " " last_name)]]
                  [:td.action  (if (= "accepted" status) (deleteconnect user_id state)  (str (t :social/Pending) "..."))]]))]])]))



(defn accept [owner-id state]
