             [clj-time.local :as tl]
 
             [image-resizer.core :refer :all]
+            [image-resizer.format :as format]
+            [image-resizer.pad :as pad]
             )
   )
 

                 (as-> row
                     (if keyname
                       (assoc row :ttitle (make-translit-ru-en (str keyname)))
                       row))                   
                 
                 (assoc :plan_text (html-clean-tags web_description))
                 )))


(def files-root-directory (promise))


(defn image-file_as_w_png [buffered-file file-src w]
  (let [resized-file (new java.io.File (str (.getPath file-src) "_as_" w ".png"))]
    (javax.imageio.ImageIO/write buffered-file "png" resized-file)
    (.getAbsolutePath resized-file)))

(defn save-file-o [tempfile dir filename {:keys [ws] :or {ws []}}]
  (let [dir-filename (str dir "/" filename)
        full-path (str (if (realized? files-root-directory) @files-root-directory
