           [:div
            [:a {:href "/"} "Kaikki kiinteistöt"]
            " / " kiinteistön-nimi]
-          
+
           [:h1 kiinteistön-nimi]
 
           [:div {:style "margin-top: 20px; margin-bottom: 20px"}
            (like-button (str site-url "/" folder))]
-          
+
           (file-table folder)
 
           [:h2 {:class "comments-header"} "Kommentit"]

                                 reverse)]
                   [:tr [:td [:a {:href (str "/" folder "/" (URLEncoder/encode (.getName file)))}
                              (file-name file)]]
                    
                    [:td (->> file
                              last-modified-date
                              date-string)]


(defn date-string [{:keys [year month day]}]
  (str day "." month "." year))

(defn date-time-string [{:keys [year month day hour minute second]}]
  (str  day "." month "." year " " hour ":" minute ":" second))

(defn last-modified-date [file]
  (date-to-map (Date. (.lastModified file))))
