CamelCase fix

This commit is contained in:
Daniel Ziltener 2017-01-14 20:52:11 +00:00
parent 71e1150834
commit 257f63fba4
3 changed files with 9 additions and 5 deletions

View file

@ -1,12 +1,12 @@
[![License](//img.shields.io/badge/license-LGPL-blue.svg?style=flat)](https://www.gnu.org/licenses/lgpl-3.0.en.html#content) [![License](//img.shields.io/badge/license-LGPL-blue.svg?style=flat)](https://www.gnu.org/licenses/lgpl-3.0.en.html#content)
[![Clojars](//img.shields.io/badge/clojars-0.0.20-blue.svg?style=flat)](https://clojars.org/clojurefx/versions/0.0.20) [![Clojars](//img.shields.io/badge/clojars-0.0.21-blue.svg?style=flat)](https://clojars.org/clojurefx/versions/0.0.21)
[![Gratipay](//img.shields.io/gratipay/zilti.svg?style=flat)](//gratipay.com/zilti) [![Gratipay](//img.shields.io/gratipay/zilti.svg?style=flat)](//gratipay.com/zilti)
[![Flattr this](//api.flattr.com/button/flattr-badge-large.png)](https://flattr.com/submit/auto?user_id=zilti&url=https%3A%2F%2Fbitbucket.org%2Fzilti%2Fclojurefx) [![Flattr this](//api.flattr.com/button/flattr-badge-large.png)](https://flattr.com/submit/auto?user_id=zilti&url=https%3A%2F%2Fbitbucket.org%2Fzilti%2Fclojurefx)
# ClojureFX # ClojureFX
```clojure ```clojure
[clojurefx "0.0.20"] [clojurefx "0.0.21"]
``` ```
A Clojure extension to make working with [JavaFX](http://download.java.net/jdk8/jfxdocs/index.html) simpler and more idiomatic. It allows you to naturally work with stock JavaFX components through use of extended protocols. Should a feature be missing you can easily extend ClojureFX in your own codebase or just fall back to standard JavaFX methods. A Clojure extension to make working with [JavaFX](http://download.java.net/jdk8/jfxdocs/index.html) simpler and more idiomatic. It allows you to naturally work with stock JavaFX components through use of extended protocols. Should a feature be missing you can easily extend ClojureFX in your own codebase or just fall back to standard JavaFX methods.

View file

@ -1,4 +1,7 @@
(defproject clojurefx "0.0.20" (defproject clojurefx "0.0.21"
:description "A Clojure wrapper for JavaFX."
:license "Like Clojure."
:url "https://www.bitbucket.org/zilti/clojurefx"
:dependencies [[org.clojure/clojure "1.8.0"] :dependencies [[org.clojure/clojure "1.8.0"]
[swiss-arrows "1.0.0"] [swiss-arrows "1.0.0"]
[com.taoensso/timbre "4.7.4" :exclusions [com.taoensso/carmine]] [com.taoensso/timbre "4.7.4" :exclusions [com.taoensso/carmine]]

View file

@ -33,7 +33,8 @@
javafx.stage.Stage {:style javafx.stage.StageStyle}})) javafx.stage.Stage {:style javafx.stage.StageStyle}}))
(defn camelcase [kebabcase] (defn camelcase [kebabcase]
) (let [splitted (str/split kebabcase #"-")]
(reduce #(str %1 (str/capitalize %2)) (first splitted) (rest splitted))))
;; ## Threading helpers ;; ## Threading helpers
@ -96,7 +97,7 @@
;; ## Properties ;; ## Properties
(defn find-property [obj prop] (defn find-property [obj prop]
(clojure.lang.Reflector/invokeInstanceMethod obj prop [])) (clojure.lang.Reflector/invokeInstanceMethod obj (str (camelcase prop) "Property") []))
(defn get-property-value (defn get-property-value
([obj prop] ([obj prop]