                 (form/submit-button {:class "btn btn-default"} "Remember me")]]))
 
 (defn tab-class
+    "In the tab menu on top, only one item could be actived."
     [active mode]
     (if (= active mode)
-    {:class "active"}))
+        {:class "active"}))
+
+(defn user-href
+    "Generator for href to the page containing user info."
+    [user-name mode]
+    (let [destination (if (= mode :whitelist)
+                          "user-whitelist"
+                          "user-blacklist")]
+        [:a {:href (str destination "?name=" user-name)} user-name]))
 
 (defn users-href
+    "Generator for URL used by 'Users' menu item."
     [url-prefix mode]
     (if (= mode :whitelist)
         (str url-prefix "users-whitelist")
         (str url-prefix "users-blacklist")))
+
+(defn remember-me-href
+    "Generator for URL used by 'remember me' button."
+    [url-prefix mode]
+    (if (= mode :whitelist)
+        (str url-prefix "whitelist")
+        (str url-prefix "blacklist")))
 
 (defn render-navigation-bar-section
     "Renders whole navigation bar."

                    ]
                ] ; col-md-7 ends
                [:div {:class "col-md-3"}
                    (render-name-field user-name url-prefix)
                ]
                [:div {:class "col-md-2"}
                    [:div {:class "navbar-header"}

                    ] ; ./navbar-header
                ] ; col ends
            ] ; row ends
        ] ; </div .container-fluid>
]); </nav>

(defn render-error-page
