diff options
| author | scgilardi <scgilardi@gmail.com> | 2009-05-31 15:19:31 +0000 |
|---|---|---|
| committer | scgilardi <scgilardi@gmail.com> | 2009-05-31 15:19:31 +0000 |
| commit | 3e4a35afeb306dc3034b1370ffdaf159c4324bcb (patch) | |
| tree | 011d132fecb3e7f45c9e1e0aeb5a58d153524fbb /src/clojure | |
| parent | 6b85dc750d2f6781645d7249bd74592c9f73c970 (diff) | |
miglayout.example: cleanup
Diffstat (limited to 'src/clojure')
| -rw-r--r-- | src/clojure/contrib/miglayout/example.clj | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/clojure/contrib/miglayout/example.clj b/src/clojure/contrib/miglayout/example.clj index 2fc292ee..b077af76 100644 --- a/src/clojure/contrib/miglayout/example.clj +++ b/src/clojure/contrib/miglayout/example.clj @@ -29,9 +29,10 @@ (catch NumberFormatException _ "input?"))) (defn- handle-key - [evt in out] + "Clear output on most keys, show coversion on \"Enter\"" + [event in out] (.setText out - (if (= (.getKeyChar evt) \newline) + (if (= (.getKeyChar event) \newline) (fahrenheit (.getText in)) ""))) |