crappyrules/notehub
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

header size setting added (API leftover)

Browse Source
This commit is contained in:
Christian Müller
2014-10-05 20:49:27 +02:00
parent dccf9e3966
commit a237c2cb9b
2 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
API.md
+1
View File
@@ -78,6 +78,7 @@ Parameter | Explanation | Type
`version` | Used API version | **required** `version` | Used API version | **required**
`theme` | Theme name | *optional* `theme` | Theme name | *optional*
`text-size` | Text size | *optional* `text-size` | Text size | *optional*
`header-size`| Header size | *optional*
`text-font` | Text font name | *optional* `text-font` | Text font name | *optional*
`header-font`| Header font name | *optional* `header-font`| Header font name | *optional*
src/notehub/api.clj
+1 -1
View File
@@ -85,7 +85,7 @@
(when (blank? note) "note is empty")])] (when (blank? note) "note is empty")])]
(if (empty? errors) (if (empty? errors)
(let [[year month day] (map str (get-date)) (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 %)) raw-title (filter #(or (= \- %) (Character/isLetterOrDigit %))
(-> note derive-title trim (sreplace " " "-") lower-case)) (-> note derive-title trim (sreplace " " "-") lower-case))
max-length (get-setting :max-title-length #(Integer/parseInt %) 80) max-length (get-setting :max-title-length #(Integer/parseInt %) 80)