 
 (defn dump-history! [result]
   (spit (str *output-dir* "/HISTORY.md")
-        (stencil/render-string
+        (fix-emoji (stencil/render-string
           (slurp "templates/history.md")
           (history-file-data result)
-          )))
+          ))))
 
 ;;--------------------------------------------------------------------------------
 ;; unported file

  (-> s
      (replace "-" "--")
      ))

;;--------------------------------------------------------------------------------
;; Common


(defn dump-unported! [result]
  (spit (str *output-dir* "/UNPORTED.md")
        (fix-emoji (stencil/render-string
          (slurp "templates/unported.md")
          (unported-file-data result)))))

;;--------------------------------------------------------------------------------
;; readme file
