             "/bootstrap.min.js"  (return-file "bootstrap.min.js" "application/javascript")
             "/"                  (perform-normal-processing request)
             "/descriptions"      (render-all-descriptions request)
-            "/users"             (render-users-info request))))
-
+            "/users"             (render-users-info request)
+            "/user"              (render-user-info request))))
+

            (http-response/content-type "text/html"))))

(defn render-users-info
    "Create page containing user info(s)."
    [request]
    (let [changes-statistic (read-changes-statistic)
          changes           (read-changes)
          user-name    (get (get (request :cookies) "user-name") :value)]
        (-> (http-response/response (html-renderer-users changes-statistic changes user-name))
            (http-response/content-type "text/html"))))

(defn return-file

    []
    (try
        (jdbc/query changes-db (str "select * from changes order by id;"))
        (catch Exception e
            (println-and-flush "read-ccs-description(): Error accessing database 'css_descriptions.db'!")
            (println e)
            nil)))  ; special value that will be handled later

(defn read-changes-for-user
    "Read all changes made by specific user."
    [user-name]
    (try
        (jdbc/query changes-db [(str "select * from changes where user_name=? order by id;") user-name])
        (catch Exception e
            (println-and-flush "read-ccs-description(): Error accessing database 'css_descriptions.db'!")
            (println e)
