danielcompton

(defn checkbox [short-name takes-place? word k]
  ^{:key (str k "takes-place")}
  [:div.col.s2
   [:input.filled-in {:type    "checkbox"
                      :id      (str "weekdays-" short-name)
                      :checked takes-place?}]
   [:label.black-text {:for   (str "weekdays-" short-name)
                       :style {:height      "auto"
                               :line-height "normal"}}
    word (when-not takes-place? (str " nicht" (when (= k :sun) ".")))]])