temporarily deleting the html escaping (b/c of problems with blockquoting in MD)
This commit is contained in:
@@ -137,8 +137,6 @@
|
|||||||
; if not, append "-n", where "n" is the next free number
|
; if not, append "-n", where "n" is the next free number
|
||||||
(let [[year month day] (map #(+ (second %) (.get (Calendar/getInstance) (first %)))
|
(let [[year month day] (map #(+ (second %) (.get (Calendar/getInstance) (first %)))
|
||||||
{Calendar/YEAR 0, Calendar/MONTH 1, Calendar/DAY_OF_MONTH 0})
|
{Calendar/YEAR 0, Calendar/MONTH 1, Calendar/DAY_OF_MONTH 0})
|
||||||
; This is the _only_ point where user's content enters the web app, so we escape the content.
|
|
||||||
draft (escape-html draft)
|
|
||||||
untrimmed-line (filter #(or (= \- %) (Character/isLetterOrDigit %))
|
untrimmed-line (filter #(or (= \- %) (Character/isLetterOrDigit %))
|
||||||
(-> draft ccs/split-lines first (sreplace " " "-") lower-case))
|
(-> draft ccs/split-lines first (sreplace " " "-") lower-case))
|
||||||
trim (fn [s] (apply str (drop-while #(= \- %) s)))
|
trim (fn [s] (apply str (drop-while #(= \- %) s)))
|
||||||
|
|||||||
Reference in New Issue
Block a user