header size setting added (API leftover)

2014-10-05 20:49:27 +02:00
parent dccf9e3966
commit a237c2cb9b
2 changed files with 2 additions and 1 deletions
@@ -78,6 +78,7 @@ Parameter    | Explanation                              | Type
 `version`    | Used API version                         | **required**
 `theme`      | Theme name                               | *optional*
 `text-size`  | Text size                                | *optional*
+`header-size`| Header size                              | *optional*
 `text-font`  | Text font name                           | *optional*
 `header-font`| Header font name                         | *optional*

@@ -85,7 +85,7 @@
                        (when (blank? note) "note is empty")])]
    (if (empty? errors)
      (let [[year month day] (map str (get-date))
-            params (select-keys params [:text-size :text-font :header-font :theme])
+            params (select-keys params [:text-size :header-size :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)