 
 	 )))
 
+
+(defn nl2br
+  "Turn line breaks into <br> tags."
+  [s]
+  (replace s #"[\r\n]" "<br>"))
 
 
 (defn area-html

	  [:div#industry] (e/content (industry-html id config)))

	 (e/at
	  [:.about] (e/content about-text))

	 )))


  "Generate area HTML from database"
  (:require [acfe.util :refer [formatted-fact-detail]]
			[net.cgrand.enlive-html :as e]
			[clojure.string :refer [replace]]
			[yesql.core :refer [defqueries]]
			))

