        :label (str "Hello from " @name ". This is the Home Page.")
        :level :level1])))
 
-(defn link-to-game-list []
-  [re-com/hyperlink-href
-   :label "go to Game List"
-   :href "#/games"])
-
-(defn link-to-about-page []
-  [re-com/hyperlink-href
-   :label "go to About Page"
-   :href "#/about"])
-
 (defn home-panel []
   [re-com/v-box
    :gap "1em"
-   :children [[home-title] [link-to-game-list] [link-to-about-page]]])
+   :children [[home-title]]])
 
 ;; --------------------
 (defn about-title []

   :children [[:p (str "connected to server: " (if connected? "Y" "N"))]
              [:p (str "user: " (or logged-user "N/A"))]]])

(defn main-panel []
  (let [active-panel (re-frame/subscribe [:active-panel])
        server-state (re-frame/subscribe [:server-state])]
    (fn []
      [re-com/v-box
       :height "100%"
       :children [[state-panel @server-state]
                  [:p {:on-click #(re-frame/dispatch [:send-event-to-server [:util/echo "echo"]])} "echo"]
                  [:p {:on-click #(re-frame/dispatch [:log-into-server "rafael"])} "login"]
                  [:p {:on-click #(re-frame/dispatch [:logout-from-server])} "logout"]
                  [:p {:on-click #(re-frame/dispatch [:create-game "New Game"])} "Create a new game"]

                  (panels @active-panel)]])))

(defn game-list-panel []
  [re-com/v-box
   :gap "1em"
   :children [[game-list-title]
              [:p {:on-click #(re-frame/dispatch [:create-game "New Game"])} "Create a new game"]
              [game-list]]])

;; --------------------
(defn current-game-title [game-title]
