bugfix: pass only known parameters to the url

2014-03-14 21:09:03 +01:00
parent ad40e27345
commit ec267671a5
2 changed files with 2 additions and 2 deletions
@@ -107,7 +107,7 @@
                        (when (blank? note) "note is empty")])]
    (if (empty? errors)
      (let [[year month day] (map str (get-date))
-            params (dissoc params :note :pid :signature :password :version :session)
+            params (select-keys params [:text-font :header-font :theme])
            raw-title (filter #(or (= \- %) (Character/isLetterOrDigit %))
                              (-> note derive-title trim (sreplace " " "-") lower-case))
            max-length (get-setting :max-title-length #(Integer/parseInt %) 80)